Input buildinfo: https://buildinfos.debian.net/buildinfo-pool/c/consfigurator/consfigurator_0.13.0-1_all.buildinfo Use metasnap for getting required timestamps New buildinfo file: /tmp/consfigurator-0.13.0-171t_61b2/consfigurator_0.13.0-1_all.buildinfo Get source package info: consfigurator=0.13.0-1 Source URL: http://snapshot.notset.fr/mr/package/consfigurator/0.13.0-1/srcfiles?fileinfo=1 env -i PATH=/usr/sbin:/usr/bin:/sbin:/bin TMPDIR=/tmp mmdebstrap --arch=amd64 --include=autoconf=2.71-2 automake=1:1.16.5-1.1 autopoint=0.21-4 autotools-dev=20180224.1+nmu1 base-files=12 base-passwd=3.5.52 bash=5.1-5+b1 binutils=2.37-10 binutils-common=2.37-10 binutils-x86-64-linux-gnu=2.37-10 bsdextrautils=2.37.2-4 bsdutils=1:2.37.2-4 build-essential=12.9 bzip2=1.0.8-5 ca-certificates=20211016 cl-agnostic-lizard=0~git20201010.1.fe3a737-2 cl-alexandria=20211025.gita67c3a6-1 cl-anaphora=20210111.gitab5f07e-1 cl-babel=20200719.gitf892d05-2 cl-bordeaux-threads=0.8.8-5 cl-cffi=1:0.24.1-2 cl-closer-mop=2:20201029.git91f877a-1 cl-flexi-streams=20210728.git41af5dc-1 cl-heredoc=0.1.0~git20210329.a8c8a35+ds1-1 cl-interpol=20201106.git70a1137-1 cl-named-readtables=20201221.gitc5689a4-1 cl-osicat=0.7.0+git20210913.2a431d0-2 cl-ppcre=20190407.git1ca0cd9-2 cl-trivial-backtrace=20200511.git6eb65bd-1 cl-trivial-features=20210228.gitf6e8dd7-2 cl-trivial-gray-streams=20210117.git2b3823e-1 cl-unicode=20201101.git54bdf2c-1 coreutils=8.32-4.1 cpp=4:11.2.0-2 cpp-11=11.2.0-12 dash=0.5.11+git20210903+057cd650a4ed-3 debconf=1.5.79 debhelper=13.5.2 debianutils=5.5-1 dh-autoreconf=20 dh-elpa=2.0.9 dh-strip-nondeterminism=1.12.1-1 diffutils=1:3.7-5 docutils-common=0.17.1+dfsg-2 dpkg=1.21.1 dpkg-dev=1.21.1 dwz=0.14-1 emacs-bin-common=1:27.1+1-3.1+b1 emacs-common=1:27.1+1-3.1 emacs-nox=1:27.1+1-3.1+b1 emacsen-common=3.0.4 file=1:5.41-2 findutils=4.8.0-1 fonts-font-awesome=5.0.10+really4.7.0~dfsg-4.1 fonts-lato=2.0-2.1 g++=4:11.2.0-2 g++-11=11.2.0-12 gcc=4:11.2.0-2 gcc-11=11.2.0-12 gcc-11-base=11.2.0-12 gettext=0.21-4 gettext-base=0.21-4 grep=3.7-1 groff-base=1.22.4-7 gzip=1.10-4 hostname=3.23 init-system-helpers=1.61 install-info=6.8-3 intltool-debian=0.35.0+20060710.5 libacl1=2.3.1-1 libacl1-dev=2.3.1-1 libapt-pkg-perl=0.1.40 libapt-pkg6.0=2.3.13 libarchive-zip-perl=1.68-1 libarray-unique-perl=0.08-2.1 libarray-utils-perl=0.5-1.1 libasan6=11.2.0-12 libasound2=1.2.5.1-1 libasound2-data=1.2.5.1-1 libatomic1=11.2.0-12 libattr1=1:2.5.1-1 libattr1-dev=1:2.5.1-1 libaudit-common=1:3.0.6-1 libaudit1=1:3.0.6-1+b1 libbinutils=2.37-10 libblkid1=2.37.2-4 libbz2-1.0=1.0.8-5 libc-bin=2.33-1 libc-dev-bin=2.33-1 libc6=2.33-1 libc6-dev=2.33-1 libcap-dev=1:2.44-1 libcap-ng0=0.7.9-2.2+b1 libcap2=1:2.44-1 libcc1-0=11.2.0-12 libcgi-pm-perl=4.53-1 libclass-accessor-perl=0.51-1 libcom-err2=1.46.4-1 libconfig-tiny-perl=2.27-1 libcrypt-dev=1:4.4.26-1 libcrypt1=1:4.4.26-1 libctf-nobfd0=2.37-10 libctf0=2.37-10 libdb5.3=5.3.28+dfsg1-0.8 libdbus-1-3=1.12.20-3 libdebconfclient0=0.261 libdebhelper-perl=13.5.2 libdebian-source-perl=0.116 libdpkg-perl=1.21.1 libelf1=0.186-1 libencode-locale-perl=1.05-1.1 liberror-perl=0.17029-1 libexpat1=2.4.1-3 libexporter-lite-perl=0.08-1 libexporter-tiny-perl=1.002002-1 libffi-dev=3.4.2-3 libffi8=3.4.2-3 libfile-find-rule-perl=0.34-1 libfile-listing-perl=6.14-1 libfile-stripnondeterminism-perl=1.12.1-1 libgcc-11-dev=11.2.0-12 libgcc-s1=11.2.0-12 libgcrypt20=1.9.4-5 libgdbm-compat4=1.22-1 libgdbm6=1.22-1 libglib2.0-0=2.70.2-1 libgmp10=2:6.2.1+dfsg-3 libgnutls30=3.7.2-2 libgomp1=11.2.0-12 libgpg-error0=1.42-3 libgpm2=1.20.7-9 libgssapi-krb5-2=1.18.3-7 libhogweed6=3.7.3-1 libhtml-form-perl=6.07-1 libhtml-parser-perl=3.76-1 libhtml-tagset-perl=3.20-4 libhtml-tree-perl=5.07-2 libhttp-cookies-perl=6.10-1 libhttp-date-perl=6.05-1 libhttp-message-perl=6.35-1 libhttp-negotiate-perl=6.01-1 libhttp-server-simple-perl=0.52-1.1 libicu67=67.1-7 libidn2-0=2.3.2-2 libio-html-perl=1.004-2 libio-socket-ssl-perl=2.072-1 libio-stringy-perl=2.111-3 libisl23=0.24-2 libitm1=11.2.0-12 libjansson4=2.13.1-1.1 libjs-jquery=3.5.1+dfsg+~3.5.5-8 libjs-sphinxdoc=4.3.1-2 libjs-underscore=1.9.1~dfsg-4 libk5crypto3=1.18.3-7 libkeyutils1=1.6.1-2 libkrb5-3=1.18.3-7 libkrb5support0=1.18.3-7 liblcms2-2=2.12~rc1-2 liblist-moreutils-perl=0.430-2 liblist-moreutils-xs-perl=0.430-2 liblsan0=11.2.0-12 liblwp-mediatypes-perl=6.04-1 liblwp-protocol-https-perl=6.10-1 liblz4-1=1.9.3-2 liblzma5=5.2.5-2 libmagic-mgc=1:5.41-2 libmagic1=1:5.41-2 libmount1=2.37.2-4 libmpc3=1.2.1-1 libmpdec3=2.5.1-2 libmpfr6=4.1.0-3 libncursesw6=6.3-1 libnet-http-perl=6.21-1 libnet-ssleay-perl=1.90-1 libnettle8=3.7.3-1 libnsl-dev=1.3.0-2 libnsl2=1.3.0-2 libnumber-compare-perl=0.03-2 libp11-kit0=0.24.0-6 libpam-modules=1.4.0-11 libpam-modules-bin=1.4.0-11 libpam-runtime=1.4.0-11 libpam0g=1.4.0-11 libparse-debcontrol-perl=2.005-4.1 libpcre2-8-0=10.39-3 libpcre3=2:8.39-13 libperl5.32=5.32.1-6 libpipeline1=1.5.4-1 libpython3-stdlib=3.9.8-1 libpython3.9-minimal=3.9.9-1 libpython3.9-stdlib=3.9.9-1 libquadmath0=11.2.0-12 libreadline8=8.1-2 libseccomp2=2.5.3-2 libselinux1=3.3-1+b1 libsigsegv2=2.13-1 libsmartcols1=2.37.2-4 libsqlite3-0=3.36.0-2 libssl1.1=1.1.1l-1 libstdc++-11-dev=11.2.0-12 libstdc++6=11.2.0-12 libsub-install-perl=0.928-1.1 libsub-name-perl=0.26-1+b1 libsub-override-perl=0.09-2 libsystemd0=249.7-1 libtasn1-6=4.18.0-4 libtext-glob-perl=0.11-2 libtext-unidecode-perl=1.30-1 libtie-ixhash-perl=1.23-2.1 libtimedate-perl=2.3300-2 libtinfo6=6.3-1 libtirpc-common=1.3.2-2 libtirpc-dev=1.3.2-2 libtirpc3=1.3.2-2 libtool=2.4.6-15 libtry-tiny-perl=0.31-1 libtsan0=11.2.0-12 libubsan1=11.2.0-12 libuchardet0=0.0.7-1 libudev1=249.7-1 libunistring2=0.9.10-6 liburi-perl=5.10-1 libuuid1=2.37.2-4 libwww-mechanize-perl=2.06-1 libwww-perl=6.59-1 libwww-robotrules-perl=6.02-1 libxml-libxml-perl=2.0134+dfsg-2+b1 libxml-namespacesupport-perl=1.12-1.1 libxml-sax-base-perl=1.09-1.1 libxml-sax-perl=1.02+dfsg-3 libxml2=2.9.12+dfsg-5+b1 libxxhash0=0.8.0-2 libzstd1=1.4.8+dfsg-3 linux-libc-dev=5.15.5-1 login=1:4.8.1-2 lsb-base=11.1.0 m4=1.4.18-5 make=4.3-4.1 man-db=2.9.4-2 mawk=1.3.4.20200120-2 media-types=4.0.0 ncurses-base=6.3-1 ncurses-bin=6.3-1 netbase=6.3 openssl=1.1.1l-1 patch=2.7.6-7 perl=5.32.1-6 perl-base=5.32.1-6 perl-modules-5.32=5.32.1-6 perl-openssl-defaults=5 pkg-config=0.29.2-1 po-debconf=1.0.21+nmu1 python-babel-localedata=2.8.0+dfsg.1-7 python3=3.9.8-1 python3-alabaster=0.7.12-1 python3-babel=2.8.0+dfsg.1-7 python3-certifi=2020.6.20-1 python3-chardet=4.0.0-1 python3-distutils=3.9.9-3 python3-docutils=0.17.1+dfsg-2 python3-idna=2.10-1 python3-imagesize=1.3.0-1 python3-jinja2=3.0.1-2 python3-lib2to3=3.9.9-3 python3-markupsafe=2.0.1-2+b1 python3-minimal=3.9.8-1 python3-packaging=21.3-1 python3-pkg-resources=59.4.0-1 python3-pygments=2.10.0+dfsg-1 python3-pyparsing=2.4.7-1 python3-requests=2.25.1+dfsg-2 python3-roman=3.3-1 python3-six=1.16.0-2 python3-snowballstemmer=2.2.0-1 python3-sphinx=4.3.1-2 python3-sphinx-rtd-theme=1.0.0+dfsg-1 python3-tz=2021.3-1 python3-urllib3=1.26.5-1~exp1 python3.9=3.9.9-1 python3.9-minimal=3.9.9-1 readline-common=8.1-2 rpcsvc-proto=1.4.2-4 sbcl=2:2.1.11-1 sed=4.8-1 sensible-utils=0.0.17 sgml-base=1.30 sphinx-common=4.3.1-2 sphinx-rtd-theme-common=1.0.0+dfsg-1 sysvinit-utils=3.01-1 tar=1.34+dfsg-1 tex-common=6.17 texinfo=6.8-3 tzdata=2021e-1 ucf=3.0043 util-linux=2.37.2-4 xml-core=0.18+nmu1 xz-utils=5.2.5-2 zlib1g=1:1.2.11.dfsg-2 zlib1g-dev=1:1.2.11.dfsg-2 --variant=apt --aptopt=Acquire::Check-Valid-Until "false" --aptopt=Acquire::http::Dl-Limit "1000"; --aptopt=Acquire::https::Dl-Limit "1000"; --aptopt=Acquire::Retries "5"; --aptopt=APT::Get::allow-downgrades "true"; --keyring=/usr/share/keyrings/ --essential-hook=chroot "$1" sh -c "apt-get --yes install fakeroot util-linux" --essential-hook=copy-in /usr/share/keyrings/debian-archive-bullseye-automatic.gpg /usr/share/keyrings/debian-archive-bullseye-security-automatic.gpg /usr/share/keyrings/debian-archive-bullseye-stable.gpg /usr/share/keyrings/debian-archive-buster-automatic.gpg /usr/share/keyrings/debian-archive-buster-security-automatic.gpg /usr/share/keyrings/debian-archive-buster-stable.gpg /usr/share/keyrings/debian-archive-keyring.gpg /usr/share/keyrings/debian-archive-removed-keys.gpg /usr/share/keyrings/debian-archive-stretch-automatic.gpg /usr/share/keyrings/debian-archive-stretch-security-automatic.gpg /usr/share/keyrings/debian-archive-stretch-stable.gpg /usr/share/keyrings/debian-ports-archive-keyring-removed.gpg /usr/share/keyrings/debian-ports-archive-keyring.gpg /usr/share/keyrings/debian-keyring.gpg /etc/apt/trusted.gpg.d/ --essential-hook=chroot "$1" sh -c "rm /etc/apt/sources.list && echo 'deb http://snapshot.notset.fr/archive/debian/20211221T034239Z/ bookworm main deb-src http://snapshot.notset.fr/archive/debian/20211221T034239Z/ bookworm main deb http://snapshot.notset.fr/archive/debian/20211215T212228Z/ unstable main' >> /etc/apt/sources.list && apt-get update" --customize-hook=chroot "$1" useradd --no-create-home -d /nonexistent -p "" builduser -s /bin/bash --customize-hook=chroot "$1" env sh -c "apt-get source --only-source -d consfigurator=0.13.0-1 && mkdir -p /build/consfigurator-nf4NaY && dpkg-source --no-check -x /*.dsc /build/consfigurator-nf4NaY/consfigurator-0.13.0 && chown -R builduser:builduser /build/consfigurator-nf4NaY" --customize-hook=chroot "$1" env --unset=TMPDIR runuser builduser -c "cd /build/consfigurator-nf4NaY/consfigurator-0.13.0 && env DEB_BUILD_OPTIONS="parallel=4" LANG="C.UTF-8" LC_ALL="C.UTF-8" LC_COLLATE="C.UTF-8" SOURCE_DATE_EPOCH="1639610528" dpkg-buildpackage -uc -a amd64 --build=all" --customize-hook=sync-out /build/consfigurator-nf4NaY /tmp/consfigurator-0.13.0-171t_61b2 bookworm /dev/null deb http://snapshot.notset.fr/archive/debian/20211215T212228Z unstable main I: automatically chosen mode: root I: chroot architecture amd64 is equal to the host's architecture I: automatically chosen format: tar I: using /tmp/mmdebstrap.HaC79VXIP1 as tempdir I: running apt-get update... I: downloading packages with apt... I: extracting archives... I: installing essential packages... I: running --essential-hook in shell: sh -c 'chroot "$1" sh -c "apt-get --yes install fakeroot util-linux"' exec /tmp/mmdebstrap.HaC79VXIP1 Reading package lists... Building dependency tree... util-linux is already the newest version (2.37.2-4). The following NEW packages will be installed: fakeroot libfakeroot 0 upgraded, 2 newly installed, 0 to remove and 0 not upgraded. Need to get 134 kB of archives. After this operation, 397 kB of additional disk space will be used. Get:1 http://snapshot.notset.fr/archive/debian/20211215T212228Z unstable/main amd64 libfakeroot amd64 1.26-1 [47.3 kB] Get:2 http://snapshot.notset.fr/archive/debian/20211215T212228Z unstable/main amd64 fakeroot amd64 1.26-1 [87.1 kB] debconf: delaying package configuration, since apt-utils is not installed Fetched 134 kB in 0s (1003 kB/s) Selecting previously unselected package libfakeroot:amd64. (Reading database ... (Reading database ... 5% (Reading database ... 10% (Reading database ... 15% (Reading database ... 20% (Reading database ... 25% (Reading database ... 30% (Reading database ... 35% (Reading database ... 40% (Reading database ... 45% (Reading database ... 50% (Reading database ... 55% (Reading database ... 60% (Reading database ... 65% (Reading database ... 70% (Reading database ... 75% (Reading database ... 80% (Reading database ... 85% (Reading database ... 90% (Reading database ... 95% (Reading database ... 100% (Reading database ... 4680 files and directories currently installed.) Preparing to unpack .../libfakeroot_1.26-1_amd64.deb ... Unpacking libfakeroot:amd64 (1.26-1) ... Selecting previously unselected package fakeroot. Preparing to unpack .../fakeroot_1.26-1_amd64.deb ... Unpacking fakeroot (1.26-1) ... Setting up libfakeroot:amd64 (1.26-1) ... Setting up fakeroot (1.26-1) ... update-alternatives: using /usr/bin/fakeroot-sysv to provide /usr/bin/fakeroot (fakeroot) in auto mode Processing triggers for libc-bin (2.33-1) ... I: running special hook: copy-in /usr/share/keyrings/debian-archive-bullseye-automatic.gpg /usr/share/keyrings/debian-archive-bullseye-security-automatic.gpg /usr/share/keyrings/debian-archive-bullseye-stable.gpg /usr/share/keyrings/debian-archive-buster-automatic.gpg /usr/share/keyrings/debian-archive-buster-security-automatic.gpg /usr/share/keyrings/debian-archive-buster-stable.gpg /usr/share/keyrings/debian-archive-keyring.gpg /usr/share/keyrings/debian-archive-removed-keys.gpg /usr/share/keyrings/debian-archive-stretch-automatic.gpg /usr/share/keyrings/debian-archive-stretch-security-automatic.gpg /usr/share/keyrings/debian-archive-stretch-stable.gpg /usr/share/keyrings/debian-ports-archive-keyring-removed.gpg /usr/share/keyrings/debian-ports-archive-keyring.gpg /usr/share/keyrings/debian-keyring.gpg /etc/apt/trusted.gpg.d/ I: running --essential-hook in shell: sh -c 'chroot "$1" sh -c "rm /etc/apt/sources.list && echo 'deb http://snapshot.notset.fr/archive/debian/20211221T034239Z/ bookworm main deb-src http://snapshot.notset.fr/archive/debian/20211221T034239Z/ bookworm main deb http://snapshot.notset.fr/archive/debian/20211215T212228Z/ unstable main' >> /etc/apt/sources.list && apt-get update"' exec /tmp/mmdebstrap.HaC79VXIP1 Get:1 http://snapshot.notset.fr/archive/debian/20211221T034239Z bookworm InRelease [129 kB] Hit:2 http://snapshot.notset.fr/archive/debian/20211215T212228Z unstable InRelease Ign:3 http://snapshot.notset.fr/archive/debian/20211221T034239Z bookworm/main Sources Ign:4 http://snapshot.notset.fr/archive/debian/20211221T034239Z bookworm/main amd64 Packages Ign:3 http://snapshot.notset.fr/archive/debian/20211221T034239Z bookworm/main Sources Ign:4 http://snapshot.notset.fr/archive/debian/20211221T034239Z bookworm/main amd64 Packages Ign:3 http://snapshot.notset.fr/archive/debian/20211221T034239Z bookworm/main Sources Ign:4 http://snapshot.notset.fr/archive/debian/20211221T034239Z bookworm/main amd64 Packages Get:3 http://snapshot.notset.fr/archive/debian/20211221T034239Z bookworm/main Sources [11.8 MB] Get:4 http://snapshot.notset.fr/archive/debian/20211221T034239Z bookworm/main amd64 Packages [11.2 MB] Fetched 23.1 MB in 25s (913 kB/s) Reading package lists... I: installing remaining packages inside the chroot... I: running --customize-hook in shell: sh -c 'chroot "$1" useradd --no-create-home -d /nonexistent -p "" builduser -s /bin/bash' exec /tmp/mmdebstrap.HaC79VXIP1 I: running --customize-hook in shell: sh -c 'chroot "$1" env sh -c "apt-get source --only-source -d consfigurator=0.13.0-1 && mkdir -p /build/consfigurator-nf4NaY && dpkg-source --no-check -x /*.dsc /build/consfigurator-nf4NaY/consfigurator-0.13.0 && chown -R builduser:builduser /build/consfigurator-nf4NaY"' exec /tmp/mmdebstrap.HaC79VXIP1 Reading package lists... NOTICE: 'consfigurator' packaging is maintained in the 'Git' version control system at: https://git.spwhitton.name/consfigurator/ Please use: git clone https://git.spwhitton.name/consfigurator/ to retrieve the latest (possibly unreleased) updates to the package. Need to get 163 kB of source archives. Get:1 http://snapshot.notset.fr/archive/debian/20211221T034239Z bookworm/main consfigurator 0.13.0-1 (dsc) [2363 B] Get:2 http://snapshot.notset.fr/archive/debian/20211221T034239Z bookworm/main consfigurator 0.13.0-1 (tar) [156 kB] Get:3 http://snapshot.notset.fr/archive/debian/20211221T034239Z bookworm/main consfigurator 0.13.0-1 (diff) [4364 B] Fetched 163 kB in 0s (602 kB/s) Download complete and in download only mode W: Download is performed unsandboxed as root as file 'consfigurator_0.13.0-1.dsc' couldn't be accessed by user '_apt'. - pkgAcquire::Run (13: Permission denied) dpkg-source: info: extracting consfigurator in /build/consfigurator-nf4NaY/consfigurator-0.13.0 dpkg-source: info: unpacking consfigurator_0.13.0.orig.tar.xz dpkg-source: info: unpacking consfigurator_0.13.0-1.debian.tar.xz I: running --customize-hook in shell: sh -c 'chroot "$1" env --unset=TMPDIR runuser builduser -c "cd /build/consfigurator-nf4NaY/consfigurator-0.13.0 && env DEB_BUILD_OPTIONS="parallel=4" LANG="C.UTF-8" LC_ALL="C.UTF-8" LC_COLLATE="C.UTF-8" SOURCE_DATE_EPOCH="1639610528" dpkg-buildpackage -uc -a amd64 --build=all"' exec /tmp/mmdebstrap.HaC79VXIP1 dpkg-buildpackage: info: source package consfigurator dpkg-buildpackage: info: source version 0.13.0-1 dpkg-buildpackage: info: source distribution unstable dpkg-buildpackage: info: source changed by Sean Whitton dpkg-source --before-build . debian/rules clean dh clean --with sphinxdoc,elpa debian/rules override_dh_auto_clean make[1]: Entering directory '/build/consfigurator-nf4NaY/consfigurator-0.13.0' find src tests -name "*.fasl" -delete make -C doc clean make[2]: Entering directory '/build/consfigurator-nf4NaY/consfigurator-0.13.0/doc' make[2]: Circular Makefile <- Makefile dependency dropped. make[2]: Leaving directory '/build/consfigurator-nf4NaY/consfigurator-0.13.0/doc' make[1]: Leaving directory '/build/consfigurator-nf4NaY/consfigurator-0.13.0' dh_clean debian/rules binary-indep dh binary-indep --with sphinxdoc,elpa dh_update_autotools_config -i dh_autoreconf -i debian/rules override_dh_auto_build make[1]: Entering directory '/build/consfigurator-nf4NaY/consfigurator-0.13.0' make -C doc html info make[2]: Entering directory '/build/consfigurator-nf4NaY/consfigurator-0.13.0/doc' make[2]: Circular Makefile <- Makefile dependency dropped. Running Sphinx v4.3.1 making output directory... done WARNING: html_static_path entry '_static' does not exist building [mo]: targets for 0 po files that are out of date building [html]: targets for 13 source files that are out of date updating environment: [new config] 13 added, 0 changed, 0 removed reading sources... [ 7%] connections reading sources... [ 15%] data reading sources... [ 23%] hosts reading sources... [ 30%] ideas reading sources... [ 38%] index reading sources... [ 46%] installation reading sources... [ 53%] introduction reading sources... [ 61%] pitfalls reading sources... [ 69%] properties reading sources... [ 76%] propspecs reading sources... [ 84%] tutorial/conventions reading sources... [ 92%] tutorial/disk_image reading sources... [100%] tutorial/os_installation /build/consfigurator-nf4NaY/consfigurator-0.13.0/doc/installation.rst:9: WARNING: Unknown target name: "debian unstable". /build/consfigurator-nf4NaY/consfigurator-0.13.0/doc/introduction.rst:312: WARNING: Unknown target name: "propellor". looking for now-outdated files... none found pickling environment... done checking consistency... done preparing documents... done writing output... [ 7%] connections writing output... [ 15%] data writing output... [ 23%] hosts writing output... [ 30%] ideas writing output... [ 38%] index writing output... [ 46%] installation writing output... [ 53%] introduction writing output... [ 61%] pitfalls writing output... [ 69%] properties writing output... [ 76%] propspecs writing output... [ 84%] tutorial/conventions writing output... [ 92%] tutorial/disk_image writing output... [100%] tutorial/os_installation /build/consfigurator-nf4NaY/consfigurator-0.13.0/doc/introduction.rst:125: WARNING: Could not lex literal_block as "common-lisp". Highlighting skipped. /build/consfigurator-nf4NaY/consfigurator-0.13.0/doc/tutorial/disk_image.rst:95: WARNING: Could not lex literal_block as "common-lisp". Highlighting skipped. generating indices... genindex done writing additional pages... search done copying static files... done copying extra files... done dumping search index in English (code: en)... done dumping object inventory... done build succeeded, 5 warnings. The HTML pages are in _build/html. Running Sphinx v4.3.1 making output directory... done WARNING: html_static_path entry '_static' does not exist loading pickled environment... done building [mo]: targets for 0 po files that are out of date building [texinfo]: all documents updating environment: 0 added, 0 changed, 0 removed looking for now-outdated files... none found processing consfigurator.texi... index introduction installation tutorial/disk_image tutorial/os_installation connections properties hosts propspecs data pitfalls ideas resolving references... done writing... done copying Texinfo support files... Makefile done build succeeded, 1 warning. The Texinfo files are in _build/texinfo. Run 'make' in that directory to run these through makeinfo (use 'make info' here to do that automatically). make[3]: Entering directory '/build/consfigurator-nf4NaY/consfigurator-0.13.0/doc/_build/texinfo' makeinfo --no-split -o 'consfigurator.info' 'consfigurator.texi' consfigurator.texi:18: warning: @definfoenclose is obsolete. consfigurator.texi:19: warning: @definfoenclose is obsolete. make[3]: Leaving directory '/build/consfigurator-nf4NaY/consfigurator-0.13.0/doc/_build/texinfo' make[2]: Leaving directory '/build/consfigurator-nf4NaY/consfigurator-0.13.0/doc' make -C emacs consfigurator.el make[2]: Entering directory '/build/consfigurator-nf4NaY/consfigurator-0.13.0/emacs' sbcl --disable-debugger --eval '(require "asdf")' --eval '(let ((asdf:*user-cache* "/tmp") (asdf:*central-registry* (list (truename "..")))) (asdf:load-system "consfigurator"))' \ --eval '(consfigurator::dump-properties-for-emacs "consfigurator.el.in" "consfigurator.el")' --quit This is SBCL 2.1.11.debian, 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. ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/package.lisp" (written 25 OCT 2021 08:11:41 AM): ; wrote /tmp/usr/share/common-lisp/source/alexandria/alexandria-1/package-tmpGHU3ALSV.fasl ; compilation finished in 0:00:00.008 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/definitions.lisp" (written 25 OCT 2021 08:11:41 AM): ; wrote /tmp/usr/share/common-lisp/source/alexandria/alexandria-1/definitions-tmpAAURSO1.fasl ; compilation finished in 0:00:00.024 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/binding.lisp" (written 25 OCT 2021 08:11:41 AM): ; wrote /tmp/usr/share/common-lisp/source/alexandria/alexandria-1/binding-tmp5GEXGEG5.fasl ; compilation finished in 0:00:00.040 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/strings.lisp" (written 25 OCT 2021 08:11:41 AM): ; wrote /tmp/usr/share/common-lisp/source/alexandria/alexandria-1/strings-tmpAR3FSGEY.fasl ; compilation finished in 0:00:00.011 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/conditions.lisp" (written 25 OCT 2021 08:11:41 AM): ; wrote /tmp/usr/share/common-lisp/source/alexandria/alexandria-1/conditions-tmpJAIDFZTC.fasl ; compilation finished in 0:00:00.028 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/symbols.lisp" (written 25 OCT 2021 08:11:41 AM): ; wrote /tmp/usr/share/common-lisp/source/alexandria/alexandria-1/symbols-tmp8V3J6PE9.fasl ; compilation finished in 0:00:00.029 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/macros.lisp" (written 25 OCT 2021 08:11:41 AM): ; wrote /tmp/usr/share/common-lisp/source/alexandria/alexandria-1/macros-tmp9V47YWQF.fasl ; compilation finished in 0:00:00.099 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/functions.lisp" (written 25 OCT 2021 08:11:41 AM): ; wrote /tmp/usr/share/common-lisp/source/alexandria/alexandria-1/functions-tmp9BN22RMA.fasl ; compilation finished in 0:00:00.073 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/lists.lisp" (written 25 OCT 2021 08:11:41 AM): ; wrote /tmp/usr/share/common-lisp/source/alexandria/alexandria-1/lists-tmp1CXFJSK9.fasl ; compilation finished in 0:00:00.128 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/types.lisp" (written 25 OCT 2021 08:11:41 AM): ; wrote /tmp/usr/share/common-lisp/source/alexandria/alexandria-1/types-tmpX4BRKI0R.fasl ; compilation finished in 0:00:00.079 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/io.lisp" (written 25 OCT 2021 08:11:41 AM): ; file: /usr/share/common-lisp/source/alexandria/alexandria-1/io.lisp ; in: DEFUN READ-STREAM-CONTENT-INTO-STRING ; (WITH-OUTPUT-TO-STRING ; (ALEXANDRIA::DATUM NIL :ELEMENT-TYPE ALEXANDRIA::ELEMENT-TYPE) ; (LET ((ALEXANDRIA::BUFFER ; (MAKE-ARRAY ALEXANDRIA::BUFFER-SIZE :ELEMENT-TYPE ; ALEXANDRIA::ELEMENT-TYPE))) ; (LOOP :FOR ALEXANDRIA::BYTES-READ = (READ-SEQUENCE ALEXANDRIA::BUFFER ; STREAM) ; :DO (WRITE-SEQUENCE ALEXANDRIA::BUFFER ALEXANDRIA::DATUM :START 0 ; :END ALEXANDRIA::BYTES-READ) ; :WHILE (= ALEXANDRIA::BYTES-READ ALEXANDRIA::BUFFER-SIZE)))) ; --> LET ; ==> ; (MAKE-STRING 31 :ELEMENT-TYPE ALEXANDRIA::ELEMENT-TYPE) ; ; note: could not stack allocate: (WITH-OUTPUT-TO-STRING (DATUM NIL :ELEMENT-TYPE ELEMENT-TYPE) (LET ((BUFFER (MAKE-ARRAY BUFFER-SIZE :ELEMENT-TYPE ELEMENT-TYPE))) (LOOP :FOR BYTES-READ = (READ-SEQUENCE BUFFER STREAM) :DO (WRITE-SEQUENCE BUFFER DATUM :START 0 :END BYTES-READ) :WHILE (= BYTES-READ BUFFER-SIZE)))) ; wrote /tmp/usr/share/common-lisp/source/alexandria/alexandria-1/io-tmpQ371UGST.fasl ; compilation finished in 0:00:00.152 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/hash-tables.lisp" (written 25 OCT 2021 08:11:41 AM): ; wrote /tmp/usr/share/common-lisp/source/alexandria/alexandria-1/hash-tables-tmp2OWI3Q7U.fasl ; compilation finished in 0:00:00.045 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/control-flow.lisp" (written 25 OCT 2021 08:11:41 AM): ; wrote /tmp/usr/share/common-lisp/source/alexandria/alexandria-1/control-flow-tmp9KKTJMYV.fasl ; compilation finished in 0:00:00.037 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/arrays.lisp" (written 25 OCT 2021 08:11:41 AM): ; wrote /tmp/usr/share/common-lisp/source/alexandria/alexandria-1/arrays-tmpJU0JWO19.fasl ; compilation finished in 0:00:00.006 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/sequences.lisp" (written 25 OCT 2021 08:11:41 AM): ; file: /usr/share/common-lisp/source/alexandria/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. ; in: DEFUN MAP-DERANGEMENTS ; (MAKE-ARRAY ALEXANDRIA::SIZE :ELEMENT-TYPE 'BIT :INITIAL-ELEMENT 0) ; ; note: could not stack allocate: (MAKE-ARRAY SIZE :ELEMENT-TYPE (QUOTE BIT) :INITIAL-ELEMENT 0) ; wrote /tmp/usr/share/common-lisp/source/alexandria/alexandria-1/sequences-tmpZX2WN8N4.fasl ; compilation finished in 0:00:00.114 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/numbers.lisp" (written 25 OCT 2021 08:11:41 AM): ; wrote /tmp/usr/share/common-lisp/source/alexandria/alexandria-1/numbers-tmpOU81XRV0.fasl ; compilation finished in 0:00:00.080 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/features.lisp" (written 25 OCT 2021 08:11:41 AM): ; wrote /tmp/usr/share/common-lisp/source/alexandria/alexandria-1/features-tmpY2ML9CFA.fasl ; compilation finished in 0:00:00.031 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-2/package.lisp" (written 25 OCT 2021 08:11:41 AM): ; wrote /tmp/usr/share/common-lisp/source/alexandria/alexandria-2/package-tmpX2JYJDQE.fasl ; compilation finished in 0:00:00.021 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-2/arrays.lisp" (written 25 OCT 2021 08:11:41 AM): ; wrote /tmp/usr/share/common-lisp/source/alexandria/alexandria-2/arrays-tmpOPCILR65.fasl ; compilation finished in 0:00:00.017 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-2/control-flow.lisp" (written 25 OCT 2021 08:11:41 AM): ; wrote /tmp/usr/share/common-lisp/source/alexandria/alexandria-2/control-flow-tmpRV9F8A9A.fasl ; compilation finished in 0:00:00.035 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-2/sequences.lisp" (written 25 OCT 2021 08:11:41 AM): ; wrote /tmp/usr/share/common-lisp/source/alexandria/alexandria-2/sequences-tmpK2ZAJT4I.fasl ; compilation finished in 0:00:00.009 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-2/lists.lisp" (written 25 OCT 2021 08:11:41 AM): ; wrote /tmp/usr/share/common-lisp/source/alexandria/alexandria-2/lists-tmpUX5S4ADN.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/trivial-features/src/tf-sbcl.lisp" (written 28 FEB 2021 08:31:40 PM): ; wrote /tmp/usr/share/common-lisp/source/trivial-features/src/tf-sbcl-tmp10401X32.fasl ; compilation finished in 0:00:00.011 ; compiling file "/usr/share/common-lisp/source/babel/src/packages.lisp" (written 19 JUL 2020 06:57:54 AM): ; wrote /tmp/usr/share/common-lisp/source/babel/src/packages-tmpZ7CBRM0G.fasl ; compilation finished in 0:00:00.007 ; compiling file "/usr/share/common-lisp/source/babel/src/encodings.lisp" (written 19 JUL 2020 06:57:54 AM): ; wrote /tmp/usr/share/common-lisp/source/babel/src/encodings-tmp9OZEQ0G2.fasl ; compilation finished in 0:00:00.104 ; compiling file "/usr/share/common-lisp/source/babel/src/enc-ascii.lisp" (written 19 JUL 2020 06:57:54 AM): ; wrote /tmp/usr/share/common-lisp/source/babel/src/enc-ascii-tmpB2JTL1W9.fasl ; compilation finished in 0:00:00.014 ; compiling file "/usr/share/common-lisp/source/babel/src/enc-ebcdic.lisp" (written 19 JUL 2020 06:57:54 AM): ; wrote /tmp/usr/share/common-lisp/source/babel/src/enc-ebcdic-tmpP3BI68WQ.fasl ; compilation finished in 0:00:00.028 ; compiling file "/usr/share/common-lisp/source/babel/src/enc-ebcdic-int.lisp" (written 19 JUL 2020 06:57:54 AM): ; wrote /tmp/usr/share/common-lisp/source/babel/src/enc-ebcdic-int-tmpQDARA81Z.fasl ; compilation finished in 0:00:00.011 ; compiling file "/usr/share/common-lisp/source/babel/src/enc-iso-8859.lisp" (written 19 JUL 2020 06:57:54 AM): ; wrote /tmp/usr/share/common-lisp/source/babel/src/enc-iso-8859-tmpYEMMM7SE.fasl ; compilation finished in 0:00:00.107 ; compiling file "/usr/share/common-lisp/source/babel/src/enc-unicode.lisp" (written 19 JUL 2020 06:57:54 AM): ; wrote /tmp/usr/share/common-lisp/source/babel/src/enc-unicode-tmp73HU0RPK.fasl ; compilation finished in 0:00:00.189 ; compiling file "/usr/share/common-lisp/source/babel/src/enc-cp437.lisp" (written 19 JUL 2020 06:57:54 AM): ; wrote /tmp/usr/share/common-lisp/source/babel/src/enc-cp437-tmpIO5N7K88.fasl ; compilation finished in 0:00:00.015 ; compiling file "/usr/share/common-lisp/source/babel/src/enc-cp1251.lisp" (written 19 JUL 2020 06:57:54 AM): ; wrote /tmp/usr/share/common-lisp/source/babel/src/enc-cp1251-tmpCM21U60Z.fasl ; compilation finished in 0:00:00.020 ; compiling file "/usr/share/common-lisp/source/babel/src/enc-cp1252.lisp" (written 19 JUL 2020 06:57:54 AM): ; wrote /tmp/usr/share/common-lisp/source/babel/src/enc-cp1252-tmp9DT7SEFG.fasl ; compilation finished in 0:00:00.013 ; compiling file "/usr/share/common-lisp/source/babel/src/jpn-table.lisp" (written 19 JUL 2020 06:57:54 AM): ; wrote /tmp/usr/share/common-lisp/source/babel/src/jpn-table-tmp8065ESJT.fasl ; compilation finished in 0:00:00.083 ; compiling file "/usr/share/common-lisp/source/babel/src/enc-jpn.lisp" (written 19 JUL 2020 06:57:54 AM): ; wrote /tmp/usr/share/common-lisp/source/babel/src/enc-jpn-tmp7S8Z6FGF.fasl ; compilation finished in 0:00:00.039 ; compiling file "/usr/share/common-lisp/source/babel/src/enc-gbk.lisp" (written 19 JUL 2020 06:57:54 AM): ; wrote /tmp/usr/share/common-lisp/source/babel/src/enc-gbk-tmpSIT3QPKP.fasl ; compilation finished in 0:00:00.037 ; compiling file "/usr/share/common-lisp/source/babel/src/enc-koi8.lisp" (written 19 JUL 2020 06:57:54 AM): ; wrote /tmp/usr/share/common-lisp/source/babel/src/enc-koi8-tmpE0PA0714.fasl ; compilation finished in 0:00:00.014 ; compiling file "/usr/share/common-lisp/source/babel/src/external-format.lisp" (written 19 JUL 2020 06:57:54 AM): ; wrote /tmp/usr/share/common-lisp/source/babel/src/external-format-tmpJRWHHVG0.fasl ; compilation finished in 0:00:00.011 ; compiling file "/usr/share/common-lisp/source/babel/src/strings.lisp" (written 19 JUL 2020 06:57:54 AM): ; wrote /tmp/usr/share/common-lisp/source/babel/src/strings-tmp4WZVROCX.fasl ; compilation finished in 0:00:09.787 ; compiling file "/usr/share/common-lisp/source/babel/src/gbk-map.lisp" (written 19 JUL 2020 06:57:54 AM): ; wrote /tmp/usr/share/common-lisp/source/babel/src/gbk-map-tmpA0I3UKX8.fasl ; compilation finished in 0:00:00.135 ; compiling file "/usr/share/common-lisp/source/babel/src/sharp-backslash.lisp" (written 19 JUL 2020 06:57:54 AM): ; wrote /tmp/usr/share/common-lisp/source/babel/src/sharp-backslash-tmp267Y2N80.fasl ; compilation finished in 0:00:00.057 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/cffi-sbcl.lisp" (written 03 APR 2021 02:35:42 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-cffi/src/cffi-sbcl-tmpOUPE5FSJ.fasl ; compilation finished in 0:00:00.358 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/package.lisp" (written 03 APR 2021 02:35:42 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-cffi/src/package-tmpIGHCU6ZA.fasl ; compilation finished in 0:00:00.019 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/utils.lisp" (written 03 APR 2021 02:35:42 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-cffi/src/utils-tmpBO0TUGLK.fasl ; compilation finished in 0:00:00.031 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/libraries.lisp" (written 03 APR 2021 02:35:42 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-cffi/src/libraries-tmpIIXPIQNW.fasl ; compilation finished in 0:00:00.113 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/early-types.lisp" (written 03 APR 2021 02:35:42 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-cffi/src/early-types-tmpOHM494YR.fasl ; compilation finished in 0:00:00.262 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/types.lisp" (written 03 APR 2021 02:35:42 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-cffi/src/types-tmpOVFB07XF.fasl ; compilation finished in 0:00:00.291 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/enum.lisp" (written 03 APR 2021 02:35:42 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-cffi/src/enum-tmpG6VFGMYP.fasl ; compilation finished in 0:00:00.109 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/strings.lisp" (written 03 APR 2021 02:35:42 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-cffi/src/strings-tmp4QIPRMOF.fasl ; compilation finished in 0:00:01.419 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/structures.lisp" (written 03 APR 2021 02:35:42 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-cffi/src/structures-tmpGW0QV22K.fasl ; compilation finished in 0:00:00.058 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/functions.lisp" (written 03 APR 2021 02:35:42 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-cffi/src/functions-tmp2K9J0HSR.fasl ; compilation finished in 0:00:00.123 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/foreign-vars.lisp" (written 03 APR 2021 02:35:42 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-cffi/src/foreign-vars-tmpP44I4E0Y.fasl ; compilation finished in 0:00:00.016 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/features.lisp" (written 03 APR 2021 02:35:42 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-cffi/src/features-tmp63LQ7EX6.fasl ; compilation finished in 0:00:00.014 ; compiling file "/usr/share/common-lisp/source/cl-cffi/toolchain/package.lisp" (written 03 APR 2021 02:35:42 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-cffi/toolchain/package-tmp86F1A8FB.fasl ; compilation finished in 0:00:00.014 ; compiling file "/usr/share/common-lisp/source/cl-cffi/toolchain/c-toolchain.lisp" (written 03 APR 2021 02:35:42 PM): ; file: /usr/share/common-lisp/source/cl-cffi/toolchain/c-toolchain.lisp ; in: DEFUN DEFAULT-TOOLCHAIN-PARAMETERS ; (OR (UIOP/OS:GETENVP "CC") "cc" "gcc") ; --> IF LET IF ; ==> ; "gcc" ; ; note: deleting unreachable code ; wrote /tmp/usr/share/common-lisp/source/cl-cffi/toolchain/c-toolchain-tmpH7D4HL98.fasl ; compilation finished in 0:00:00.178 ; compiling file "/usr/share/common-lisp/source/cl-cffi/toolchain/static-link.lisp" (written 03 APR 2021 02:35:42 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-cffi/toolchain/static-link-tmpCDM7YXYI.fasl ; compilation finished in 0:00:00.029 ; compiling file "/usr/share/common-lisp/source/cl-cffi/grovel/package.lisp" (written 03 APR 2021 02:35:42 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-cffi/grovel/package-tmpLM57P5P.fasl ; compilation finished in 0:00:00.028 ; compiling file "/usr/share/common-lisp/source/cl-cffi/grovel/grovel.lisp" (written 03 APR 2021 02:35:42 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-cffi/grovel/grovel-tmpZE69DN33.fasl ; compilation finished in 0:00:00.263 ; compiling file "/usr/share/common-lisp/source/cl-cffi/grovel/asdf.lisp" (written 03 APR 2021 02:35:42 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-cffi/grovel/asdf-tmpG8099TO3.fasl ; compilation finished in 0:00:00.044 ; ; compilation unit finished ; printed 4 notes WARNING: System definition file #P"/usr/share/common-lisp/source/cl-ppcre/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"/usr/share/common-lisp/source/cl-interpol/cl-interpol.asd" contains definition for system "cl-interpol-test". Please only define "cl-interpol" and secondary systems with a name starting with "cl-interpol/" (e.g. "cl-interpol/test") in that file. ; compiling file "/usr/share/common-lisp/source/anaphora/packages.lisp" (written 11 JAN 2021 12:20:58 PM): ; wrote /tmp/usr/share/common-lisp/source/anaphora/packages-tmpTASQCYAW.fasl ; compilation finished in 0:00:00.014 ; compiling file "/usr/share/common-lisp/source/anaphora/early.lisp" (written 11 JAN 2021 12:20:58 PM): ; wrote /tmp/usr/share/common-lisp/source/anaphora/early-tmp35U57IV6.fasl ; compilation finished in 0:00:00.011 ; compiling file "/usr/share/common-lisp/source/anaphora/symbolic.lisp" (written 11 JAN 2021 12:20:58 PM): ; wrote /tmp/usr/share/common-lisp/source/anaphora/symbolic-tmpTZOONXRW.fasl ; compilation finished in 0:00:00.029 ; compiling file "/usr/share/common-lisp/source/anaphora/anaphora.lisp" (written 11 JAN 2021 12:20:58 PM): ; wrote /tmp/usr/share/common-lisp/source/anaphora/anaphora-tmpWN0UKDSV.fasl ; compilation finished in 0:00:00.053 ; compiling file "/usr/share/common-lisp/source/cl-trivial-gray-streams/package.lisp" (written 17 JAN 2021 08:01:37 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-trivial-gray-streams/package-tmpBF3HHBTQ.fasl ; compilation finished in 0:00:00.011 ; compiling file "/usr/share/common-lisp/source/cl-trivial-gray-streams/streams.lisp" (written 17 JAN 2021 08:01:37 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-trivial-gray-streams/streams-tmpGYUNPZCY.fasl ; compilation finished in 0:00:00.030 ; compiling file "/usr/share/common-lisp/source/babel/src/streams.lisp" (written 19 JUL 2020 06:57:54 AM): ; file: /usr/share/common-lisp/source/babel/src/streams.lisp ; in: DEFUN VECTOR-EXTEND ; (SETF (FILL-POINTER VECTOR) BABEL-STREAMS::NEW-LENGTH) ; ; note: doing signed word to integer coercion (cost 20) ; (ADJUST-ARRAY VECTOR ; (MAX (* 2 BABEL-STREAMS::ORIGINAL-DIMENSION) ; BABEL-STREAMS::NEW-LENGTH)) ; ; note: doing signed word to integer coercion (cost 20) ; in: DEFUN MAKE-IN-MEMORY-INPUT-STREAM ; (LENGTH BABEL-STREAMS::DATA) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; in: DEFMETHOD STREAM-READ-BYTE (VECTOR-INPUT-STREAM) ; (< BABEL-STREAMS::INDEX (BABEL-STREAMS::VECTOR-STREAM-END STREAM)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second 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 FLOAT. ; The second argument is a REAL, not a RATIONAL. ; (INCF (BABEL-STREAMS::VECTOR-STREAM-INDEX STREAM)) ; ==> ; (+ 1 (BABEL-STREAMS::VECTOR-STREAM-INDEX #:STREAM3)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (AREF (BABEL-STREAMS::VECTOR-STREAM-VECTOR STREAM) BABEL-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (< BABEL-STREAMS::INDEX (BABEL-STREAMS::VECTOR-STREAM-END STREAM)) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a 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. ; (INCF (BABEL-STREAMS::VECTOR-STREAM-INDEX STREAM)) ; ==> ; (+ 1 (BABEL-STREAMS::VECTOR-STREAM-INDEX #:STREAM3)) ; ; 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 &REST T). ; 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 &REST T). ; etc. ; in: DEFMETHOD STREAM-LISTEN (VECTOR-INPUT-STREAM) ; (< (BABEL-STREAMS::VECTOR-STREAM-INDEX STREAM) ; (BABEL-STREAMS::VECTOR-STREAM-END STREAM)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second 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 FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a 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. ; in: DEFMETHOD STREAM-READ-SEQUENCE (VECTOR-INPUT-STREAM T T T) ; (AREF VECTOR BABEL-STREAMS::VECTOR-INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (ELT SEQUENCE BABEL-STREAMS::INDEX) ; (AREF VECTOR BABEL-STREAMS::VECTOR-INDEX)) ; ; 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. ; (INCF (BABEL-STREAMS::VECTOR-STREAM-INDEX STREAM)) ; ==> ; (+ 1 (BABEL-STREAMS::VECTOR-STREAM-INDEX #:STREAM8)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; 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 &REST T). ; 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 &REST T). ; etc. ; in: DEFMETHOD STREAM-WRITE-BYTE (VECTOR-OUTPUT-STREAM T) ; (INCF (BABEL-STREAMS::VECTOR-STREAM-INDEX STREAM)) ; ==> ; (+ 1 (BABEL-STREAMS::VECTOR-STREAM-INDEX #:STREAM6)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; 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 &REST T). ; 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 &REST T). ; etc. ; in: DEFUN EXTEND-VECTOR-OUTPUT-STREAM-BUFFER ; (INCF (BABEL-STREAMS::VECTOR-STREAM-INDEX STREAM) ; (- BABEL-STREAMS::END BABEL-STREAMS::START)) ; ==> ; (+ (- BABEL-STREAMS::END BABEL-STREAMS::START) ; (BABEL-STREAMS::VECTOR-STREAM-INDEX #:STREAM20)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The second argument is a T, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; etc. ; (BABEL-STREAMS::VECTOR-EXTEND BABEL-STREAMS::EXTENSION ; (BABEL-STREAMS::VECTOR-STREAM-VECTOR STREAM) :START BABEL-STREAMS::START ; :END BABEL-STREAMS::END) ; --> BLOCK LET* SETF ; ==> ; (SB-KERNEL:%SET-FILL-POINTER VECTOR BABEL-STREAMS::NEW-LENGTH) ; ; note: doing signed word to integer coercion (cost 20) ; --> BLOCK LET* WHEN IF SETF SETQ THE ; ==> ; (ADJUST-ARRAY VECTOR ; (MAX (* 2 BABEL-STREAMS::ORIGINAL-DIMENSION) ; BABEL-STREAMS::NEW-LENGTH)) ; ; note: doing signed word to integer coercion (cost 20) ; in: DEFMETHOD STREAM-WRITE-CHAR (VECTOR-OUTPUT-STREAM T) ; (STRING CHAR) ; ; 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 STRING. ; (BABEL-STREAMS::EXTEND-VECTOR-OUTPUT-STREAM-BUFFER BABEL-STREAMS::OCTETS ; STREAM) ; --> BLOCK INCF LET* ; ==> ; (+ (- BABEL-STREAMS::END BABEL-STREAMS::START) ; (BABEL-STREAMS::VECTOR-STREAM-INDEX #:STREAM23)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The second argument is a T, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; etc. ; --> BLOCK BABEL-STREAMS::VECTOR-EXTEND BLOCK LET* SETF ; ==> ; (SB-KERNEL:%SET-FILL-POINTER VECTOR BABEL-STREAMS::NEW-LENGTH) ; ; note: doing signed word to integer coercion (cost 20) ; --> BLOCK BABEL-STREAMS::VECTOR-EXTEND BLOCK LET* WHEN IF SETF SETQ THE ; ==> ; (ADJUST-ARRAY VECTOR ; (MAX (* 2 BABEL-STREAMS::ORIGINAL-DIMENSION) ; BABEL-STREAMS::NEW-LENGTH)) ; ; note: doing signed word to integer coercion (cost 20) ; in: DEFMETHOD STREAM-WRITE-SEQUENCE (VECTOR-OUTPUT-STREAM T T T) ; (BABEL-STREAMS::EXTEND-VECTOR-OUTPUT-STREAM-BUFFER SEQUENCE STREAM :START ; BABEL-STREAMS::START :END BABEL-STREAMS::END) ; --> INCF LET* ; ==> ; (+ (- BABEL-STREAMS::END BABEL-STREAMS::START) ; (BABEL-STREAMS::VECTOR-STREAM-INDEX #:STREAM172)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ==> ; (+ (- BABEL-STREAMS::END BABEL-STREAMS::START) ; (BABEL-STREAMS::VECTOR-STREAM-INDEX #:STREAM130)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> BLOCK INCF LET* ; ==> ; (+ (- BABEL-STREAMS::END BABEL-STREAMS::START) ; (BABEL-STREAMS::VECTOR-STREAM-INDEX #:STREAM68)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; (BABEL-STREAMS::EXTEND-VECTOR-OUTPUT-STREAM-BUFFER BABEL-STREAMS::OCTETS ; STREAM) ; --> BLOCK INCF LET* ; ==> ; (+ (- BABEL-STREAMS::END BABEL-STREAMS::START) ; (BABEL-STREAMS::VECTOR-STREAM-INDEX #:STREAM31)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; (BABEL-STREAMS::EXTEND-VECTOR-OUTPUT-STREAM-BUFFER SEQUENCE STREAM :START ; BABEL-STREAMS::START :END BABEL-STREAMS::END) ; --> INCF LET* ; ==> ; (+ (- BABEL-STREAMS::END BABEL-STREAMS::START) ; (BABEL-STREAMS::VECTOR-STREAM-INDEX #:STREAM172)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The second argument is a T, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; etc. ; ==> ; (+ (- BABEL-STREAMS::END BABEL-STREAMS::START) ; (BABEL-STREAMS::VECTOR-STREAM-INDEX #:STREAM130)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The second argument is a T, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; etc. ; --> BLOCK INCF LET* ; ==> ; (+ (- BABEL-STREAMS::END BABEL-STREAMS::START) ; (BABEL-STREAMS::VECTOR-STREAM-INDEX #:STREAM68)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The second argument is a T, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; etc. ; (BABEL-STREAMS::EXTEND-VECTOR-OUTPUT-STREAM-BUFFER BABEL-STREAMS::OCTETS ; STREAM) ; --> BLOCK INCF LET* ; ==> ; (+ (- BABEL-STREAMS::END BABEL-STREAMS::START) ; (BABEL-STREAMS::VECTOR-STREAM-INDEX #:STREAM31)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The second argument is a T, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; etc. ; --> BLOCK BABEL-STREAMS::VECTOR-EXTEND BLOCK LET* SETF ; ==> ; (SB-KERNEL:%SET-FILL-POINTER VECTOR BABEL-STREAMS::NEW-LENGTH) ; ; note: doing signed word to integer coercion (cost 20) ; --> BLOCK BABEL-STREAMS::VECTOR-EXTEND BLOCK LET* WHEN IF SETF SETQ THE ; ==> ; (ADJUST-ARRAY VECTOR ; (MAX (* 2 BABEL-STREAMS::ORIGINAL-DIMENSION) ; BABEL-STREAMS::NEW-LENGTH)) ; ; note: doing signed word to integer coercion (cost 20) ; (BABEL-STREAMS::EXTEND-VECTOR-OUTPUT-STREAM-BUFFER SEQUENCE STREAM :START ; BABEL-STREAMS::START :END BABEL-STREAMS::END) ; --> BLOCK BABEL-STREAMS::VECTOR-EXTEND BLOCK LET* SETF ; ==> ; (SB-KERNEL:%SET-FILL-POINTER VECTOR BABEL-STREAMS::NEW-LENGTH) ; ; note: doing signed word to integer coercion (cost 20) ; --> BLOCK BABEL-STREAMS::VECTOR-EXTEND BLOCK LET* WHEN IF SETF SETQ THE ; ==> ; (ADJUST-ARRAY VECTOR ; (MAX (* 2 BABEL-STREAMS::ORIGINAL-DIMENSION) ; BABEL-STREAMS::NEW-LENGTH)) ; ; note: doing signed word to integer coercion (cost 20) ; --> BABEL-STREAMS::VECTOR-EXTEND BLOCK LET* SETF ; ==> ; (SB-KERNEL:%SET-FILL-POINTER VECTOR BABEL-STREAMS::NEW-LENGTH) ; ; note: doing signed word to integer coercion (cost 20) ; --> BABEL-STREAMS::VECTOR-EXTEND BLOCK LET* WHEN IF SETF SETQ THE ; ==> ; (ADJUST-ARRAY VECTOR ; (MAX (* 2 BABEL-STREAMS::ORIGINAL-DIMENSION) ; BABEL-STREAMS::NEW-LENGTH)) ; ; note: doing signed word to integer coercion (cost 20) ; --> BABEL-STREAMS::VECTOR-EXTEND BLOCK LET* SETF ; ==> ; (SB-KERNEL:%SET-FILL-POINTER VECTOR BABEL-STREAMS::NEW-LENGTH) ; ; note: doing signed word to integer coercion (cost 20) ; --> BABEL-STREAMS::VECTOR-EXTEND BLOCK LET* WHEN IF SETF SETQ THE ; ==> ; (ADJUST-ARRAY VECTOR ; (MAX (* 2 BABEL-STREAMS::ORIGINAL-DIMENSION) ; BABEL-STREAMS::NEW-LENGTH)) ; ; note: doing signed word to integer coercion (cost 20) ; in: DEFUN MAKE-VECTOR-STREAM-BUFFER ; (MAKE-ARRAY (THE ALEXANDRIA:ARRAY-INDEX (OR BABEL-STREAMS::INITIAL-SIZE 32)) ; :ADJUSTABLE T :FILL-POINTER 0 :ELEMENT-TYPE ; BABEL-STREAMS::ELEMENT-TYPE) ; ; note: unable to optimize because: ELEMENT-TYPE is not constant. ; wrote /tmp/usr/share/common-lisp/source/babel/src/streams-tmpD68Q8WCA.fasl ; compilation finished in 0:00:00.092 ; compiling file "/usr/share/common-lisp/source/bordeaux-threads/src/pkgdcl.lisp" (written 07 JUN 2020 09:11:43 PM): ; wrote /tmp/usr/share/common-lisp/source/bordeaux-threads/src/pkgdcl-tmp7MK9KM9C.fasl ; compilation finished in 0:00:00.003 ; compiling file "/usr/share/common-lisp/source/bordeaux-threads/src/bordeaux-threads.lisp" (written 07 JUN 2020 09:11:43 PM): ; wrote /tmp/usr/share/common-lisp/source/bordeaux-threads/src/bordeaux-threads-tmpJJ71X849.fasl ; compilation finished in 0:00:00.044 ; compiling file "/usr/share/common-lisp/source/bordeaux-threads/src/impl-sbcl.lisp" (written 07 JUN 2020 09:11:43 PM): ; wrote /tmp/usr/share/common-lisp/source/bordeaux-threads/src/impl-sbcl-tmp1VUK6SR2.fasl ; compilation finished in 0:00:00.030 ; compiling file "/usr/share/common-lisp/source/bordeaux-threads/src/default-implementations.lisp" (written 07 JUN 2020 09:11:43 PM): ; wrote /tmp/usr/share/common-lisp/source/bordeaux-threads/src/default-implementations-tmpR2FIHSUG.fasl ; compilation finished in 0:00:00.053 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/packages.lisp" (written 07 APR 2019 03:51:26 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-ppcre/packages-tmp8PYELRKX.fasl ; compilation finished in 0:00:00.008 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/specials.lisp" (written 07 APR 2019 03:51:26 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-ppcre/specials-tmpEHTOKYT0.fasl ; compilation finished in 0:00:00.017 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/util.lisp" (written 07 APR 2019 03:51:26 PM): ; file: /usr/share/common-lisp/source/cl-ppcre/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 (SIMPLE-ARRAY * (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a STRING, not a SIMPLE-BASE-STRING. ; 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 /tmp/usr/share/common-lisp/source/cl-ppcre/util-tmpS6U1VHI9.fasl ; compilation finished in 0:00:00.040 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/errors.lisp" (written 07 APR 2019 03:51:26 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-ppcre/errors-tmpVTFK6ZJW.fasl ; compilation finished in 0:00:00.017 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/charset.lisp" (written 07 APR 2019 03:51:26 PM): ; file: /usr/share/common-lisp/source/cl-ppcre/charset.lisp ; in: DEFUN MIX ; (+ CL-PPCRE::CODE CL-PPCRE::HASH) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 ; &REST T). ; etc. ; in: DEFUN COMPUTE-INDEX ; (LENGTH VECTOR) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (MOD CL-PPCRE::HASH (1- (LENGTH VECTOR))) ; ; 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. ; (1+ (MOD CL-PPCRE::HASH (1- (LENGTH VECTOR)))) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL (-4611686018427387899) ; (4611686018427387899))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL (-4611686018427387899) ; (4611686018427387899))), not a RATIONAL. ; (MOD CL-PPCRE::HASH (1- (LENGTH VECTOR))) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL (-4611686018427387899) ; (4611686018427387899))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL (-4611686018427387899) ; (4611686018427387899))), not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT ; (RATIONAL (-4611686018427387899) ; (4611686018427387899))), not a FIXNUM. ; The result is a (VALUES ; (OR FLOAT ; (RATIONAL (-4611686018427387900) ; (9223372036854775798))) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a (OR FLOAT ; (RATIONAL (-4611686018427387899) ; (4611686018427387899))), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (OR FLOAT ; (RATIONAL (-4611686018427387900) ; (9223372036854775798))) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a (RATIONAL (-4611686018427387900) ; (9223372036854775798)), not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (RATIONAL (-4611686018427387900) ; (9223372036854775798)), not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a (RATIONAL (-4611686018427387899) ; (9223372036854775798)), not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (RATIONAL (-4611686018427387899) ; (9223372036854775798)), not a FIXNUM. ; etc. ; (1+ (MOD CL-PPCRE::HASH (1- (LENGTH VECTOR)))) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a (OR FLOAT ; (RATIONAL (-4611686018427387899) ; (4611686018427387899))), not a FIXNUM. ; The result is a (VALUES ; (OR FLOAT ; (RATIONAL (-4611686018427387898) ; (4611686018427387900))) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT ; (RATIONAL (-4611686018427387899) ; (4611686018427387899))), not a FIXNUM. ; The result is a (VALUES ; (OR FLOAT ; (RATIONAL (-4611686018427387898) ; (4611686018427387900))) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; in: DEFUN %ADD-TO-CHARSET/EXPAND ; (* 2 CL-PPCRE::NEW-SIZE) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; ; 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. ; (>= 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 FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (DOUBLE-FLOAT * 371370.0d0) ; (SINGLE-FLOAT * 371370.0) ; (RATIONAL * 371370)), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (* 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 &REST T). ; 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 &REST T). ; etc. ; (>= CL-PPCRE::NEW-SIZE 371370) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; (* 2 (LENGTH CL-PPCRE::OLD-VECTOR)) ; ; note: doing unsigned word to integer coercion (cost 20), for: ; the first result of inline ASH ; 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 ; &REST ; T). ; 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 ; &REST ; T). ; etc. ; in: DEFUN CREATE-CHARSET-FROM-TEST-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 ; (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 >= ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second 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 FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second 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 FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to open code because: The operands might not be the same type. ; ; 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 DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; 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. ; wrote /tmp/usr/share/common-lisp/source/cl-ppcre/charset-tmp75WVSJEW.fasl ; compilation finished in 0:00:00.058 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/charmap.lisp" (written 07 APR 2019 03:51:26 PM): ; file: /usr/share/common-lisp/source/cl-ppcre/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 ; in: DEFUN CREATE-CHARMAP-FROM-TEST-FUNCTION ; (1- CL-PPCRE::END) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (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 #:LOOP-LIMIT-23) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second 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 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 ; (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 >= ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second 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 FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second 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 FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to open code because: The operands might not be the same type. ; ; 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 DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; 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. ; (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 &REST T). ; 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 &REST T). ; 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 #:LOOP-LIMIT-23) ; ; 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 /tmp/usr/share/common-lisp/source/cl-ppcre/charmap-tmpBU5UM3S4.fasl ; compilation finished in 0:00:00.064 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/chartest.lisp" (written 07 APR 2019 03:51:26 PM): ; file: /usr/share/common-lisp/source/cl-ppcre/chartest.lisp ; in: DEFUN CREATE-HASH-TABLE-FROM-TEST-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 ; (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 >= ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second 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 FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second 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 FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to open code because: The operands might not be the same type. ; ; 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 DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; 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. ; in: DEFUN CREATE-OPTIMIZED-TEST-FUNCTION ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; (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 ; convert division by 2^k to shift ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; convert integer division to multiplication ; due to type uncertainty: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; ; note: unable to ; convert integer division to multiplication ; due to type uncertainty: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-2) (2))), not a FLOAT. ; ; 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 FLOAT. ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; (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 ; convert division by 2^k to shift ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; convert integer division to multiplication ; due to type uncertainty: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; ; note: unable to ; convert integer division to multiplication ; due to type uncertainty: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-2) (2))), not a FLOAT. ; ; 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 FLOAT. ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 ; &REST T). ; etc. ; (CEILING (- CL-PPCRE::END CL-PPCRE::START) 2) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; (<= (HASH-TABLE-COUNT HASH-TABLE) ; (CEILING (- CL-PPCRE::END CL-PPCRE::START) 2)) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a INTEGER, not a FIXNUM. ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 ; &REST T). ; etc. ; (CEILING (- CL-PPCRE::END CL-PPCRE::START) 2) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; (<= (CL-PPCRE::CHARSET-COUNT CL-PPCRE::CHARSET) ; (CEILING (- CL-PPCRE::END CL-PPCRE::START) 2)) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a INTEGER, not a FIXNUM. ; wrote /tmp/usr/share/common-lisp/source/cl-ppcre/chartest-tmpOBHVA3CD.fasl ; compilation finished in 0:00:00.029 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/lexer.lisp" (written 07 APR 2019 03:51:26 PM): ; file: /usr/share/common-lisp/source/cl-ppcre/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 ; in: DEFUN GET-NUMBER ; (IF (< CL-PPCRE::END-POS CL-PPCRE::LEXER-LEN) ; CL-PPCRE::END-POS ; CL-PPCRE::LEXER-LEN) ; ; note: doing signed word to integer coercion (cost 20) ; 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 /tmp/usr/share/common-lisp/source/cl-ppcre/lexer-tmpJ6ELVFLF.fasl ; compilation finished in 0:00:00.110 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/parser.lisp" (written 07 APR 2019 03:51:26 PM): ; file: /usr/share/common-lisp/source/cl-ppcre/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 ; wrote /tmp/usr/share/common-lisp/source/cl-ppcre/parser-tmpULDB0RG.fasl ; compilation finished in 0:00:00.046 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/regex-class.lisp" (written 07 APR 2019 03:51:26 PM): ; file: /usr/share/common-lisp/source/cl-ppcre/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-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT SIMPLE-BASE-STRING) ; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; (LENGTH (CL-PPCRE::STR CL-PPCRE::STR)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; wrote /tmp/usr/share/common-lisp/source/cl-ppcre/regex-class-tmpUTZ0UUTE.fasl ; compilation finished in 0:00:00.015 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/regex-class-util.lisp" (written 07 APR 2019 03:51:26 PM): ; file: /usr/share/common-lisp/source/cl-ppcre/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 FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to open code because: The operands might not be the same type. ; 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. ; in: DEFMETHOD EVERYTHINGP (ALTERNATION) ; (AND (= 1 (LENGTH CL-PPCRE::CHOICES)) ; (CL-PPCRE::EVERYTHINGP (FIRST CL-PPCRE::CHOICES))) ; --> = ; ==> ; (LENGTH ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'CL-PPCRE::CHOICES) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'CL-PPCRE::CHOICES))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; in: DEFMETHOD EVERYTHINGP (REPETITION) ; (AND CL-PPCRE::MAXIMUM (= 1 CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM) ; (CL-PPCRE::EVERYTHINGP CL-PPCRE::REGEX)) ; --> IF = ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (DOUBLE-FLOAT 1.0d0 1.0d0) (SINGLE-FLOAT 1.0 1.0) ; (INTEGER 1 1) ; (COMPLEX (DOUBLE-FLOAT 1.0d0 1.0d0)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX (INTEGER 1 1))), not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (DOUBLE-FLOAT 1.0d0 1.0d0) (SINGLE-FLOAT 1.0 1.0) ; (INTEGER 1 1) ; (COMPLEX (DOUBLE-FLOAT 1.0d0 1.0d0)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX (INTEGER 1 1))), not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (DOUBLE-FLOAT 1.0d0 1.0d0) (SINGLE-FLOAT 1.0 1.0) ; (INTEGER 1 1) ; (COMPLEX (DOUBLE-FLOAT 1.0d0 1.0d0)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX (INTEGER 1 1))), not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (DOUBLE-FLOAT 1.0d0 1.0d0) (SINGLE-FLOAT 1.0 1.0) ; (INTEGER 1 1) ; (COMPLEX (DOUBLE-FLOAT 1.0d0 1.0d0)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX (INTEGER 1 1))), not a (COMPLEX ; DOUBLE-FLOAT). ; The second 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 (OR (DOUBLE-FLOAT 1.0d0 1.0d0) (SINGLE-FLOAT 1.0 1.0) ; (INTEGER 1 1) ; (COMPLEX (DOUBLE-FLOAT 1.0d0 1.0d0)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX (INTEGER 1 1))), not a 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 (DOUBLE-FLOAT 1.0d0 1.0d0) (SINGLE-FLOAT 1.0 1.0) ; (INTEGER 1 1) ; (COMPLEX (DOUBLE-FLOAT 1.0d0 1.0d0)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX (INTEGER 1 1))), not a (OR ; (COMPLEX ; SINGLE-FLOAT) ; (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. ; ; note: forced to do GENERIC-= (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a (OR (DOUBLE-FLOAT 1.0d0 1.0d0) ; (SINGLE-FLOAT 1.0 1.0) (INTEGER 1 1) ; (COMPLEX (DOUBLE-FLOAT 1.0d0 1.0d0)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX (INTEGER 1 1))), not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; unable to do inline float comparison (cost 3) because: ; The first argument is a (OR (DOUBLE-FLOAT 1.0d0 1.0d0) ; (SINGLE-FLOAT 1.0 1.0) (INTEGER 1 1) ; (COMPLEX (DOUBLE-FLOAT 1.0d0 1.0d0)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX (INTEGER 1 1))), not a (COMPLEX ; DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; 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 ; ==> ; (+ #:LOOP-SUM-5 CL-PPCRE::LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a (NOT NULL), not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 ; &REST T). ; etc. ; in: DEFMETHOD REGEX-LENGTH (ALTERNATION) ; (/= CL-PPCRE::LEN CL-PPCRE::OLD-LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second 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 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 (OR (COMPLEX SINGLE-FLOAT) ; (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. ; ; 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 DOUBLE-FLOAT. ; The second argument is a (NOT NULL), not a (COMPLEX DOUBLE-FLOAT). ; unable to do inline float comparison (cost 3) because: ; The first argument is a (NOT NULL), not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a (NOT NULL), not a (COMPLEX DOUBLE-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 float comparison (cost 4) because: ; The first argument is a (NOT NULL), not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; 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 (REPETITION) ; (WITH-SLOTS (CL-PPCRE::LEN CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM) ; CL-PPCRE::REPETITION ; (IF (AND CL-PPCRE::LEN (EQL CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM)) ; (* CL-PPCRE::MINIMUM CL-PPCRE::LEN) ; NIL)) ; --> SYMBOL-MACROLET IF ; ==> ; (* ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'CL-PPCRE::MINIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'CL-PPCRE::MINIMUM)) ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'CL-PPCRE::LEN) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::LEN))) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; convert x*2^k to shift ; due to type uncertainty: ; The first argument is a NUMBER, not a INTEGER. ; The second argument is a NUMBER, not a INTEGER. ; (AND CL-PPCRE::LEN (EQL CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM)) ; ==> ; (EQL ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'CL-PPCRE::MINIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'CL-PPCRE::MINIMUM)) ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'CL-PPCRE::MAXIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'CL-PPCRE::MAXIMUM))) ; ; note: forced to do IF-EQL (cost 15) ; unable to do inline float comparison (cost 4) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; 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. ; (WITH-SLOTS (CL-PPCRE::LEN CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM) ; CL-PPCRE::REPETITION ; (IF (AND CL-PPCRE::LEN (EQL CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM)) ; (* CL-PPCRE::MINIMUM CL-PPCRE::LEN) ; NIL)) ; --> SYMBOL-MACROLET IF ; ==> ; (* ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'CL-PPCRE::MINIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'CL-PPCRE::MINIMUM)) ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'CL-PPCRE::LEN) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 '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 &REST T). ; unable to do inline float arithmetic (cost 4) because: ; The first argument is a T, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a T, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (COMPLEX SINGLE-FLOAT) ; &REST T). ; 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 ; ==> ; (+ #:LOOP-SUM-5 CL-PPCRE::LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 ; &REST T). ; etc. ; 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) ; --> LET LET SB-LOOP::WITH-MINIMAX-VALUE LET TAGBODY ; --> SB-LOOP::LOOP-ACCUMULATE-MINIMAX-VALUE PROGN WHEN IF OR LET IF < IF ; ==> ; (< #:LOOP-MAXMIN-TEMP-9 #:LOOP-MAXMIN-8) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second 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 FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a 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. ; 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 conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second 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 FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second 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 FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to open code because: The operands might not be the same type. ; ; 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 DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; 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. ; in: DEFMETHOD REGEX-MIN-LENGTH (REPETITION) ; (* (CL-PPCRE::MINIMUM CL-PPCRE::REPETITION) ; (CL-PPCRE::MIN-LEN CL-PPCRE::REPETITION)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; convert x*2^k to shift ; due to type uncertainty: ; The first argument is a NUMBER, not a INTEGER. ; The second argument is a NUMBER, not a INTEGER. ; ; 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 &REST T). ; unable to do inline float arithmetic (cost 4) because: ; The first argument is a T, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a T, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (COMPLEX SINGLE-FLOAT) ; &REST T). ; etc. ; in: DEFMETHOD COMPUTE-OFFSETS (ALTERNATION T) ; (/= CL-PPCRE::CURR-OFFSET CL-PPCRE::OLD-OFFSET) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second 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 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 (OR (COMPLEX SINGLE-FLOAT) ; (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. ; ; 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 DOUBLE-FLOAT. ; The second argument is a (NOT NULL), not a (COMPLEX DOUBLE-FLOAT). ; unable to do inline float comparison (cost 3) because: ; The first argument is a (NOT NULL), not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a (NOT NULL), not a (COMPLEX DOUBLE-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 float comparison (cost 4) because: ; The first argument is a (NOT NULL), not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; 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 (REPETITION T) ; (WITH-SLOTS (CL-PPCRE::LEN CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM) ; CL-PPCRE::REPETITION ; (IF (AND CL-PPCRE::LEN (EQ CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM)) ; (+ CL-PPCRE::START-POS (* CL-PPCRE::MINIMUM CL-PPCRE::LEN)) ; NIL)) ; --> SYMBOL-MACROLET IF + ; ==> ; (* ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'CL-PPCRE::MINIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'CL-PPCRE::MINIMUM)) ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'CL-PPCRE::LEN) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::LEN))) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; convert x*2^k to shift ; due to type uncertainty: ; The first argument is a NUMBER, not a INTEGER. ; The second argument is a NUMBER, not a INTEGER. ; --> SYMBOL-MACROLET IF ; ==> ; (+ CL-PPCRE::START-POS ; (* ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'CL-PPCRE::MINIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'CL-PPCRE::MINIMUM)) ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'CL-PPCRE::LEN) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'CL-PPCRE::LEN)))) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; --> SYMBOL-MACROLET IF + ; ==> ; (* ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'CL-PPCRE::MINIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'CL-PPCRE::MINIMUM)) ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'CL-PPCRE::LEN) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 '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 &REST T). ; unable to do inline float arithmetic (cost 4) because: ; The first argument is a T, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a T, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (COMPLEX SINGLE-FLOAT) ; &REST T). ; etc. ; --> SYMBOL-MACROLET IF ; ==> ; (+ CL-PPCRE::START-POS ; (* ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'CL-PPCRE::MINIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'CL-PPCRE::MINIMUM)) ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'CL-PPCRE::LEN) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'CL-PPCRE::LEN)))) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 ; &REST T). ; etc. ; in: DEFMETHOD COMPUTE-OFFSETS (CHAR-CLASS T) ; (1+ CL-PPCRE::START-POS) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; 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 &REST T). ; 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 &REST T). ; etc. ; in: DEFMETHOD COMPUTE-OFFSETS (EVERYTHING T) ; (1+ CL-PPCRE::START-POS) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; 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 &REST T). ; 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 &REST T). ; etc. ; in: DEFMETHOD COMPUTE-OFFSETS (STR T) ; (+ CL-PPCRE::START-POS (CL-PPCRE::LEN CL-PPCRE::STR)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 ; &REST T). ; etc. ; in: DEFMETHOD COMPUTE-OFFSETS (FILTER T) ; (+ CL-PPCRE::START-POS CL-PPCRE::LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a (NOT NULL), not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 ; &REST T). ; etc. ; wrote /tmp/usr/share/common-lisp/source/cl-ppcre/regex-class-util-tmpOOSRA8PZ.fasl ; compilation finished in 0:00:00.245 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/convert.lisp" (written 07 APR 2019 03:51:26 PM): ; file: /usr/share/common-lisp/source/cl-ppcre/convert.lisp ; in: DEFUN CONVERT-CHAR-CLASS-TO-TEST-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. ; (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-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. ; (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 ; (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. ; (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. ; (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 ; in: DEFUN MAYBE-SPLIT-REPETITION ; (- CL-PPCRE::MAXIMUM CL-PPCRE::MINIMUM) ; ; note: doing signed word to integer coercion (cost 20) ; in: DEFUN MAYBE-ACCUMULATE ; (+ (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH) (CL-PPCRE::LEN CL-PPCRE::STR)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; (- (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH) (CL-PPCRE::LEN CL-PPCRE::STR)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; (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 #:NEW1 :START1 #:START :END1 NIL) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY * (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-BASE-STRING ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY CHARACTER ; (*)) ; &REST T). ; (+ (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH) (CL-PPCRE::LEN CL-PPCRE::STR)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 ; &REST T). ; etc. ; (- (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH) (CL-PPCRE::LEN CL-PPCRE::STR)) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 ; &REST T). ; etc. ; 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. ; in: DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ((EQL :GREEDY-REPETITION) T) ; (ZEROP LENGTH) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to open code because: The operands might not be the same type. ; 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. ; ; 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. ; 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 STRING. ; The second argument is a (OR STRING (AND (NOT NULL) SYMBOL) ; CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SIMPLE-STRING. ; The second argument is a (OR STRING (AND (NOT NULL) SYMBOL) ; CHARACTER), not a SIMPLE-STRING. ; (- CL-PPCRE::REG-NUM CL-PPCRE::REG-INDEX) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; (1- CL-PPCRE::BACKREF-NUMBER) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; (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. ; (- 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 &REST T). ; 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 UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; 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 &REST T). ; 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 &REST T). ; 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 ; &REST T). ; 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 ; &REST T). ; etc. ; 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-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT SIMPLE-BASE-STRING) ; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; wrote /tmp/usr/share/common-lisp/source/cl-ppcre/convert-tmpDMIL0RVK.fasl ; compilation finished in 0:00:00.242 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/optimize.lisp" (written 07 APR 2019 03:51:26 PM): ; file: /usr/share/common-lisp/source/cl-ppcre/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 (SIMPLE-ARRAY * (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a VECTOR, not a SIMPLE-BASE-STRING. ; (INCF CL-PPCRE::COLLECTOR-LENGTH (CL-PPCRE::LEN CL-PPCRE::ELEMENT)) ; --> THE ; ==> ; (+ (CL-PPCRE::LEN CL-PPCRE::ELEMENT) CL-PPCRE::COLLECTOR-LENGTH) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; (SETF (SUBSEQ CL-PPCRE::COLLECTOR CL-PPCRE::OLD-COLLECTOR-LENGTH) ; (CL-PPCRE::STR CL-PPCRE::ELEMENT) ; CL-PPCRE::SKIP (CL-PPCRE::SKIP CL-PPCRE::ELEMENT)) ; --> SETF LET* ; ==> ; (REPLACE #:SEQUENCE #:NEW1 :START1 #:START :END1 NIL) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY * (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES (SIMPLE-ARRAY * (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-BASE-STRING. ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES SIMPLE-BASE-STRING ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY CHARACTER (*)). ; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY CHARACTER ; (*)) ; &REST T). ; (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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a T, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; etc. ; 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 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. ; 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 FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to open code because: The operands might not be the same type. ; 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 FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (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 (OR LIST (SIMPLE-ARRAY * (*)) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST (SIMPLE-ARRAY * (*)) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST (SIMPLE-ARRAY * (*)) ; SB-KERNEL:EXTENDED-SEQUENCE), not a SIMPLE-BASE-STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR LIST (SIMPLE-ARRAY * (*)) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; (CHAR CL-PPCRE::STR CL-PPCRE::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; 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 < IF ; ==> ; (< #:LOOP-MAXMIN-TEMP-10 #:LOOP-MAXMIN-9) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second 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 FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a 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. ; 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 conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second 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 FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second 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 FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to open code because: The operands might not be the same type. ; ; 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 DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; 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. ; in: DEFMETHOD COMPUTE-MIN-REST (STR T) ; (+ CL-PPCRE::CURRENT-MIN-REST (CL-PPCRE::LEN CL-PPCRE::STR)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 ; &REST T). ; etc. ; in: DEFMETHOD COMPUTE-MIN-REST (FILTER T) ; (+ CL-PPCRE::CURRENT-MIN-REST (OR (CL-PPCRE::LEN CL-PPCRE::FILTER) 0)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a (NOT NULL), not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 ; &REST T). ; etc. ; in: DEFMETHOD COMPUTE-MIN-REST (REPETITION T) ; (* (CL-PPCRE::MINIMUM CL-PPCRE::REPETITION) ; (CL-PPCRE::MIN-LEN CL-PPCRE::REPETITION)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; convert x*2^k to shift ; due to type uncertainty: ; The first argument is a NUMBER, not a INTEGER. ; The second argument is a NUMBER, not a INTEGER. ; (+ CL-PPCRE::CURRENT-MIN-REST ; (* (CL-PPCRE::MINIMUM CL-PPCRE::REPETITION) ; (CL-PPCRE::MIN-LEN CL-PPCRE::REPETITION))) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; (* (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 &REST T). ; unable to do inline float arithmetic (cost 4) because: ; The first argument is a T, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a T, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (COMPLEX SINGLE-FLOAT) ; &REST T). ; 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 float arithmetic (cost 2) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 ; &REST T). ; etc. ; in: DEFMETHOD COMPUTE-MIN-REST (LOOKBEHIND T) ; (+ CL-PPCRE::CURRENT-MIN-REST (CL-PPCRE::LEN CL-PPCRE::LOOKBEHIND)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 ; &REST T). ; etc. ; in: DEFMETHOD COMPUTE-MIN-REST (REGEX T) ; (1+ CL-PPCRE::CURRENT-MIN-REST) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; 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 &REST T). ; 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 &REST T). ; etc. ; wrote /tmp/usr/share/common-lisp/source/cl-ppcre/optimize-tmp8MR9IMIO.fasl ; compilation finished in 0:00:00.097 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/closures.lisp" (written 07 APR 2019 03:51:26 PM): ; file: /usr/share/common-lisp/source/cl-ppcre/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. ; 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 ; 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 ; in: DEFMETHOD CREATE-MATCHER-AUX (STR T) ; (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. ; (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 ; ==> ; 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. ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::START-POS ; CL-PPCRE::NEXT-POS 0 CL-PPCRE::LEN) ; --> BLOCK LOOP BLOCK LET LET TAGBODY UNLESS IF CHAR-EQUAL ; ==> ; 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. ; (+ 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 ; 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 ; ==> ; 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. ; (+ CL-PPCRE::START-POS ; (- (THE FIXNUM CL-PPCRE::REG-END) (THE FIXNUM CL-PPCRE::REG-START))) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a (INTEGER -9223372036854775807 ; 9223372036854775807), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163711 13835058055282163710) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163711 13835058055282163710) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a (INTEGER -9223372036854775807 ; 9223372036854775807), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163711 13835058055282163710) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163711 13835058055282163710) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-+ ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-+ ; 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 /tmp/usr/share/common-lisp/source/cl-ppcre/closures-tmpJQDKAVAY.fasl ; compilation finished in 0:00:00.126 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/repetition-closures.lisp" (written 07 APR 2019 03:51:26 PM): ; file: /usr/share/common-lisp/source/cl-ppcre/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 ; (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. ; 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 ; ==> ; 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. ; The second argument is a CHARACTER, not a BASE-CHAR. ; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE ; (FUNCALL CL-PPCRE::INNER-MATCHER CL-PPCRE::CURR-POS)) ; --> LAMBDA FUNCTION LET 1+ ; ==> ; 1 ; ; note: forced to do GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: forced to do GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a FIXNUM. ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), not a FIXNUM. ; (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 1+ ; ==> ; 1 ; ; note: forced to do GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; --> LET CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: forced to do GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a FIXNUM. ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), 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 GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: forced to do GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a FIXNUM. ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), 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 GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: forced to do GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a FIXNUM. ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), not a FIXNUM. ; (CL-PPCRE::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 GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: forced to do GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a FIXNUM. ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), not a FIXNUM. ; (CL-PPCRE::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 GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: forced to do GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a FIXNUM. ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), not a FIXNUM. ; (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 GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a FIXNUM. ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), not a FIXNUM. ; --> LAMBDA FUNCTION LET 1+ ; ==> ; 1 ; ; note: forced to do GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE ; (FUNCALL CL-PPCRE::INNER-MATCHER CL-PPCRE::CURR-POS)) ; --> LAMBDA FUNCTION LET 1+ ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ; 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 1+ ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ; 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 1+ ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; --> 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 argument of GENERIC-- ; ; 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 1+ ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ; 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)) ; --> LAMBDA FUNCTION LET 1+ ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ; 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 1+ ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ; 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 1+ ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ; note: doing signed word to integer coercion (cost 20), for: ; the first result of inline (signed-byte 64) arithmetic ; 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 ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> + AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> SB-IMPL::XSUBTRACT AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; in: DEFMETHOD CREATE-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 ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> + AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> SB-IMPL::XSUBTRACT AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; 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 ; (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 ; ==> ; 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. ; (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. ; 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 ; ==> ; 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. ; (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 1+ ; ==> ; 1 ; ; note: forced to do GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: forced to do GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a FIXNUM. ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), 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)) ; --> LAMBDA FUNCTION LET 1+ ; ==> ; 1 ; ; note: forced to do GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; (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: forced to do GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a FIXNUM. ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), not a FIXNUM. ; --> LAMBDA FUNCTION LET 1+ ; ==> ; 1 ; ; note: forced to do GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; (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: forced to do GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a FIXNUM. ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), not a FIXNUM. ; --> LAMBDA FUNCTION LET 1+ ; ==> ; 1 ; ; note: forced to do GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; 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 GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a FIXNUM. ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), 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 GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a FIXNUM. ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), not a FIXNUM. ; --> LET CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET ; --> 1+ ; ==> ; 1 ; ; note: forced to do GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE T) ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: forced to do GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a FIXNUM. ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), not a FIXNUM. ; --> LAMBDA FUNCTION LET 1+ ; ==> ; 1 ; ; note: forced to do GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; (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 GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a FIXNUM. ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), not a FIXNUM. ; --> LAMBDA FUNCTION LET 1+ ; ==> ; 1 ; ; note: forced to do GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; (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 GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a FIXNUM. ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), not a FIXNUM. ; --> LAMBDA FUNCTION LET 1+ ; ==> ; 1 ; ; note: forced to do GENERIC-- (cost 10) ; 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 &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ; 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 1+ ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ; 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 1+ ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ; 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 ; --> 1+ ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; --> 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 argument of GENERIC-- ; ; 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 1+ ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ; 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 1+ ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ; 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 1+ ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ; 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 1+ ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ; note: doing signed word to integer coercion (cost 20), for: ; the first result of inline (signed-byte 64) arithmetic ; 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 ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> + AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> SB-IMPL::XSUBTRACT AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; 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 ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> + AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> SB-IMPL::XSUBTRACT AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; 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 ; (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 ; ==> ; 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. ; (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. ; (CL-PPCRE::CONSTANT-REPETITION-CONSTANT-LENGTH-CLOSURE ; (LET ((CL-PPCRE::NEXT-POS (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN))) ; (DECLARE (FIXNUM CL-PPCRE::NEXT-POS)) ; (AND ; (CL-PPCRE::*STRING*= CL-PPCRE::STR CL-PPCRE::CURR-POS CL-PPCRE::NEXT-POS ; 0 CL-PPCRE::LEN) ; CL-PPCRE::NEXT-POS))) ; --> FUNCTION LET + THE ; ==> ; (* CL-PPCRE::LEN CL-PPCRE::REPETITIONS) ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; (CL-PPCRE::CONSTANT-REPETITION-CONSTANT-LENGTH-CLOSURE ; (LET ((CL-PPCRE::NEXT-POS (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN))) ; (DECLARE (FIXNUM CL-PPCRE::NEXT-POS)) ; (AND ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS ; CL-PPCRE::NEXT-POS 0 CL-PPCRE::LEN) ; CL-PPCRE::NEXT-POS))) ; --> FUNCTION LET + THE ; ==> ; (* CL-PPCRE::LEN CL-PPCRE::REPETITIONS) ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; (CL-PPCRE::CONSTANT-REPETITION-CONSTANT-LENGTH-CLOSURE ; (AND (CHAR= CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)) ; (1+ CL-PPCRE::CURR-POS))) ; --> FUNCTION LET + THE ; ==> ; (* CL-PPCRE::LEN CL-PPCRE::REPETITIONS) ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; (CL-PPCRE::CONSTANT-REPETITION-CONSTANT-LENGTH-CLOSURE ; (AND ; (CHAR-EQUAL CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)) ; (1+ CL-PPCRE::CURR-POS))) ; --> FUNCTION LET + THE ; ==> ; (* CL-PPCRE::LEN CL-PPCRE::REPETITIONS) ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; (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 + THE ; ==> ; (* CL-PPCRE::LEN CL-PPCRE::REPETITIONS) ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; (CL-PPCRE::CONSTANT-REPETITION-CONSTANT-LENGTH-CLOSURE ; (AND (CHAR/= #\Newline (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)) ; (1+ CL-PPCRE::CURR-POS))) ; --> FUNCTION LET + THE ; ==> ; (* CL-PPCRE::LEN CL-PPCRE::REPETITIONS) ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; (CL-PPCRE::CONSTANT-REPETITION-CONSTANT-LENGTH-CLOSURE ; (FUNCALL CL-PPCRE::INNER-MATCHER CL-PPCRE::CURR-POS)) ; --> FUNCTION LET + THE ; ==> ; (* CL-PPCRE::LEN CL-PPCRE::REPETITIONS) ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653966460912964485513216) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; 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 ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> + AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> SB-IMPL::XSUBTRACT AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (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 ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (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 FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (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 ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> + AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> SB-IMPL::XSUBTRACT AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; in: DEFMETHOD CREATE-MATCHER-AUX (REPETITION T) ; (AND CL-PPCRE::MAXIMUM (ZEROP CL-PPCRE::MAXIMUM)) ; --> ZEROP ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to open code because: The operands might not be the same type. ; (AND CL-PPCRE::MAXIMUM (= CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM 1)) ; --> = ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second 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 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 (OR (COMPLEX SINGLE-FLOAT) ; (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. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to open code because: The operands might not be the same type. ; (OR (PLUSP CL-PPCRE::MIN-LEN) (EQL CL-PPCRE::MAXIMUM 1)) ; --> PLUSP ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (AND CL-PPCRE::LEN (PLUSP CL-PPCRE::LEN) (NOT CL-PPCRE::CONTAINS-REGISTER-P)) ; --> IF PLUSP ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (OR (PLUSP CL-PPCRE::MIN-LEN) (EQL CL-PPCRE::MAXIMUM 1)) ; --> PLUSP ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (AND CL-PPCRE::MAXIMUM (= CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM 1)) ; --> = ; ==> ; 1 ; ; note: forced to do GENERIC-= (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; etc. ; (AND (EQL CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM) CL-PPCRE::LEN ; (NOT CL-PPCRE::CONTAINS-REGISTER-P)) ; --> IF ; ==> ; (EQL ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'CL-PPCRE::MINIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'CL-PPCRE::MINIMUM)) ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'CL-PPCRE::MAXIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'CL-PPCRE::MAXIMUM))) ; ; note: forced to do IF-EQL (cost 15) ; unable to do inline float comparison (cost 4) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; 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. ; (COND ; ((AND CL-PPCRE::MAXIMUM (ZEROP CL-PPCRE::MAXIMUM)) ; (ERROR "Got REPETITION with MAXIMUM 0 (should not happen)")) ; ((AND CL-PPCRE::MAXIMUM (= CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM 1)) ; (ERROR "Got REPETITION with MAXIMUM 1 and MINIMUM 1 (should not happen)")) ; ((AND (EQL CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM) CL-PPCRE::LEN ; (NOT CL-PPCRE::CONTAINS-REGISTER-P)) ; (CL-PPCRE::CREATE-CONSTANT-REPETITION-CONSTANT-LENGTH-MATCHER ; CL-PPCRE::REPETITION CL-PPCRE::NEXT-FN)) ; ((EQL CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM) ; (CL-PPCRE::CREATE-CONSTANT-REPETITION-MATCHER CL-PPCRE::REPETITION ; CL-PPCRE::NEXT-FN)) ; ((AND CL-PPCRE::GREEDYP CL-PPCRE::LEN (NOT CL-PPCRE::CONTAINS-REGISTER-P)) ; (CL-PPCRE::CREATE-GREEDY-CONSTANT-LENGTH-MATCHER CL-PPCRE::REPETITION ; CL-PPCRE::NEXT-FN)) ; ((AND CL-PPCRE::GREEDYP ; (OR (PLUSP CL-PPCRE::MIN-LEN) (EQL CL-PPCRE::MAXIMUM 1))) ; (CL-PPCRE::CREATE-GREEDY-NO-ZERO-MATCHER CL-PPCRE::REPETITION ; CL-PPCRE::NEXT-FN)) ; (CL-PPCRE::GREEDYP ; (CL-PPCRE::CREATE-GREEDY-MATCHER CL-PPCRE::REPETITION CL-PPCRE::NEXT-FN)) ; ((AND CL-PPCRE::LEN (PLUSP CL-PPCRE::LEN) ; (NOT CL-PPCRE::CONTAINS-REGISTER-P)) ; (CL-PPCRE::CREATE-NON-GREEDY-CONSTANT-LENGTH-MATCHER CL-PPCRE::REPETITION ; CL-PPCRE::NEXT-FN)) ; ((OR (PLUSP CL-PPCRE::MIN-LEN) (EQL CL-PPCRE::MAXIMUM 1)) ; (CL-PPCRE::CREATE-NON-GREEDY-NO-ZERO-MATCHER CL-PPCRE::REPETITION ; CL-PPCRE::NEXT-FN)) ; (T ; (CL-PPCRE::CREATE-NON-GREEDY-MATCHER CL-PPCRE::REPETITION ; CL-PPCRE::NEXT-FN))) ; --> IF IF IF ; ==> ; (EQL ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'CL-PPCRE::MINIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'CL-PPCRE::MINIMUM)) ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'CL-PPCRE::MAXIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'CL-PPCRE::MAXIMUM))) ; ; note: forced to do IF-EQL (cost 15) ; unable to do inline float comparison (cost 4) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; 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. ; (OR (PLUSP CL-PPCRE::MIN-LEN) (EQL CL-PPCRE::MAXIMUM 1)) ; --> PLUSP ; ==> ; 1 ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a T, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a T, not a FIXNUM. ; etc. ; (AND CL-PPCRE::LEN (PLUSP CL-PPCRE::LEN) (NOT CL-PPCRE::CONTAINS-REGISTER-P)) ; --> IF PLUSP ; ==> ; 1 ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a T, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a T, not a FIXNUM. ; etc. ; (OR (PLUSP CL-PPCRE::MIN-LEN) (EQL CL-PPCRE::MAXIMUM 1)) ; --> PLUSP ; ==> ; 1 ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a T, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a T, not a FIXNUM. ; etc. ; wrote /tmp/usr/share/common-lisp/source/cl-ppcre/repetition-closures-tmp3I8CEEQY.fasl ; compilation finished in 0:00:00.450 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/scanner.lisp" (written 07 APR 2019 03:51:26 PM): ; file: /usr/share/common-lisp/source/cl-ppcre/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 ; ==> ; 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. ; (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)) ; ; 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. ; 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 ; ==> ; 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. ; 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 BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, 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 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 ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; 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 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. ; --> FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: unable to open code because: The operands might not be the same type. ; (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 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. ; --> 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: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, 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 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 ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; 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) ; (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. ; --> 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: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, 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 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 ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; --> FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: unable to open code because: The operands might not be the same type. ; (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 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. ; --> 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: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, 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 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 ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; 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)) ; (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 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. ; --> 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: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, 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 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 ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; 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::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 WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: unable to open code because: The operands might not be the same type. ; --> 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. ; (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 WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: unable to open code because: The operands might not be the same type. ; (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: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, 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 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 ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; 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 (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 ; --> 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. ; --> 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: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, 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 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 ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; 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::START-STRING-TEST)) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: unable to open code because: The operands might not be the same type. ; (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 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. ; (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 WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: unable to open code because: The operands might not be the same type. ; (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: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, 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 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 ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; 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)) ; --> FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: unable to open code because: The operands might not be the same type. ; (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 WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: unable to open code because: The operands might not be the same type. ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; --> 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 float arithmetic (cost 2) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 ; &REST T). ; 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 &REST T). ; 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 &REST T). ; 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 WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; --> 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 float arithmetic (cost 2) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 ; &REST T). ; 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 &REST T). ; 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 &REST T). ; 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 WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; --> 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 float arithmetic (cost 2) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 ; &REST T). ; 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 &REST T). ; 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 &REST T). ; 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 # ; #))))) ; --> FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; --> 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 float arithmetic (cost 2) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 ; &REST T). ; 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 &REST T). ; 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 &REST T). ; 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 WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; --> 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 float arithmetic (cost 2) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 ; &REST T). ; 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 &REST T). ; 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 &REST T). ; 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 WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; --> 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 float arithmetic (cost 2) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 ; &REST T). ; 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 &REST T). ; 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 &REST T). ; 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 WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; --> 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 float arithmetic (cost 2) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 ; &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; --> 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 float arithmetic (cost 2) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 ; &REST T). ; 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 &REST T). ; 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 &REST T). ; etc. ; (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 /tmp/usr/share/common-lisp/source/cl-ppcre/scanner-tmpA3RHFLWZ.fasl ; compilation finished in 0:00:00.426 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/api.lisp" (written 07 APR 2019 03:51:26 PM): ; file: /usr/share/common-lisp/source/cl-ppcre/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. ; 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 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 FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-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 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 FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to open code because: The operands might not be the same type. ; (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. ; (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. ; 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. ; (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 ; (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-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT SIMPLE-BASE-STRING) ; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; 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. ; (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-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT SIMPLE-BASE-STRING) ; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; 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. ; (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 ; (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-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT SIMPLE-BASE-STRING) ; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; 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. ; (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. ; 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. ... {100530EADF}> ; (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) ; 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, ; ... {10058BB7BF}> ; (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) ; 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... {1005A4881F}> ; (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) ; 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... {1005C75B0F}> ; (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) ; 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)) ; --> 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. ; --> 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-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT SIMPLE-BASE-STRING) ; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; --> 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 conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second 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 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 (OR (COMPLEX SINGLE-FLOAT) ; (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. ; --> LET BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+ ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), 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: forced to do GENERIC-= (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a (NOT NULL), not a DOUBLE-FLOAT. ; The second argument is a T, not a (COMPLEX DOUBLE-FLOAT). ; unable to do inline float comparison (cost 3) because: ; The first argument is a (NOT NULL), not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a T, not a (COMPLEX DOUBLE-FLOAT). ; 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 (OR REAL COMPLEX), not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR REAL COMPLEX), not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; 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. ; (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. ; --> 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-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT SIMPLE-BASE-STRING) ; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; --> 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 conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second 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 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 (OR (COMPLEX SINGLE-FLOAT) ; (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. ; --> 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 ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), 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: forced to do GENERIC-= (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a (NOT NULL), not a DOUBLE-FLOAT. ; The second argument is a T, not a (COMPLEX DOUBLE-FLOAT). ; unable to do inline float comparison (cost 3) because: ; The first argument is a (NOT NULL), not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a T, not a (COMPLEX DOUBLE-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 1+ ; ==> ; 1 ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a (OR REAL COMPLEX), not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR REAL COMPLEX), not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; 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. ; (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. ; --> 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-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT SIMPLE-BASE-STRING) ; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second 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 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 (OR (COMPLEX SINGLE-FLOAT) ; (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. ; (= CL-PPCRE::MATCH-START (CAR CL-PPCRE::POS-LIST)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (COMPLEX DOUBLE-FLOAT). ; The second 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 (OR REAL COMPLEX), not a 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 COMPLEX), not a (OR (COMPLEX SINGLE-FLOAT) ; (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. ; (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 FLOAT. ; (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 ...) ; --> 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. ; (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: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second 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 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 (OR (COMPLEX SINGLE-FLOAT) ; (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. ; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+ ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a RATIONAL. ; (> CL-PPCRE::THIS-END CL-PPCRE::THIS-START) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second 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 FLOAT. ; The second argument is a REAL, not a RATIONAL. ; (>= (INCF CL-PPCRE::COUNTER) CL-PPCRE::LIMIT) ; ; note: unable to open code because: The operands might not be the same type. ; (= 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 DOUBLE-FLOAT. ; The second argument is a T, not a (COMPLEX DOUBLE-FLOAT). ; unable to do inline float comparison (cost 3) because: ; The first argument is a (NOT NULL), not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a T, not a (COMPLEX DOUBLE-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 (OR REAL COMPLEX), not a DOUBLE-FLOAT. ; The second argument is a T, not a (COMPLEX DOUBLE-FLOAT). ; unable to do inline float comparison (cost 3) because: ; The first argument is a (OR REAL COMPLEX), not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a T, not a (COMPLEX DOUBLE-FLOAT). ; 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. ; (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 ; &REST T). ; 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 ; &REST T). ; etc. ; (>= (INCF CL-PPCRE::COUNTER) CL-PPCRE::LIMIT) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The second argument is a (OR (DOUBLE-FLOAT (0.0d0)) (SINGLE-FLOAT (0.0)) ; (RATIONAL (0))), not a FIXNUM. ; (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) ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; 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 (OR REAL COMPLEX), not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR REAL COMPLEX), not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; 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. ; 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) ; ; 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. ; 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. ; (< 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 REAL, not a FIXNUM. ; (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 INTEGER NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR INTEGER NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; (< CL-PPCRE::TOKEN 0) ; ; note: forced to do FAST-IF-<-ZERO (cost 9) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a INTEGER, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; in: DEFUN BUILD-REPLACEMENT ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START ; CL-PPCRE::REG-END) ; --> MAKE-ARRAY ; ==> ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; (ARRAY-DIMENSION CL-PPCRE::REG-STARTS 0) ; ; note: unable to ; optimize ; because: ; The array dimensions are unknown; must call ARRAY-DIMENSION at runtime. ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::MATCH-START ; CL-PPCRE::MATCH-END) ; ; note: unable to optimize because: ELEMENT-TYPE is not constant. ; (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: ; callable expression is not known to be a function ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::MATCH-START ; CL-PPCRE::MATCH-END) ; --> MAKE-ARRAY ; ==> ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; (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 ; (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: ; callable expression is not known to be a function ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START ; CL-PPCRE::REG-END) ; --> MAKE-ARRAY ; ==> ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::MATCH-START ; CL-PPCRE::MATCH-END) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ==> ; (MAKE-ARRAY (- CL-PPCRE::END CL-PPCRE::START) :ELEMENT-TYPE ; (ARRAY-ELEMENT-TYPE SEQUENCE) :DISPLACED-TO SEQUENCE ; :DISPLACED-INDEX-OFFSET CL-PPCRE::START) ; ; note: unable to optimize because: ELEMENT-TYPE is not constant. ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START ; CL-PPCRE::REG-END) ; ==> ; (MAKE-ARRAY (- CL-PPCRE::END CL-PPCRE::START) :ELEMENT-TYPE ; (ARRAY-ELEMENT-TYPE SEQUENCE) :DISPLACED-TO SEQUENCE ; :DISPLACED-INDEX-OFFSET CL-PPCRE::START) ; ; note: unable to optimize because: ELEMENT-TYPE is not constant. ; ; note: unable to optimize because: ELEMENT-TYPE is not constant. ; (WITH-OUTPUT-TO-STRING (CL-PPCRE::S NIL :ELEMENT-TYPE CL-PPCRE::ELEMENT-TYPE) ; (LOOP CL-PPCRE::FOR CL-PPCRE::TOKEN CL-PPCRE::IN CL-PPCRE::REPLACEMENT-TEMPLATE ; DO (TYPECASE CL-PPCRE::TOKEN ; (STRING (WRITE-STRING CL-PPCRE::TOKEN CL-PPCRE::S)) ; (INTEGER (WHEN # #) (WHEN # #)) ; (FUNCTION (WRITE-STRING # CL-PPCRE::S)) ; (SYMBOL (CASE CL-PPCRE::TOKEN # # # # #))))) ; --> LET ; ==> ; (MAKE-STRING 31 :ELEMENT-TYPE CL-PPCRE::ELEMENT-TYPE) ; ; note: could not stack allocate: ; (WITH-OUTPUT-TO-STRING (S NIL :ELEMENT-TYPE ELEMENT-TYPE) ; (LOOP FOR TOKEN IN REPLACEMENT-TEMPLATE ; DO (TYPECASE TOKEN ; (STRING (WRITE-STRING TOKEN S)) ; (INTEGER ; (WHEN (>= TOKEN REG-BOUND) ; (SIGNAL-INVOCATION-ERROR ; "Reference to non-existent register ~A in replacement string." ; (1+ TOKEN))) ; (WHEN (SVREF REG-STARTS TOKEN) ; (WRITE-STRING TARGET-STRING S :START ; (SVREF REG-STARTS TOKEN) :END ; (SVREF REG-ENDS TOKEN)))) ; (FUNCTION ; (WRITE-STRING ; (COND ; (SIMPLE-CALLS ; (APPLY TOKEN ; (NSUBSEQ TARGET-STRING MATCH-START MATCH-END) ; (MAP 'LIST ; (LAMBDA (REG-START REG-END) ; (AND REG-START ; (NSUBSEQ TARGET-STRING REG-START ; REG-END))) ; REG-STARTS REG-ENDS))) ; (T ; (FUNCALL TOKEN TARGET-STRING START END MATCH-START ; MATCH-END REG-STARTS REG-ENDS))) ; S)) ; (SYMBOL ; (CASE TOKEN ; ((:BACKSLASH) (WRITE-CHAR #\\ S)) ; ((:MATCH) ; (WRITE-STRING TARGET-STRING S :START MATCH-START :END ; MATCH-END)) ; ((:BEFORE-MATCH) ; (WRITE-STRING TARGET-STRING S :START START :END ; MATCH-START)) ; ((:AFTER-MATCH) ; (WRITE-STRING TARGET-STRING S :START MATCH-END :END ; END)) ; (OTHERWISE ; (WRITE-STRING ; (COND ; (SIMPLE-CALLS ; (APPLY TOKEN ; (NSUBSEQ TARGET-STRING MATCH-START MATCH-END) ; (MAP 'LIST ; (LAMBDA (REG-START REG-END) ; (AND REG-START ; (NSUBSEQ TARGET-STRING REG-START ; REG-END))) ; REG-STARTS REG-ENDS))) ; (T ; (FUNCALL TOKEN TARGET-STRING START END MATCH-START ; MATCH-END REG-STARTS REG-ENDS))) ; S))))))) ; (>= CL-PPCRE::TOKEN CL-PPCRE::REG-BOUND) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (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 ; &REST T). ; 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 ; &REST T). ; 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 float arithmetic (cost 2) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 ; &REST T). ; etc. ; --> MAKE-ARRAY ; ==> ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 ; &REST T). ; 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 float arithmetic (cost 2) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a (NOT NULL), not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 ; &REST T). ; etc. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a (NOT NULL), not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 ; &REST T). ; etc. ; in: DEFUN REPLACE-AUX ; (FUNCALL ; (CL-PPCRE::STRING-CASE-MODIFIER CL-PPCRE::TARGET-STRING CL-PPCRE::FROM ; CL-PPCRE::TO CL-PPCRE::START CL-PPCRE::END) ; CL-PPCRE::CURR-REPLACEMENT) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (WITH-OUTPUT-TO-STRING (CL-PPCRE::S NIL :ELEMENT-TYPE CL-PPCRE::ELEMENT-TYPE) ; (LOOP CL-PPCRE::FOR (CL-PPCRE::FROM CL-PPCRE::TO) CL-PPCRE::ON (APPEND ; (LIST ; CL-PPCRE::START) ; CL-PPCRE::POS-LIST ; (LIST ; CL-PPCRE::END)) ; CL-PPCRE::FOR REPLACE = NIL CL-PPCRE::THEN (AND (NOT REPLACE) ; CL-PPCRE::TO) ; CL-PPCRE::FOR ...)) ; --> LET ; ==> ; (MAKE-STRING 31 :ELEMENT-TYPE CL-PPCRE::ELEMENT-TYPE) ; ; note: could not stack allocate: ; (WITH-OUTPUT-TO-STRING (S NIL :ELEMENT-TYPE ELEMENT-TYPE) ; (LOOP FOR (FROM TO) ON (APPEND (LIST START) POS-LIST (LIST END)) ; FOR REPLACE = NIL THEN (AND (NOT REPLACE) TO) ; FOR REG-STARTS = (IF REPLACE ; (POP REG-LIST) ; NIL) ; FOR REG-ENDS = (IF REPLACE ; (POP REG-LIST) ; NIL) ; FOR CURR-REPLACEMENT = (IF REPLACE ; (BUILD-REPLACEMENT ; REPLACEMENT-TEMPLATE TARGET-STRING ; START END FROM TO REG-STARTS ; REG-ENDS SIMPLE-CALLS ELEMENT-TYPE) ; NIL) ; WHILE TO ; IF REPLACE ; DO (WRITE-STRING ; (IF PRESERVE-CASE ; (FUNCALL ; (STRING-CASE-MODIFIER TARGET-STRING FROM TO START END) ; CURR-REPLACEMENT) ; CURR-REPLACEMENT) ; S) ELSE ; DO (WRITE-STRING TARGET-STRING S :START FROM :END TO))) ; 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. ; 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 ; ==> ; (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-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT SIMPLE-BASE-STRING) ; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; --> 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 conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second 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 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 (OR (COMPLEX SINGLE-FLOAT) ; (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. ; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+ ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a RATIONAL. ; (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. ; (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 DOUBLE-FLOAT. ; The second argument is a T, not a (COMPLEX DOUBLE-FLOAT). ; unable to do inline float comparison (cost 3) because: ; The first argument is a (NOT NULL), not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a T, not a (COMPLEX DOUBLE-FLOAT). ; 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 (OR REAL COMPLEX), not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR REAL COMPLEX), not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; 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... {100485DBAF}> ; (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... {100485DBAF}> ; (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)) ; 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 ... {1004DDAF5F}> ; (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 ... {1004DDAF5F}> ; (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 /tmp/usr/share/common-lisp/source/cl-ppcre/api-tmpYZIB7VXO.fasl ; compilation finished in 0:00:00.283 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/cl-heredoc/src/package.lisp" (written 31 MAR 2021 11:33:00 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-heredoc/src/package-tmpR8PK79V8.fasl ; compilation finished in 0:00:00.074 ; compiling file "/usr/share/common-lisp/source/cl-heredoc/src/ring-buffer.lisp" (written 31 MAR 2021 11:33:00 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-heredoc/src/ring-buffer-tmpN1ZVB1HZ.fasl ; compilation finished in 0:00:00.037 ; compiling file "/usr/share/common-lisp/source/cl-heredoc/src/heredoc.lisp" (written 31 MAR 2021 11:33:00 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-heredoc/src/heredoc-tmpZGRRPISB.fasl ; compilation finished in 0:00:00.008 ; compiling file "/usr/share/common-lisp/source/cl-unicode/packages.lisp" (written 01 NOV 2020 09:00:59 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-unicode/packages-tmpFNKDE5XP.fasl ; compilation finished in 0:00:00.011 ; compiling file "/usr/share/common-lisp/source/cl-unicode/specials.lisp" (written 01 NOV 2020 09:00:59 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-unicode/specials-tmpRJTU435C.fasl ; compilation finished in 0:00:00.016 ; compiling file "/usr/share/common-lisp/source/cl-unicode/util.lisp" (written 01 NOV 2020 09:00:59 PM): ; file: /usr/share/common-lisp/source/cl-unicode/util.lisp ; in: DEFGENERIC CASE-FOLDING ; (CL-UNICODE::CASE-FOLDING CL-UNICODE::CODE-POINT) ; ; caught STYLE-WARNING: ; The function CASE-FOLDING is called with one argument, but wants exactly two. ; wrote /tmp/usr/share/common-lisp/source/cl-unicode/util-tmpI9WG87JK.fasl ; compilation finished in 0:00:00.102 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/cl-unicode/conditions.lisp" (written 01 NOV 2020 09:00:59 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-unicode/conditions-tmpYDE6I9E6.fasl ; compilation finished in 0:00:00.010 ; compiling file "/usr/share/common-lisp/source/cl-unicode/lists.lisp" (written 17 DEC 2020 09:36:18 AM): ; wrote /tmp/usr/share/common-lisp/source/cl-unicode/lists-tmp319UV2V8.fasl ; compilation finished in 0:00:00.041 ; compiling file "/usr/share/common-lisp/source/cl-unicode/hash-tables.lisp" (written 17 DEC 2020 09:36:18 AM): ; wrote /tmp/usr/share/common-lisp/source/cl-unicode/hash-tables-tmpLYQINFYS.fasl ; compilation finished in 0:00:00.764 ;;; Computing Hangul syllable names ; compiling file "/usr/share/common-lisp/source/cl-unicode/api.lisp" (written 01 NOV 2020 09:00:59 PM): ; file: /usr/share/common-lisp/source/cl-unicode/api.lisp ; in: DEFUN LIST-ALL-CHARACTERS ; (IF CL-UNICODE::WANT-CODE-POINT-P ; CL-UNICODE:+CODE-POINT-LIMIT+ ; CHAR-CODE-LIMIT) ; ; note: deleting unreachable code ; wrote /tmp/usr/share/common-lisp/source/cl-unicode/api-tmpGA31XWNO.fasl ; compilation finished in 0:00:00.142 ; compiling file "/usr/share/common-lisp/source/cl-unicode/methods.lisp" (written 17 DEC 2020 09:36:18 AM): ; wrote /tmp/usr/share/common-lisp/source/cl-unicode/methods-tmp5HT23M6C.fasl ; compilation finished in 0:00:00.705 ; compiling file "/usr/share/common-lisp/source/cl-unicode/test-functions.lisp" (written 01 NOV 2020 09:00:59 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-unicode/test-functions-tmpA60KLDKY.fasl ; compilation finished in 0:00:00.020 ; compiling file "/usr/share/common-lisp/source/cl-unicode/derived.lisp" (written 01 NOV 2020 09:00:59 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-unicode/derived-tmpD801X3GJ.fasl ; compilation finished in 0:00:00.016 ; compiling file "/usr/share/common-lisp/source/cl-unicode/alias.lisp" (written 01 NOV 2020 09:00:59 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-unicode/alias-tmpGOW1GC70.fasl ; compilation finished in 0:00:00.033 ; compiling file "/usr/share/common-lisp/source/named-readtables/src/package.lisp" (written 21 DEC 2020 04:34:51 PM): ; wrote /tmp/usr/share/common-lisp/source/named-readtables/src/package-tmpPQ1X28TL.fasl ; compilation finished in 0:00:00.021 ; compiling file "/usr/share/common-lisp/source/named-readtables/src/utils.lisp" (written 21 DEC 2020 04:34:51 PM): ; wrote /tmp/usr/share/common-lisp/source/named-readtables/src/utils-tmpE92ECU7O.fasl ; compilation finished in 0:00:00.057 ; compiling file "/usr/share/common-lisp/source/named-readtables/src/define-api.lisp" (written 21 DEC 2020 04:34:51 PM): ; wrote /tmp/usr/share/common-lisp/source/named-readtables/src/define-api-tmp8S0II570.fasl ; compilation finished in 0:00:00.015 ; compiling file "/usr/share/common-lisp/source/named-readtables/src/cruft.lisp" (written 21 DEC 2020 04:34:51 PM): ; file: /usr/share/common-lisp/source/named-readtables/src/cruft.lisp ; in: DEFUN %MAKE-READTABLE-ITERATOR ; (SB-IMPL:CHARACTER-MACRO-ARRAY READTABLE) ; ; caught STYLE-WARNING: ; The function SB-IMPL:CHARACTER-MACRO-ARRAY has been deprecated as of SBCL version 2.0.6. ; ; Use SB-IMPL::BASE-CHAR-MACRO-ARRAY instead. ; ; In future SBCL versions SB-IMPL:CHARACTER-MACRO-ARRAY will signal a full ; warning at compile-time. ; See also: ; The SBCL Manual, Node "Deprecation Conditions" ; (SB-IMPL:CHARACTER-MACRO-HASH-TABLE READTABLE) ; ; caught STYLE-WARNING: ; The function SB-IMPL:CHARACTER-MACRO-HASH-TABLE has been deprecated as of SBCL version 2.0.6. ; ; Use SB-IMPL::EXTENDED-CHAR-TABLE instead. ; ; In future SBCL versions SB-IMPL:CHARACTER-MACRO-HASH-TABLE will signal a full ; warning at compile-time. ; See also: ; The SBCL Manual, Node "Deprecation Conditions" ; wrote /tmp/usr/share/common-lisp/source/named-readtables/src/cruft-tmpJE88A12F.fasl ; compilation finished in 0:00:00.103 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/named-readtables/src/named-readtables.lisp" (written 21 DEC 2020 04:34:51 PM): ; file: /usr/share/common-lisp/source/named-readtables/src/named-readtables.lisp ; in: DEFINE-API MAKE-READTABLE ; (EDITOR-HINTS.NAMED-READTABLES::DEFINE-API EDITOR-HINTS.NAMED-READTABLES:MAKE-READTABLE ; (&OPTIONAL ; (EDITOR-HINTS.NAMED-READTABLES::NAME NIL ; EDITOR-HINTS.NAMED-READTABLES::NAME-SUPPLIED-P) ; &KEY MERGE) ; (&OPTIONAL EDITOR-HINTS.NAMED-READTABLES:NAMED-READTABLE-DESIGNATOR &KEY ; (:MERGE LIST) EDITOR-HINTS.NAMED-READTABLES::=> READTABLE) ; #<(SIMPLE-ARRAY CHARACTER ; (620)) Creates and returns a new readtable under the specified ; NAME. ; ; MERGE takes a list of NAMED-READTABLE-DESIGNATORs and specifies the ; readtables the new readtable is created from. (See the :MERGE c... {1004C5481F}> ; (COND ; ((NOT EDITOR-HINTS.NAMED-READTABLES::NAME-SUPPLIED-P) ; (COPY-READTABLE EDITOR-HINTS.NAMED-READTABLES::*EMPTY-READTABLE*)) ; ((EDITOR-HINTS.NAMED-READTABLES::RESERVED-READTABLE-NAME-P ; EDITOR-HINTS.NAMED-READTABLES::NAME) ; (ERROR "~A is the designator for a predefined readtable. ~ ; Not acceptable as a user-specified readtable name." ; EDITOR-HINTS.NAMED-READTABLES::NAME)) ; ((LET (#) ; (AND EDITOR-HINTS.NAMED-READTABLES::RT #))) ; (T ; (LET (#) ; (EDITOR-HINTS.NAMED-READTABLES:REGISTER-READTABLE ; EDITOR-HINTS.NAMED-READTABLES::NAME ; EDITOR-HINTS.NAMED-READTABLES::RESULT))))) ; --> LOCALLY DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA EDITOR-HINTS.NAMED-READTABLES:MAKE-READTABLE ; (&OPTIONAL ; (EDITOR-HINTS.NAMED-READTABLES::NAME NIL ; EDITOR-HINTS.NAMED-READTABLES::NAME-SUPPLIED-P) ; &KEY MERGE) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; #<(SIMPLE-ARRAY CHARACTER ; (620)) Creates and returns a new readtable under the specified ; NAME. ; ; MERGE takes a list of NAMED-READTABLE-DESIGNATORs and specifies the ; readtables the new readtable is created from. (See the :MERGE c... {1004C5481F}> ; (DECLARE (UNMUFFLE-CONDITIONS STYLE-WARNING)) ; (BLOCK EDITOR-HINTS.NAMED-READTABLES:MAKE-READTABLE ; (COND ; ((NOT EDITOR-HINTS.NAMED-READTABLES::NAME-SUPPLIED-P) ; (COPY-READTABLE EDITOR-HINTS.NAMED-READTABLES::*EMPTY-READTABLE*)) ; ((EDITOR-HINTS.NAMED-READTABLES::RESERVED-READTABLE-NAME-P ; EDITOR-HINTS.NAMED-READTABLES::NAME) ; (ERROR "~A is the designator for a predefined readtable. ~ ; Not acceptable as a user-specified readtable name." ; EDITOR-HINTS.NAMED-READTABLES::NAME)) ; ((LET # ; #)) ; (T ; (LET # ; #))))) ; ; caught STYLE-WARNING: ; &OPTIONAL and &KEY found in the same lambda list: (&OPTIONAL ; (NAME NIL NAME-SUPPLIED-P) ; &KEY MERGE) ; wrote /tmp/usr/share/common-lisp/source/named-readtables/src/named-readtables-tmpA5FNLPLT.fasl ; compilation finished in 0:00:00.102 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/cl-interpol/packages.lisp" (written 06 NOV 2020 02:19:10 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-interpol/packages-tmpHKCV9TP8.fasl ; compilation finished in 0:00:00.010 ; compiling file "/usr/share/common-lisp/source/cl-interpol/specials.lisp" (written 06 NOV 2020 02:19:10 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-interpol/specials-tmpZ18MA7XE.fasl ; compilation finished in 0:00:00.043 ; compiling file "/usr/share/common-lisp/source/cl-interpol/util.lisp" (written 06 NOV 2020 02:19:10 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-interpol/util-tmp6LQJ9T0C.fasl ; compilation finished in 0:00:00.028 ; compiling file "/usr/share/common-lisp/source/cl-interpol/alias.lisp" (written 06 NOV 2020 02:19:10 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-interpol/alias-tmpTX7OA81T.fasl ; compilation finished in 0:00:00.006 ; compiling file "/usr/share/common-lisp/source/cl-interpol/read.lisp" (written 06 NOV 2020 02:19:10 PM): ; wrote /tmp/usr/share/common-lisp/source/cl-interpol/read-tmpWOTC3PB7.fasl ; compilation finished in 0:00:00.122 ; compiling file "/usr/share/common-lisp/source/osicat/src/osicat-sys.lisp" (written 13 SEP 2021 08:49:18 AM): ; wrote /tmp/usr/share/common-lisp/source/osicat/src/osicat-sys-tmpHQE95SAC.fasl ; compilation finished in 0:00:00.048 ; compiling file "/usr/share/common-lisp/source/osicat/posix/packages.lisp" (written 13 SEP 2021 08:49:18 AM): ; wrote /tmp/usr/share/common-lisp/source/osicat/posix/packages-tmpO87FP9NR.fasl ; compilation finished in 0:00:00.012 ; cc -o /tmp/usr/share/common-lisp/source/osicat/posix/basic-unixint__grovel-tmpP6A3E92I.o -c -g -O2 -ffile-prefix-map=/build/sbcl-QrCO5W/sbcl-2.1.11=. -fstack-protector-strong -Wformat -Werror=format-security -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -D_LARGEFILE_SOURCE -D_LARGEFILE64_SOURCE -D_FILE_OFFSET_BITS=64 -Wunused-parameter -fno-omit-frame-pointer -momit-leaf-frame-pointer -fPIC -I/usr/share/common-lisp/source/cl-cffi/ /tmp/usr/share/common-lisp/source/osicat/posix/basic-unixint__grovel.c /tmp/usr/share/common-lisp/source/osicat/posix/basic-unixint__grovel.c:7: warning: "_LARGEFILE_SOURCE" redefined 7 | #define _LARGEFILE_SOURCE | : note: this is the location of the previous definition /tmp/usr/share/common-lisp/source/osicat/posix/basic-unixint__grovel.c:8: warning: "_LARGEFILE64_SOURCE" redefined 8 | #define _LARGEFILE64_SOURCE | : note: this is the location of the previous definition /tmp/usr/share/common-lisp/source/osicat/posix/basic-unixint__grovel.c: In function ‘main’: /tmp/usr/share/common-lisp/source/osicat/posix/basic-unixint__grovel.c:23:7: warning: unused variable ‘autotype_tmp’ [-Wunused-variable] 23 | int autotype_tmp; | ^~~~~~~~~~~~ ; cc -o /tmp/usr/share/common-lisp/source/osicat/posix/basic-unixint__grovel-tmpUSHT8RIL -g -Wl,--export-dynamic /tmp/usr/share/common-lisp/source/osicat/posix/basic-unixint__grovel.o ; /tmp/usr/share/common-lisp/source/osicat/posix/basic-unixint__grovel /tmp/usr/share/common-lisp/source/osicat/posix/basic-unixint__grovel.grovel-tmp.lisp ; compiling file "/tmp/usr/share/common-lisp/source/osicat/posix/basic-unixint.processed-grovel-file" (written 23 DEC 2021 03:48:30 AM): ; wrote /tmp/usr/share/common-lisp/source/osicat/posix/basic-unixint-tmp7YCPD44Y.fasl ; compilation finished in 0:00:00.046 ; cc -o /tmp/usr/share/common-lisp/source/osicat/posix/unixint__grovel-tmpQXR7SNXD.o -c -g -O2 -ffile-prefix-map=/build/sbcl-QrCO5W/sbcl-2.1.11=. -fstack-protector-strong -Wformat -Werror=format-security -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -D_LARGEFILE_SOURCE -D_LARGEFILE64_SOURCE -D_FILE_OFFSET_BITS=64 -Wunused-parameter -fno-omit-frame-pointer -momit-leaf-frame-pointer -fPIC -I/usr/share/common-lisp/source/cl-cffi/ /tmp/usr/share/common-lisp/source/osicat/posix/unixint__grovel.c /tmp/usr/share/common-lisp/source/osicat/posix/unixint__grovel.c:8: warning: "_LARGEFILE_SOURCE" redefined 8 | #define _LARGEFILE_SOURCE | : note: this is the location of the previous definition /tmp/usr/share/common-lisp/source/osicat/posix/unixint__grovel.c:9: warning: "_LARGEFILE64_SOURCE" redefined 9 | #define _LARGEFILE64_SOURCE | : note: this is the location of the previous definition In file included from /tmp/usr/share/common-lisp/source/osicat/posix/unixint__grovel.c:38: /tmp/usr/share/common-lisp/source/osicat/posix/unixint__grovel.c: In function ‘main’: /usr/share/common-lisp/source/cl-cffi/grovel/common.h:19:54: warning: comparison between pointer and integer 19 | #define _64_BIT_VALUE_FITS_SIGNED_P(value) ( (value) <= 0x7FFFFFFFFFFFFFFFLL ) | ^~ /tmp/usr/share/common-lisp/source/osicat/posix/unixint__grovel.c:947:6: note: in expansion of macro ‘_64_BIT_VALUE_FITS_SIGNED_P’ 947 | if(_64_BIT_VALUE_FITS_SIGNED_P(MAP_FAILED)) | ^~~~~~~~~~~~~~~~~~~~~~~~~~~ /tmp/usr/share/common-lisp/source/osicat/posix/unixint__grovel.c:41:7: warning: unused variable ‘autotype_tmp’ [-Wunused-variable] 41 | int autotype_tmp; | ^~~~~~~~~~~~ ; cc -o /tmp/usr/share/common-lisp/source/osicat/posix/unixint__grovel-tmp6FLI1OC3 -g -Wl,--export-dynamic /tmp/usr/share/common-lisp/source/osicat/posix/unixint__grovel.o ; /tmp/usr/share/common-lisp/source/osicat/posix/unixint__grovel /tmp/usr/share/common-lisp/source/osicat/posix/unixint__grovel.grovel-tmp.lisp ; compiling file "/tmp/usr/share/common-lisp/source/osicat/posix/unixint.processed-grovel-file" (written 23 DEC 2021 03:48:33 AM): ; wrote /tmp/usr/share/common-lisp/source/osicat/posix/unixint-tmpWBK8JTS9.fasl ; compilation finished in 0:00:00.211 ; compiling file "/usr/share/common-lisp/source/osicat/posix/early.lisp" (written 13 SEP 2021 08:49:18 AM): ; wrote /tmp/usr/share/common-lisp/source/osicat/posix/early-tmpUVEUD2ZN.fasl ; compilation finished in 0:00:00.186 ; cc -o /tmp/usr/share/common-lisp/source/osicat/posix/wrappers__wrapper-tmpOWNJOEU.o -c -g -O2 -ffile-prefix-map=/build/sbcl-QrCO5W/sbcl-2.1.11=. -fstack-protector-strong -Wformat -Werror=format-security -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -D_LARGEFILE_SOURCE -D_LARGEFILE64_SOURCE -D_FILE_OFFSET_BITS=64 -Wunused-parameter -fno-omit-frame-pointer -momit-leaf-frame-pointer -fPIC -I/usr/share/common-lisp/source/cl-cffi/ /tmp/usr/share/common-lisp/source/osicat/posix/wrappers__wrapper.c /tmp/usr/share/common-lisp/source/osicat/posix/wrappers__wrapper.c:8: warning: "_LARGEFILE_SOURCE" redefined 8 | #define _LARGEFILE_SOURCE | : note: this is the location of the previous definition /tmp/usr/share/common-lisp/source/osicat/posix/wrappers__wrapper.c:9: warning: "_LARGEFILE64_SOURCE" redefined 9 | #define _LARGEFILE64_SOURCE | : note: this is the location of the previous definition /tmp/usr/share/common-lisp/source/osicat/posix/wrappers__wrapper.c: In function ‘readdir_r_cffi_wrap’: /tmp/usr/share/common-lisp/source/osicat/posix/wrappers__wrapper.c:78:3: warning: ‘readdir_r’ is deprecated [-Wdeprecated-declarations] 78 | return readdir_r(dirp, entry, result); | ^~~~~~ In file included from /usr/include/features.h:472, from /usr/include/x86_64-linux-gnu/bits/libc-header-start.h:33, from /usr/include/string.h:26, from /tmp/usr/share/common-lisp/source/osicat/posix/wrappers__wrapper.c:13: /usr/include/dirent.h:189:12: note: declared here 189 | extern int __REDIRECT (readdir_r, | ^~~~~~~~~~ ; cc -o /tmp/usr/share/common-lisp/source/osicat/posix/libosicat.so -shared -g -O2 -ffile-prefix-map=/build/sbcl-QrCO5W/sbcl-2.1.11=. -fstack-protector-strong -Wformat -Werror=format-security -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -D_LARGEFILE_SOURCE -D_LARGEFILE64_SOURCE -D_FILE_OFFSET_BITS=64 -Wunused-parameter -fno-omit-frame-pointer -momit-leaf-frame-pointer /tmp/usr/share/common-lisp/source/osicat/posix/wrappers__wrapper.o ; compiling file "/tmp/usr/share/common-lisp/source/osicat/posix/wrappers.processed-wrapper-file" (written 23 DEC 2021 03:48:34 AM): ; wrote /tmp/usr/share/common-lisp/source/osicat/posix/wrappers-tmpVT5BMTA5.fasl ; compilation finished in 0:00:00.217 ; compiling file "/usr/share/common-lisp/source/osicat/posix/basic-unix.lisp" (written 13 SEP 2021 08:49:18 AM): ; wrote /tmp/usr/share/common-lisp/source/osicat/posix/basic-unix-tmpN3CFVWZF.fasl ; compilation finished in 0:00:00.170 ; compiling file "/usr/share/common-lisp/source/osicat/posix/unix.lisp" (written 13 SEP 2021 08:49:18 AM): ; wrote /tmp/usr/share/common-lisp/source/osicat/posix/unix-tmpNK27C0R1.fasl ; compilation finished in 0:00:00.332 ; compiling file "/usr/share/common-lisp/source/osicat/posix/linux.lisp" (written 13 SEP 2021 08:49:18 AM): ; wrote /tmp/usr/share/common-lisp/source/osicat/posix/linux-tmp3BPE71HR.fasl ; compilation finished in 0:00:00.007 ; compiling file "/usr/share/common-lisp/source/osicat/posix/misc.lisp" (written 13 SEP 2021 08:49:18 AM): ; wrote /tmp/usr/share/common-lisp/source/osicat/posix/misc-tmp758YUXMV.fasl ; compilation finished in 0:00:00.019 ; compiling file "/usr/share/common-lisp/source/osicat/src/packages.lisp" (written 13 SEP 2021 08:49:18 AM): ; wrote /tmp/usr/share/common-lisp/source/osicat/src/packages-tmpGMQXK1HK.fasl ; compilation finished in 0:00:00.009 ; compiling file "/usr/share/common-lisp/source/osicat/src/fd-streams.lisp" (written 13 SEP 2021 08:49:18 AM): ; wrote /tmp/usr/share/common-lisp/source/osicat/src/fd-streams-tmp49Q238TW.fasl ; compilation finished in 0:00:00.013 ; compiling file "/usr/share/common-lisp/source/osicat/src/osicat.lisp" (written 13 SEP 2021 08:49:18 AM): ; wrote /tmp/usr/share/common-lisp/source/osicat/src/osicat-tmpMXPMJ5KG.fasl ; compilation finished in 0:00:00.134 ; compiling file "/usr/share/common-lisp/source/osicat/src/time.lisp" (written 13 SEP 2021 08:49:18 AM): ; wrote /tmp/usr/share/common-lisp/source/osicat/src/time-tmpB69313KI.fasl ; compilation finished in 0:00:00.001 ; compiling file "/usr/share/common-lisp/source/closer-mop/closer-mop-packages.lisp" (written 29 OCT 2020 06:18:14 PM): ; wrote /tmp/usr/share/common-lisp/source/closer-mop/closer-mop-packages-tmp9ZT99EEA.fasl ; compilation finished in 0:00:00.041 ; compiling file "/usr/share/common-lisp/source/closer-mop/closer-mop-shared.lisp" (written 29 OCT 2020 06:18:14 PM): ; file: /usr/share/common-lisp/source/closer-mop/closer-mop-shared.lisp ; in: ; COMMON-LISP:DEFMETHOD COMPUTE-EFFECTIVE-METHOD-FUNCTION (GENERIC-FUNCTION T T) ; (CLOSER-MOP::TRANSFORM-EFFECTIVE-METHOD (CLOSER-MOP::FORM) ; (IF (ATOM CLOSER-MOP::FORM) ; CLOSER-MOP::FORM ; (CASE (CAR CLOSER-MOP::FORM) ; (CALL-METHOD (CLOSER-MOP::TRANSFORM-EFFECTIVE-METHOD #)) ; (MAKE-METHOD ; (WHEN # #) ; (LET # ; #)) ; (T (MAPCAR #'CLOSER-MOP::TRANSFORM-EFFECTIVE-METHOD #))))) ; ; note: Return type not fixed values, so can't use known return convention: ; * ; in: DEFUN GET-EMF ; (SUBSEQ CLOSER-MOP::ARGS 0 CLOSER-MOP::NOF-REQUIRED-ARGS) ; ; 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. ; in: DEFUN ONLY-STANDARD-METHODS ; (TYPEP CLOSER-MOP::GF SB-MOP:SPECIALIZER) ; ; note: unable to optimize because: can't open-code test of non-constant type ; (EQL (SB-MOP:EQL-SPECIALIZER-OBJECT SB-MOP:SPECIALIZER) CLOSER-MOP::GF) ; ; note: forced to do IF-EQL (cost 15) ; unable to do inline float comparison (cost 4) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; 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. ; in: DEFUN METHODS-ALL-THE-SAME-SPECIALIZERS ; (EQL (SB-MOP:EQL-SPECIALIZER-OBJECT CLOSER-MOP::SPEC1) ; (SB-MOP:EQL-SPECIALIZER-OBJECT CLOSER-MOP::SPEC2)) ; ; note: forced to do IF-EQL (cost 15) ; unable to do inline float comparison (cost 4) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; 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. ; in: DEFUN COMPUTE-DISCRIMINATOR ; (FUNCALL CLOSER-MOP::COMPUTE-NATIVE-DISCRIMINATOR) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; COMPUTE-NATIVE-DISCRIMINATOR is not known to be a function ; (TYPEP CLOSER-MOP::ARG CLOSER-MOP::SPEC) ; ; note: unable to optimize because: can't open-code test of non-constant type ; (FUNCALL CLOSER-MOP::COMPUTE-NATIVE-DISCRIMINATOR) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; COMPUTE-NATIVE-DISCRIMINATOR is not known to be a function ; (EQL CLOSER-MOP::ARG (SB-MOP:EQL-SPECIALIZER-OBJECT CLOSER-MOP::SPEC)) ; ; note: forced to do IF-EQL (cost 15) ; unable to do inline float comparison (cost 4) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 4) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; etc. ; wrote /tmp/usr/share/common-lisp/source/closer-mop/closer-mop-shared-tmpW045U8V2.fasl ; compilation finished in 0:00:00.087 ; compiling file "/usr/share/common-lisp/source/closer-mop/closer-sbcl.lisp" (written 29 OCT 2020 06:18:14 PM): ; wrote /tmp/usr/share/common-lisp/source/closer-mop/closer-sbcl-tmp6XOIRI3N.fasl ; compilation finished in 0:00:00.096 ; compiling file "/usr/share/common-lisp/source/agnostic-lizard/package.lisp" (written 10 OCT 2020 06:59:09 PM): ; wrote /tmp/usr/share/common-lisp/source/agnostic-lizard/package-tmp9ZHTLHSG.fasl ; compilation finished in 0:00:00.026 ; compiling file "/usr/share/common-lisp/source/agnostic-lizard/utils.lisp" (written 10 OCT 2020 06:59:09 PM): ; wrote /tmp/usr/share/common-lisp/source/agnostic-lizard/utils-tmpRW73Q691.fasl ; compilation finished in 0:00:00.050 ; compiling file "/usr/share/common-lisp/source/agnostic-lizard/env-wrappers.lisp" (written 10 OCT 2020 06:59:09 PM): ; wrote /tmp/usr/share/common-lisp/source/agnostic-lizard/env-wrappers-tmp4TM0ME1F.fasl ; compilation finished in 0:00:00.022 ; compiling file "/usr/share/common-lisp/source/agnostic-lizard/metaenv.lisp" (written 10 OCT 2020 06:59:09 PM): ; wrote /tmp/usr/share/common-lisp/source/agnostic-lizard/metaenv-tmpU2IL9N4.fasl ; compilation finished in 0:00:00.055 ; compiling file "/usr/share/common-lisp/source/agnostic-lizard/lexenv.lisp" (written 10 OCT 2020 06:59:09 PM): ; wrote /tmp/usr/share/common-lisp/source/agnostic-lizard/lexenv-tmpOPW41KDL.fasl ; compilation finished in 0:00:00.029 ; compiling file "/usr/share/common-lisp/source/agnostic-lizard/pure-expansion.lisp" (written 10 OCT 2020 06:59:09 PM): ; file: /usr/share/common-lisp/source/agnostic-lizard/pure-expansion.lisp ; in: DEFUN MACROEXPAND-ALL ; (DEFUN AGNOSTIC-LIZARD:MACROEXPAND-ALL ; (AGNOSTIC-LIZARD::FORM ; &OPTIONAL AGNOSTIC-LIZARD::ENV ; &KEY AGNOSTIC-LIZARD::NAMES AGNOSTIC-LIZARD::NEVER-PASS-FALLBACK-ENV) ; "Recursively expand all macro calls in form with initial environment described by env" ; (COND ; ((NULL AGNOSTIC-LIZARD::ENV) ; (AGNOSTIC-LIZARD:METAENV-MACROEXPAND-ALL AGNOSTIC-LIZARD::FORM NIL)) ; ((TYPEP AGNOSTIC-LIZARD::ENV 'AGNOSTIC-LIZARD:METAENV) ; (AGNOSTIC-LIZARD:METAENV-MACROEXPAND-ALL AGNOSTIC-LIZARD::FORM ; AGNOSTIC-LIZARD::ENV)) ; (T ; (LET* (#) ; (AGNOSTIC-LIZARD:METAENV-ENSURE-NAMES-FROM-ENVIRONMENT ; AGNOSTIC-LIZARD:METAENV AGNOSTIC-LIZARD::NAMES AGNOSTIC-LIZARD::ENV) ; (AGNOSTIC-LIZARD:METAENV-MACROEXPAND-ALL AGNOSTIC-LIZARD::FORM ; AGNOSTIC-LIZARD:METAENV))))) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA AGNOSTIC-LIZARD:MACROEXPAND-ALL ; (AGNOSTIC-LIZARD::FORM &OPTIONAL AGNOSTIC-LIZARD::ENV &KEY ; AGNOSTIC-LIZARD::NAMES AGNOSTIC-LIZARD::NEVER-PASS-FALLBACK-ENV) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; "Recursively expand all macro calls in form with initial environment described by env" ; (BLOCK AGNOSTIC-LIZARD:MACROEXPAND-ALL ; (COND ; ((NULL AGNOSTIC-LIZARD::ENV) ; (AGNOSTIC-LIZARD:METAENV-MACROEXPAND-ALL AGNOSTIC-LIZARD::FORM NIL)) ; ((TYPEP AGNOSTIC-LIZARD::ENV 'AGNOSTIC-LIZARD:METAENV) ; (AGNOSTIC-LIZARD:METAENV-MACROEXPAND-ALL AGNOSTIC-LIZARD::FORM ; AGNOSTIC-LIZARD::ENV)) ; (T ; (LET* # ; # ; #))))) ; ; caught STYLE-WARNING: ; &OPTIONAL and &KEY found in the same lambda list: (FORM &OPTIONAL ENV &KEY ; NAMES ; NEVER-PASS-FALLBACK-ENV) ; wrote /tmp/usr/share/common-lisp/source/agnostic-lizard/pure-expansion-tmpIPVWLON2.fasl ; compilation finished in 0:00:00.027 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/agnostic-lizard/special-form-handlers.lisp" (written 10 OCT 2020 06:59:09 PM): ; wrote /tmp/usr/share/common-lisp/source/agnostic-lizard/special-form-handlers-tmpO0LCOIDS.fasl ; compilation finished in 0:00:00.136 ; compiling file "/usr/share/common-lisp/source/agnostic-lizard/generic-walking.lisp" (written 10 OCT 2020 06:59:09 PM): ; wrote /tmp/usr/share/common-lisp/source/agnostic-lizard/generic-walking-tmpP264WQ6O.fasl ; compilation finished in 0:00:00.019 ; compiling file "/usr/share/common-lisp/source/agnostic-lizard/macro-based-walking.lisp" (written 10 OCT 2020 06:59:09 PM): ; wrote /tmp/usr/share/common-lisp/source/agnostic-lizard/macro-based-walking-tmpESC43OCR.fasl ; compilation finished in 0:00:00.043 ; compiling file "/usr/share/common-lisp/source/agnostic-lizard/local-variables.lisp" (written 10 OCT 2020 06:59:09 PM): ; wrote /tmp/usr/share/common-lisp/source/agnostic-lizard/local-variables-tmpWCAM54ZJ.fasl ; compilation finished in 0:00:00.173 ; compiling file "/usr/share/common-lisp/source/agnostic-lizard/wrapping-reader.lisp" (written 10 OCT 2020 06:59:09 PM): ; wrote /tmp/usr/share/common-lisp/source/agnostic-lizard/wrapping-reader-tmpVTMW561L.fasl ; compilation finished in 0:00:00.023 ; compiling file "/usr/share/common-lisp/source/agnostic-lizard/debugger-hooks.lisp" (written 10 OCT 2020 06:59:09 PM): ; wrote /tmp/usr/share/common-lisp/source/agnostic-lizard/debugger-hooks-tmpUNNGT9CF.fasl ; compilation finished in 0:00:00.170 ; compiling file "/usr/share/common-lisp/source/trivial-backtrace/dev/packages.lisp" (written 11 MAY 2020 01:46:26 PM): ; wrote /tmp/usr/share/common-lisp/source/trivial-backtrace/dev/packages-tmp4L3W83SU.fasl ; compilation finished in 0:00:00.025 ; compiling file "/usr/share/common-lisp/source/trivial-backtrace/dev/utilities.lisp" (written 11 MAY 2020 01:46:26 PM): ; wrote /tmp/usr/share/common-lisp/source/trivial-backtrace/dev/utilities-tmpGE7QNNEE.fasl ; compilation finished in 0:00:00.079 ; compiling file "/usr/share/common-lisp/source/trivial-backtrace/dev/backtrace.lisp" (written 11 MAY 2020 01:46:26 PM): ; wrote /tmp/usr/share/common-lisp/source/trivial-backtrace/dev/backtrace-tmp9B0UZGT4.fasl ; compilation finished in 0:00:00.038 ; compiling file "/usr/share/common-lisp/source/trivial-backtrace/dev/map-backtrace.lisp" (written 11 MAY 2020 01:46:26 PM): ; wrote /tmp/usr/share/common-lisp/source/trivial-backtrace/dev/map-backtrace-tmpAJ5U325P.fasl ; compilation finished in 0:00:00.142 ; compiling file "/usr/share/common-lisp/source/trivial-backtrace/dev/fallback.lisp" (written 11 MAY 2020 01:46:26 PM): ; wrote /tmp/usr/share/common-lisp/source/trivial-backtrace/dev/fallback-tmpAOF1CYAS.fasl ; compilation finished in 0:00:00.013 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/package.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/package-tmpIXCQTSHA.fasl ; compilation finished in 0:00:00.038 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/reader.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/reader-tmp5E6VIEMS.fasl ; compilation finished in 0:00:00.006 ; cc -o /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libc__grovel-tmpI0PODGVV.o -c -g -O2 -ffile-prefix-map=/build/sbcl-QrCO5W/sbcl-2.1.11=. -fstack-protector-strong -Wformat -Werror=format-security -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -D_LARGEFILE_SOURCE -D_LARGEFILE64_SOURCE -D_FILE_OFFSET_BITS=64 -Wunused-parameter -fno-omit-frame-pointer -momit-leaf-frame-pointer -fPIC -I/usr/share/common-lisp/source/cl-cffi/ /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libc__grovel.c /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libc__grovel.c: In function ‘main’: /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libc__grovel.c:15:7: warning: unused variable ‘autotype_tmp’ [-Wunused-variable] 15 | int autotype_tmp; | ^~~~~~~~~~~~ ; cc -o /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libc__grovel-tmp1Z95I17K -g -Wl,--export-dynamic /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libc__grovel.o ; /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libc__grovel /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libc__grovel.grovel-tmp.lisp ; compiling file "/tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libc.processed-grovel-file" (written 23 DEC 2021 03:48:37 AM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libc-tmpCFVK1AC1.fasl ; compilation finished in 0:00:00.006 ; cc -o /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libacl__grovel-tmpHHRR8E8N.o -c -g -O2 -ffile-prefix-map=/build/sbcl-QrCO5W/sbcl-2.1.11=. -fstack-protector-strong -Wformat -Werror=format-security -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -D_LARGEFILE_SOURCE -D_LARGEFILE64_SOURCE -D_FILE_OFFSET_BITS=64 -Wunused-parameter -fno-omit-frame-pointer -momit-leaf-frame-pointer -fPIC -I/usr/share/common-lisp/source/cl-cffi/ /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libacl__grovel.c /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libacl__grovel.c: In function ‘main’: /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libacl__grovel.c:12:7: warning: unused variable ‘autotype_tmp’ [-Wunused-variable] 12 | int autotype_tmp; | ^~~~~~~~~~~~ ; cc -o /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libacl__grovel-tmpWWJ02E3I -g -Wl,--export-dynamic /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libacl__grovel.o ; /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libacl__grovel /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libacl__grovel.grovel-tmp.lisp ; compiling file "/tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libacl.processed-grovel-file" (written 23 DEC 2021 03:48:37 AM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libacl-tmpONTOHUJ2.fasl ; compilation finished in 0:00:00.006 ; cc -o /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libcap__grovel-tmpQT9APWMH.o -c -g -O2 -ffile-prefix-map=/build/sbcl-QrCO5W/sbcl-2.1.11=. -fstack-protector-strong -Wformat -Werror=format-security -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -D_LARGEFILE_SOURCE -D_LARGEFILE64_SOURCE -D_FILE_OFFSET_BITS=64 -Wunused-parameter -fno-omit-frame-pointer -momit-leaf-frame-pointer -fPIC -I/usr/share/common-lisp/source/cl-cffi/ /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libcap__grovel.c /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libcap__grovel.c: In function ‘main’: /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libcap__grovel.c:11:7: warning: unused variable ‘autotype_tmp’ [-Wunused-variable] 11 | int autotype_tmp; | ^~~~~~~~~~~~ ; cc -o /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libcap__grovel-tmp6LYQXY0L -g -Wl,--export-dynamic /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libcap__grovel.o ; /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libcap__grovel /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libcap__grovel.grovel-tmp.lisp ; compiling file "/tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libcap.processed-grovel-file" (written 23 DEC 2021 03:48:37 AM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/libcap-tmpNKVDR0J1.fasl ; compilation finished in 0:00:00.007 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/util.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/util-tmp6F83SDCV.fasl ; compilation finished in 0:00:00.415 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/util/posix1e.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/util/posix1e-tmpEJNPPMJY.fasl ; compilation finished in 0:00:00.061 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/util/linux-namespace.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/util/linux-namespace-tmp31RWPSX2.fasl ; compilation finished in 0:00:00.041 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/connection.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/connection-tmp1HKLMSTH.fasl ; compilation finished in 0:00:00.208 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property-tmpEWG5XJ53.fasl ; compilation finished in 0:00:00.297 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/propspec.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/propspec-tmpXHL60MUV.fasl ; compilation finished in 0:00:00.064 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/host.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/host-tmpB7NPDQCW.fasl ; compilation finished in 0:00:00.052 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/combinator.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/combinator-tmpGZ70QILE.fasl ; compilation finished in 0:00:00.133 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/deployment.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/deployment-tmpKYD38Q95.fasl ; compilation finished in 0:00:00.064 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/connection/local.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/connection/local-tmpV4YQ0HKA.fasl ; compilation finished in 0:00:00.026 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/data.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/data-tmpJXWE1HN2.fasl ; compilation finished in 0:00:00.085 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/image.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/image-tmpMNC5LX5B.fasl ; compilation finished in 0:00:00.070 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/cmd.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/cmd-tmp4RNSVVC1.fasl ; compilation finished in 0:00:00.007 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/file.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/file-tmpN626KU7B.fasl ; compilation finished in 0:00:00.374 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/etc-default.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/etc-default-tmpOO0K1B0C.fasl ; compilation finished in 0:00:00.018 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/os.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/os-tmpVFL7JAFK.fasl ; compilation finished in 0:00:00.076 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/container.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/container-tmpU45RTF.fasl ; compilation finished in 0:00:00.020 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/periodic.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/periodic-tmpZTS6G7ND.fasl ; compilation finished in 0:00:00.012 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/mount.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/mount-tmp5TNBATEG.fasl ; compilation finished in 0:00:00.044 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/service.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/service-tmpJL6JXW7Z.fasl ; compilation finished in 0:00:00.044 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/apt.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/apt-tmp5PQ00DH7.fasl ; compilation finished in 0:00:00.223 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/package.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/package-tmp5R1KP4O2.fasl ; compilation finished in 0:00:00.014 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/chroot.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/chroot-tmpXQDKKJYI.fasl ; compilation finished in 0:00:00.127 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/disk.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/disk-tmpGJ3P31TF.fasl ; compilation finished in 0:00:00.301 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/fstab.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/fstab-tmpT2P2LFJI.fasl ; compilation finished in 0:00:00.044 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/crypttab.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/crypttab-tmpKOV75BS9.fasl ; compilation finished in 0:00:00.023 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/user.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/user-tmpP07HWIXP.fasl ; compilation finished in 0:00:00.062 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/git.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/git-tmpURW0SA3C.fasl ; compilation finished in 0:00:00.063 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/gnupg.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/gnupg-tmp627QKRZN.fasl ; compilation finished in 0:00:00.037 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/ssh.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/ssh-tmpK8OFNZFV.fasl ; compilation finished in 0:00:00.070 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/sshd.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/sshd-tmpRMCY5COB.fasl ; compilation finished in 0:00:00.033 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/locale.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/locale-tmp9TN1FOJ6.fasl ; compilation finished in 0:00:00.025 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/reboot.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/reboot-tmpEID7NJG3.fasl ; compilation finished in 0:00:00.008 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/installer.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/installer-tmp8CJLVG9R.fasl ; compilation finished in 0:00:00.078 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/grub.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/grub-tmpZCJK45JG.fasl ; compilation finished in 0:00:00.016 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/u-boot.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/u-boot-tmpQC4TENAZ.fasl ; compilation finished in 0:00:00.015 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/hostname.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/hostname-tmp4HJFFDY3.fasl ; compilation finished in 0:00:00.034 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/network.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/network-tmp78H81ZL.fasl ; compilation finished in 0:00:00.042 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/libvirt.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/libvirt-tmp86K6JU7V.fasl ; compilation finished in 0:00:00.102 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/ccache.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/ccache-tmp2L6X9BVQ.fasl ; compilation finished in 0:00:00.033 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/schroot.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/schroot-tmpES5DCUFN.fasl ; compilation finished in 0:00:00.012 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/sbuild.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/sbuild-tmpDVKOEP6R.fasl ; compilation finished in 0:00:00.066 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/postfix.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/postfix-tmp4TWTKS75.fasl ; compilation finished in 0:00:00.032 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/cron.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/cron-tmpXSOQ2I78.fasl ; compilation finished in 0:00:00.040 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/lets-encrypt.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/lets-encrypt-tmpUA03GLW1.fasl ; compilation finished in 0:00:00.044 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/apache.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/apache-tmpO0OW34V4.fasl ; compilation finished in 0:00:00.088 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/systemd.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/systemd-tmpU8KQLETJ.fasl ; compilation finished in 0:00:00.040 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/firewalld.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/firewalld-tmpLBWGBOTB.fasl ; compilation finished in 0:00:00.170 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/timezone.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/timezone-tmpRX2XGI9U.fasl ; compilation finished in 0:00:00.014 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/swap.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/swap-tmpT2A3PQL9.fasl ; compilation finished in 0:00:00.016 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/lxc.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/property/lxc-tmpOVHYA3BO.fasl ; compilation finished in 0:00:00.089 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/connection/shell-wrap.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/connection/shell-wrap-tmpLT3TYWCE.fasl ; compilation finished in 0:00:00.009 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/connection/fork.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/connection/fork-tmp3YF2HENI.fasl ; compilation finished in 0:00:00.014 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/connection/rehome.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/connection/rehome-tmp9EEV8FN4.fasl ; compilation finished in 0:00:00.007 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/connection/ssh.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/connection/ssh-tmpDK25NJJO.fasl ; compilation finished in 0:00:00.007 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/connection/sudo.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/connection/sudo-tmpNMZ5RT9R.fasl ; compilation finished in 0:00:00.010 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/connection/su.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/connection/su-tmp8K51P1O1.fasl ; compilation finished in 0:00:00.005 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/connection/sbcl.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/connection/sbcl-tmpXAVJ8WEV.fasl ; compilation finished in 0:00:00.006 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/connection/chroot.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/connection/chroot-tmpOZHFIU2N.fasl ; compilation finished in 0:00:00.024 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/connection/setuid.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/connection/setuid-tmpJD9SCIW3.fasl ; compilation finished in 0:00:00.010 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/connection/as.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/connection/as-tmpICVK4HSI.fasl ; compilation finished in 0:00:00.003 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/connection/linux-namespace.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/connection/linux-namespace-tmpA5CK3QHN.fasl ; compilation finished in 0:00:00.078 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/data/asdf.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/data/asdf-tmp5KE6HXAY.fasl ; compilation finished in 0:00:00.011 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/data/pgp.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/data/pgp-tmp5UBS1APN.fasl ; compilation finished in 0:00:00.015 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/data/git-snapshot.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/data/git-snapshot-tmpSI9E4AQB.fasl ; compilation finished in 0:00:00.013 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/data/gpgpubkeys.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/data/gpgpubkeys-tmpID7X8UGC.fasl ; compilation finished in 0:00:00.008 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/data/ssh-askpass.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/data/ssh-askpass-tmpFYN8G5D1.fasl ; compilation finished in 0:00:00.009 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/data/local-file.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/data/local-file-tmpG1VNK6NW.fasl ; compilation finished in 0:00:00.006 ; compiling file "/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/data/files-tree.lisp" (written 15 DEC 2021 11:22:10 PM): ; wrote /tmp/build/consfigurator-nf4NaY/consfigurator-0.13.0/src/data/files-tree-tmpV4YWE7CS.fasl ; compilation finished in 0:00:00.004 ; ; compilation unit finished ; caught 11 STYLE-WARNING conditions ; printed 1085 notes make[2]: Leaving directory '/build/consfigurator-nf4NaY/consfigurator-0.13.0/emacs' make[1]: Leaving directory '/build/consfigurator-nf4NaY/consfigurator-0.13.0' dh_elpa_test -i create-stamp debian/debhelper-build-stamp dh_prep -i dh_auto_install --destdir=debian/cl-consfigurator/ -i dh_install -i dh_elpa -i dh_installdocs -i dh_sphinxdoc -i dh_installchangelogs -i dh_installinfo -i dh_perl -i dh_link -i dh_strip_nondeterminism -i dh_compress -i dh_fixperms -i dh_missing -i dh_installdeb -i dh_gencontrol -i dh_md5sums -i dh_builddeb -i dpkg-deb: building package 'cl-consfigurator' in '../cl-consfigurator_0.13.0-1_all.deb'. dpkg-genbuildinfo --build=all -O../consfigurator_0.13.0-1_all.buildinfo dpkg-genchanges --build=all -O../consfigurator_0.13.0-1_all.changes dpkg-genchanges: info: binary-only arch-indep upload (source code and arch-specific packages not included) dpkg-source --after-build . dpkg-buildpackage: info: binary-only upload (no source included) I: running special hook: sync-out /build/consfigurator-nf4NaY /tmp/consfigurator-0.13.0-171t_61b2 I: cleaning package lists and apt cache... W: deleting files in /tmp: usr W: deleting files in /tmp: build I: creating tarball... I: done I: removing tempdir /tmp/mmdebstrap.HaC79VXIP1... I: success in 3231.8046 seconds md5: cl-consfigurator_0.13.0-1_all.deb: OK sha1: cl-consfigurator_0.13.0-1_all.deb: OK sha256: cl-consfigurator_0.13.0-1_all.deb: OK Checksums: OK