Sat Jan 6 22:17:18 UTC 2024 I: starting to build pgloader/bullseye/amd64 on jenkins on '2024-01-06 22:17' Sat Jan 6 22:17:18 UTC 2024 I: The jenkins build log is/was available at https://jenkins.debian.net/userContent/reproducible/debian/build_service/amd64_9/12684/console.log Sat Jan 6 22:17:18 UTC 2024 I: Downloading source for bullseye/pgloader=3.6.2-1 --2024-01-06 22:17:18-- http://cdn-fastly.deb.debian.org/debian/pool/main/p/pgloader/pgloader_3.6.2-1.dsc Connecting to 78.137.99.97:3128... connected. Proxy request sent, awaiting response... 200 OK Length: 2728 (2.7K) [text/prs.lines.tag] Saving to: ‘pgloader_3.6.2-1.dsc’ 0K .. 100% 346M=0s 2024-01-06 22:17:18 (346 MB/s) - ‘pgloader_3.6.2-1.dsc’ saved [2728/2728] Sat Jan 6 22:17:18 UTC 2024 I: pgloader_3.6.2-1.dsc -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA256 Format: 3.0 (quilt) Source: pgloader Binary: pgloader, cl-pgloader Architecture: any all Version: 3.6.2-1 Maintainer: Dimitri Fontaine Uploaders: Christoph Berg Homepage: https://github.com/dimitri/pgloader Standards-Version: 4.5.0 Vcs-Browser: https://github.com/dimitri/pgloader Vcs-Git: https://github.com/dimitri/pgloader.git Testsuite: autopkgtest Testsuite-Triggers: ca-certificates, postgresql, sbcl Build-Depends: buildapp (>= 1.5), cl-abnf, cl-alexandria, cl-asdf (>= 3.0.3), cl-asdf-finalizers, cl-asdf-system-connections, cl-bordeaux-threads (>= 0.8.3), cl-cffi (>= 1:0.12.0), cl-command-line-arguments, cl-csv (>= 20180712), cl-db3 (>= 20200212), cl-drakma, cl-esrap, cl-fad, cl-flexi-streams, cl-interpol, cl-ixf, cl-local-time, cl-log, cl-lparallel, cl-markdown, cl-md5, cl-metabang-bind, cl-mssql, cl-mustache, cl-plus-ssl (>= 20190204), cl-postmodern, cl-ppcre, cl-py-configparser, cl-qmynd, cl-quri, cl-simple-date, cl-split-sequence, cl-sqlite, cl-trivial-backtrace, cl-trivial-utf-8, cl-unicode, cl-usocket, cl-utilities, cl-uuid, cl-yason, cl-zs3, debhelper-compat (= 13), gawk, help2man, python3-sphinx-rtd-theme, python3-sphinx, sbcl (>= 1.1.13), tzdata Package-List: cl-pgloader deb lisp optional arch=all pgloader deb database optional arch=any Checksums-Sha1: 5cc2fbc56657f3477b8b98828114a97fe1de364c 3717111 pgloader_3.6.2.orig.tar.gz 007e73920817894ecba6c9d3a96d61bddc69defd 9072 pgloader_3.6.2-1.debian.tar.xz Checksums-Sha256: 33f87df9cb8f9a36f9836cd691ad6dfa72ae76200a12fe01ee89584f3b771ae7 3717111 pgloader_3.6.2.orig.tar.gz a5e7576874c5967a3358aedf0dec6329af7572355a5c7d84b10f6c78fb67ae9e 9072 pgloader_3.6.2-1.debian.tar.xz Files: 5939c32ac380ddeb1f581f7f8a6d1d89 3717111 pgloader_3.6.2.orig.tar.gz 8d9cf72ffb4d6294eb2bc75526ce4d50 9072 pgloader_3.6.2-1.debian.tar.xz -----BEGIN PGP SIGNATURE----- iQIzBAEBCAAdFiEEXEj+YVf0kXlZcIfGTFprqxLSp64FAl8NzS8ACgkQTFprqxLS p65g9hAAj8dittR6eFg1WVCIlf30qLin1KNWcSzppQIG+JSILfUY5hOoaj7Hvh8F jRMKSHbidd4qIJ4icANPPwWqF6WlbTmv0lVQ619rYgsTdNc2VgscTmJghblxKxvE 3jQgnfhyMRXPUeenzwnsfQwvsQxfXc/61WSqjCLbZZORrpCn7n6G87f4Jh1dXJqp cuZq5c0EDKtbTlT5PVZ7GO6f4yNUNXtUU8hEH6oRnYvzhifRy5/cmCMqfv9VtZJk wRbzgNTxiboUMzDO+lQGvqGF7pgFSLHYpCDhSif3K13I51vj49TlVDdoL/1myAG8 NPo5MZFAPts2SiA3HP9SR09nUoEmapDwVSL81jtKgqGZUi4dXtwwioZJIM7KUZMr h/EO7GMblKlYWq0/keMCgDlhYYKDJWaURsnzF8omX+v7t+uc7hVGK5M12ulDEWwy HzUAnUzHmM2rHPo46f6F+A/l2cOw2WQPBlOksF/vNEUHpMQIV3FZSZvYOOLsQP8W G5DXiM3TPW5Uy+rGEtRkdGrs9MCMrAuwhF1S8ySRJEGOORnQRqeS1wiPayCyhh5E nJbtOTN1Gu9doCMwJg4n8a1msD6tJEyvaDfhkXRpD7pLyw3v2so8zL4+GJLXw3m2 NrfUwtTAS5jOBjfxRS3HsW6gs4PtbqrcbGKd7uel6YpzDAZNAi0= =4+og -----END PGP SIGNATURE----- Sat Jan 6 22:17:18 UTC 2024 I: Checking whether the package is not for us Sat Jan 6 22:17:18 UTC 2024 I: Starting 1st build on remote node ionos1-amd64.debian.net. Sat Jan 6 22:17:18 UTC 2024 I: Preparing to do remote build '1' on ionos1-amd64.debian.net. Sat Jan 6 22:47:18 UTC 2024 I: Deleting $TMPDIR on ionos1-amd64.debian.net. I: pbuilder: network access will be disabled during build I: Current time: Sat Jan 6 10:17:25 -12 2024 I: pbuilder-time-stamp: 1704579445 I: Building the build Environment I: extracting base tarball [/var/cache/pbuilder/bullseye-reproducible-base.tgz] I: copying local configuration W: --override-config is not set; not updating apt.conf Read the manpage for details. I: mounting /proc filesystem I: mounting /sys filesystem I: creating /{dev,run}/shm I: mounting /dev/pts filesystem I: redirecting /dev/ptmx to /dev/pts/ptmx I: policy-rc.d already exists I: Copying source file I: copying [pgloader_3.6.2-1.dsc] I: copying [./pgloader_3.6.2.orig.tar.gz] I: copying [./pgloader_3.6.2-1.debian.tar.xz] I: Extracting source gpgv: unknown type of key resource 'trustedkeys.kbx' gpgv: keyblock resource '/tmp/dpkg-verify-sig.FHvcHdBU/trustedkeys.kbx': General error gpgv: Signature made Tue Jul 14 15:20:15 2020 gpgv: using RSA key 5C48FE6157F49179597087C64C5A6BAB12D2A7AE gpgv: Can't check signature: No public key dpkg-source: warning: failed to verify signature on ./pgloader_3.6.2-1.dsc dpkg-source: info: extracting pgloader in pgloader-3.6.2 dpkg-source: info: unpacking pgloader_3.6.2.orig.tar.gz dpkg-source: info: unpacking pgloader_3.6.2-1.debian.tar.xz I: using fakeroot in build. I: Installing the build-deps I: user script /srv/workspace/pbuilder/1894023/tmp/hooks/D02_print_environment starting I: set BUILDDIR='/build/reproducible-path' BUILDUSERGECOS='first user,first room,first work-phone,first home-phone,first other' BUILDUSERNAME='pbuilder1' BUILD_ARCH='amd64' DEBIAN_FRONTEND='noninteractive' DEB_BUILD_OPTIONS='buildinfo=+all reproducible=+all,-fixfilepath parallel=15 ' DISTRIBUTION='bullseye' HOME='/root' HOST_ARCH='amd64' IFS=' ' INVOCATION_ID='a3f529c30be647e8858ec30ba62d778a' LANG='C' LANGUAGE='en_US:en' LC_ALL='C' MAIL='/var/mail/root' OPTIND='1' PATH='/usr/sbin:/usr/bin:/sbin:/bin:/usr/games' PBCURRENTCOMMANDLINEOPERATION='build' PBUILDER_OPERATION='build' PBUILDER_PKGDATADIR='/usr/share/pbuilder' PBUILDER_PKGLIBDIR='/usr/lib/pbuilder' PBUILDER_SYSCONFDIR='/etc' PPID='1894023' PS1='# ' PS2='> ' PS4='+ ' PWD='/' SHELL='/bin/bash' SHLVL='2' SUDO_COMMAND='/usr/bin/timeout -k 18.1h 18h /usr/bin/ionice -c 3 /usr/bin/nice /usr/sbin/pbuilder --build --configfile /srv/reproducible-results/rbuild-debian/r-b-build.aAjhA4H9/pbuilderrc_KIdj --distribution bullseye --hookdir /etc/pbuilder/first-build-hooks --debbuildopts -b --basetgz /var/cache/pbuilder/bullseye-reproducible-base.tgz --buildresult /srv/reproducible-results/rbuild-debian/r-b-build.aAjhA4H9/b1 --logfile b1/build.log pgloader_3.6.2-1.dsc' SUDO_GID='110' SUDO_UID='105' SUDO_USER='jenkins' TERM='unknown' TZ='/usr/share/zoneinfo/Etc/GMT+12' USER='root' _='/usr/bin/systemd-run' http_proxy='http://78.137.99.97:3128' I: uname -a Linux ionos1-amd64 6.1.0-17-amd64 #1 SMP PREEMPT_DYNAMIC Debian 6.1.69-1 (2023-12-30) x86_64 GNU/Linux I: ls -l /bin total 5476 -rwxr-xr-x 1 root root 1234376 Mar 27 2022 bash -rwxr-xr-x 3 root root 38984 Jul 20 2020 bunzip2 -rwxr-xr-x 3 root root 38984 Jul 20 2020 bzcat lrwxrwxrwx 1 root root 6 Jul 20 2020 bzcmp -> bzdiff -rwxr-xr-x 1 root root 2225 Jul 20 2020 bzdiff lrwxrwxrwx 1 root root 6 Jul 20 2020 bzegrep -> bzgrep -rwxr-xr-x 1 root root 4877 Sep 4 2019 bzexe lrwxrwxrwx 1 root root 6 Jul 20 2020 bzfgrep -> bzgrep -rwxr-xr-x 1 root root 3775 Jul 20 2020 bzgrep -rwxr-xr-x 3 root root 38984 Jul 20 2020 bzip2 -rwxr-xr-x 1 root root 18424 Jul 20 2020 bzip2recover lrwxrwxrwx 1 root root 6 Jul 20 2020 bzless -> bzmore -rwxr-xr-x 1 root root 1297 Jul 20 2020 bzmore -rwxr-xr-x 1 root root 43936 Sep 24 2020 cat -rwxr-xr-x 1 root root 72672 Sep 24 2020 chgrp -rwxr-xr-x 1 root root 64448 Sep 24 2020 chmod -rwxr-xr-x 1 root root 72672 Sep 24 2020 chown -rwxr-xr-x 1 root root 151168 Sep 24 2020 cp -rwxr-xr-x 1 root root 125560 Dec 10 2020 dash -rwxr-xr-x 1 root root 113664 Sep 24 2020 date -rwxr-xr-x 1 root root 80968 Sep 24 2020 dd -rwxr-xr-x 1 root root 93936 Sep 24 2020 df -rwxr-xr-x 1 root root 147176 Sep 24 2020 dir -rwxr-xr-x 1 root root 84440 Jan 20 2022 dmesg lrwxrwxrwx 1 root root 8 Nov 7 2019 dnsdomainname -> hostname lrwxrwxrwx 1 root root 8 Nov 7 2019 domainname -> hostname -rwxr-xr-x 1 root root 39712 Sep 24 2020 echo -rwxr-xr-x 1 root root 28 Jan 25 2023 egrep -rwxr-xr-x 1 root root 39680 Sep 24 2020 false -rwxr-xr-x 1 root root 28 Jan 25 2023 fgrep -rwxr-xr-x 1 root root 69032 Jan 20 2022 findmnt -rwsr-xr-x 1 root root 34896 Feb 26 2021 fusermount -rwxr-xr-x 1 root root 203072 Jan 25 2023 grep -rwxr-xr-x 2 root root 2346 Apr 10 2022 gunzip -rwxr-xr-x 1 root root 6447 Apr 10 2022 gzexe -rwxr-xr-x 1 root root 98048 Apr 10 2022 gzip -rwxr-xr-x 1 root root 22600 Nov 7 2019 hostname -rwxr-xr-x 1 root root 72840 Sep 24 2020 ln -rwxr-xr-x 1 root root 56952 Feb 7 2020 login -rwxr-xr-x 1 root root 147176 Sep 24 2020 ls -rwxr-xr-x 1 root root 149736 Jan 20 2022 lsblk -rwxr-xr-x 1 root root 85184 Sep 24 2020 mkdir -rwxr-xr-x 1 root root 76896 Sep 24 2020 mknod -rwxr-xr-x 1 root root 48064 Sep 24 2020 mktemp -rwxr-xr-x 1 root root 59632 Jan 20 2022 more -rwsr-xr-x 1 root root 55528 Jan 20 2022 mount -rwxr-xr-x 1 root root 18664 Jan 20 2022 mountpoint -rwxr-xr-x 1 root root 147080 Sep 24 2020 mv lrwxrwxrwx 1 root root 8 Nov 7 2019 nisdomainname -> hostname lrwxrwxrwx 1 root root 14 Dec 16 2021 pidof -> /sbin/killall5 -rwxr-xr-x 1 root root 43872 Sep 24 2020 pwd lrwxrwxrwx 1 root root 4 Mar 27 2022 rbash -> bash -rwxr-xr-x 1 root root 52032 Sep 24 2020 readlink -rwxr-xr-x 1 root root 72704 Sep 24 2020 rm -rwxr-xr-x 1 root root 52032 Sep 24 2020 rmdir -rwxr-xr-x 1 root root 27472 Sep 27 2020 run-parts -rwxr-xr-x 1 root root 122224 Dec 22 2018 sed lrwxrwxrwx 1 root root 4 Dec 7 09:24 sh -> dash -rwxr-xr-x 1 root root 43808 Sep 24 2020 sleep -rwxr-xr-x 1 root root 84928 Sep 24 2020 stty -rwsr-xr-x 1 root root 71912 Jan 20 2022 su -rwxr-xr-x 1 root root 39744 Sep 24 2020 sync -rwxr-xr-x 1 root root 531928 Feb 17 2021 tar -rwxr-xr-x 1 root root 14456 Sep 27 2020 tempfile -rwxr-xr-x 1 root root 101408 Sep 24 2020 touch -rwxr-xr-x 1 root root 39680 Sep 24 2020 true -rwxr-xr-x 1 root root 14328 Feb 26 2021 ulockmgr_server -rwsr-xr-x 1 root root 35040 Jan 20 2022 umount -rwxr-xr-x 1 root root 39744 Sep 24 2020 uname -rwxr-xr-x 2 root root 2346 Apr 10 2022 uncompress -rwxr-xr-x 1 root root 147176 Sep 24 2020 vdir -rwxr-xr-x 1 root root 63744 Jan 20 2022 wdctl lrwxrwxrwx 1 root root 8 Nov 7 2019 ypdomainname -> hostname -rwxr-xr-x 1 root root 1984 Apr 10 2022 zcat -rwxr-xr-x 1 root root 1678 Apr 10 2022 zcmp -rwxr-xr-x 1 root root 5898 Apr 10 2022 zdiff -rwxr-xr-x 1 root root 29 Apr 10 2022 zegrep -rwxr-xr-x 1 root root 29 Apr 10 2022 zfgrep -rwxr-xr-x 1 root root 2081 Apr 10 2022 zforce -rwxr-xr-x 1 root root 8049 Apr 10 2022 zgrep -rwxr-xr-x 1 root root 2206 Apr 10 2022 zless -rwxr-xr-x 1 root root 1842 Apr 10 2022 zmore -rwxr-xr-x 1 root root 4577 Apr 10 2022 znew I: user script /srv/workspace/pbuilder/1894023/tmp/hooks/D02_print_environment finished -> Attempting to satisfy build-dependencies -> Creating pbuilder-satisfydepends-dummy package Package: pbuilder-satisfydepends-dummy Version: 0.invalid.0 Architecture: amd64 Maintainer: Debian Pbuilder Team Description: Dummy package to satisfy dependencies with aptitude - created by pbuilder This package was created automatically by pbuilder to satisfy the build-dependencies of the package being currently built. Depends: buildapp (>= 1.5), cl-abnf, cl-alexandria, cl-asdf (>= 3.0.3), cl-asdf-finalizers, cl-asdf-system-connections, cl-bordeaux-threads (>= 0.8.3), cl-cffi (>= 1:0.12.0), cl-command-line-arguments, cl-csv (>= 20180712), cl-db3 (>= 20200212), cl-drakma, cl-esrap, cl-fad, cl-flexi-streams, cl-interpol, cl-ixf, cl-local-time, cl-log, cl-lparallel, cl-markdown, cl-md5, cl-metabang-bind, cl-mssql, cl-mustache, cl-plus-ssl (>= 20190204), cl-postmodern, cl-ppcre, cl-py-configparser, cl-qmynd, cl-quri, cl-simple-date, cl-split-sequence, cl-sqlite, cl-trivial-backtrace, cl-trivial-utf-8, cl-unicode, cl-usocket, cl-utilities, cl-uuid, cl-yason, cl-zs3, debhelper-compat (= 13), gawk, help2man, python3-sphinx-rtd-theme, python3-sphinx, sbcl (>= 1.1.13), tzdata dpkg-deb: building package 'pbuilder-satisfydepends-dummy' in '/tmp/satisfydepends-aptitude/pbuilder-satisfydepends-dummy.deb'. Selecting previously unselected package pbuilder-satisfydepends-dummy. (Reading database ... 17743 files and directories currently installed.) Preparing to unpack .../pbuilder-satisfydepends-dummy.deb ... Unpacking pbuilder-satisfydepends-dummy (0.invalid.0) ... dpkg: pbuilder-satisfydepends-dummy: dependency problems, but configuring anyway as you requested: pbuilder-satisfydepends-dummy depends on buildapp (>= 1.5); however: Package buildapp is not installed. pbuilder-satisfydepends-dummy depends on cl-abnf; however: Package cl-abnf is not installed. pbuilder-satisfydepends-dummy depends on cl-alexandria; however: Package cl-alexandria is not installed. pbuilder-satisfydepends-dummy depends on cl-asdf (>= 3.0.3); however: Package cl-asdf is not installed. pbuilder-satisfydepends-dummy depends on cl-asdf-finalizers; however: Package cl-asdf-finalizers is not installed. pbuilder-satisfydepends-dummy depends on cl-asdf-system-connections; however: Package cl-asdf-system-connections is not installed. pbuilder-satisfydepends-dummy depends on cl-bordeaux-threads (>= 0.8.3); however: Package cl-bordeaux-threads is not installed. pbuilder-satisfydepends-dummy depends on cl-cffi (>= 1:0.12.0); however: Package cl-cffi is not installed. pbuilder-satisfydepends-dummy depends on cl-command-line-arguments; however: Package cl-command-line-arguments is not installed. pbuilder-satisfydepends-dummy depends on cl-csv (>= 20180712); however: Package cl-csv is not installed. pbuilder-satisfydepends-dummy depends on cl-db3 (>= 20200212); however: Package cl-db3 is not installed. pbuilder-satisfydepends-dummy depends on cl-drakma; however: Package cl-drakma is not installed. pbuilder-satisfydepends-dummy depends on cl-esrap; however: Package cl-esrap is not installed. pbuilder-satisfydepends-dummy depends on cl-fad; however: Package cl-fad is not installed. pbuilder-satisfydepends-dummy depends on cl-flexi-streams; however: Package cl-flexi-streams is not installed. pbuilder-satisfydepends-dummy depends on cl-interpol; however: Package cl-interpol is not installed. pbuilder-satisfydepends-dummy depends on cl-ixf; however: Package cl-ixf is not installed. pbuilder-satisfydepends-dummy depends on cl-local-time; however: Package cl-local-time is not installed. pbuilder-satisfydepends-dummy depends on cl-log; however: Package cl-log is not installed. pbuilder-satisfydepends-dummy depends on cl-lparallel; however: Package cl-lparallel is not installed. pbuilder-satisfydepends-dummy depends on cl-markdown; however: Package cl-markdown is not installed. pbuilder-satisfydepends-dummy depends on cl-md5; however: Package cl-md5 is not installed. pbuilder-satisfydepends-dummy depends on cl-metabang-bind; however: Package cl-metabang-bind is not installed. pbuilder-satisfydepends-dummy depends on cl-mssql; however: Package cl-mssql is not installed. pbuilder-satisfydepends-dummy depends on cl-mustache; however: Package cl-mustache is not installed. pbuilder-satisfydepends-dummy depends on cl-plus-ssl (>= 20190204); however: Package cl-plus-ssl is not installed. pbuilder-satisfydepends-dummy depends on cl-postmodern; however: Package cl-postmodern is not installed. pbuilder-satisfydepends-dummy depends on cl-ppcre; however: Package cl-ppcre is not installed. pbuilder-satisfydepends-dummy depends on cl-py-configparser; however: Package cl-py-configparser is not installed. pbuilder-satisfydepends-dummy depends on cl-qmynd; however: Package cl-qmynd is not installed. pbuilder-satisfydepends-dummy depends on cl-quri; however: Package cl-quri is not installed. pbuilder-satisfydepends-dummy depends on cl-simple-date; however: Package cl-simple-date is not installed. pbuilder-satisfydepends-dummy depends on cl-split-sequence; however: Package cl-split-sequence is not installed. pbuilder-satisfydepends-dummy depends on cl-sqlite; however: Package cl-sqlite is not installed. pbuilder-satisfydepends-dummy depends on cl-trivial-backtrace; however: Package cl-trivial-backtrace is not installed. pbuilder-satisfydepends-dummy depends on cl-trivial-utf-8; however: Package cl-trivial-utf-8 is not installed. pbuilder-satisfydepends-dummy depends on cl-unicode; however: Package cl-unicode is not installed. pbuilder-satisfydepends-dummy depends on cl-usocket; however: Package cl-usocket is not installed. pbuilder-satisfydepends-dummy depends on cl-utilities; however: Package cl-utilities is not installed. pbuilder-satisfydepends-dummy depends on cl-uuid; however: Package cl-uuid is not installed. pbuilder-satisfydepends-dummy depends on cl-yason; however: Package cl-yason is not installed. pbuilder-satisfydepends-dummy depends on cl-zs3; however: Package cl-zs3 is not installed. pbuilder-satisfydepends-dummy depends on debhelper-compat (= 13); however: Package debhelper-compat is not installed. pbuilder-satisfydepends-dummy depends on gawk; however: Package gawk is not installed. pbuilder-satisfydepends-dummy depends on help2man; however: Package help2man is not installed. pbuilder-satisfydepends-dummy depends on python3-sphinx-rtd-theme; however: Package python3-sphinx-rtd-theme is not installed. pbuilder-satisfydepends-dummy depends on python3-sphinx; however: Package python3-sphinx is not installed. pbuilder-satisfydepends-dummy depends on sbcl (>= 1.1.13); however: Package sbcl is not installed. pbuilder-satisfydepends-dummy depends on tzdata; however: Package tzdata is not installed. Setting up pbuilder-satisfydepends-dummy (0.invalid.0) ... Reading package lists... Building dependency tree... Reading state information... Initializing package states... Writing extended state information... Building tag database... pbuilder-satisfydepends-dummy is already installed at the requested version (0.invalid.0) pbuilder-satisfydepends-dummy is already installed at the requested version (0.invalid.0) The following NEW packages will be installed: autoconf{a} automake{a} autopoint{a} autotools-dev{a} bsdextrautils{a} buildapp{a} ca-certificates{a} cl-abnf{a} cl-alexandria{a} cl-anaphora{a} cl-asdf{a} cl-asdf-finalizers{a} cl-asdf-system-connections{a} cl-babel{a} cl-base64{a} cl-bordeaux-threads{a} cl-cffi{a} cl-chipz{a} cl-chunga{a} cl-closer-mop{a} cl-closure-common{a} cl-command-line-arguments{a} cl-containers{a} cl-csv{a} cl-cxml{a} cl-db3{a} cl-drakma{a} cl-dynamic-classes{a} cl-esrap{a} cl-fad{a} cl-flexi-streams{a} cl-garbage-pools{a} cl-ieee-floats{a} cl-interpol{a} cl-ironclad{a} cl-iterate{a} cl-ixf{a} cl-kmrcl{a} cl-local-time{a} cl-log{a} cl-lparallel{a} cl-markdown{a} cl-md5{a} cl-metabang-bind{a} cl-metatilities-base{a} cl-mssql{a} cl-mustache{a} cl-named-readtables{a} cl-parse-number{a} cl-plus-ssl{a} cl-postgres{a} cl-postmodern{a} cl-ppcre{a} cl-puri{a} cl-py-configparser{a} cl-qmynd{a} cl-quri{a} cl-rt{a} cl-s-sql{a} cl-simple-date{a} cl-split-sequence{a} cl-sqlite{a} cl-trivial-backtrace{a} cl-trivial-features{a} cl-trivial-garbage{a} cl-trivial-gray-streams{a} cl-trivial-utf-8{a} cl-unicode{a} cl-usocket{a} cl-utilities{a} cl-uuid{a} cl-yason{a} cl-zs3{a} debhelper{a} dh-autoreconf{a} dh-strip-nondeterminism{a} docutils-common{a} dwz{a} file{a} fonts-font-awesome{a} fonts-lato{a} freetds-common{a} freetds-dev{a} gawk{a} gettext{a} gettext-base{a} groff-base{a} help2man{a} intltool-debian{a} libarchive-zip-perl{a} libct4{a} libdebhelper-perl{a} libelf1{a} libexpat1{a} libffi-dev{a} libfile-stripnondeterminism-perl{a} libglib2.0-0{a} libicu67{a} libjs-jquery{a} libjs-sphinxdoc{a} libjs-underscore{a} liblocale-gettext-perl{a} libmagic-mgc{a} libmagic1{a} libmpdec3{a} libpipeline1{a} libpython3-stdlib{a} libpython3.9-minimal{a} libpython3.9-stdlib{a} libreadline8{a} libsigsegv2{a} libsub-override-perl{a} libsybdb5{a} libtool{a} libuchardet0{a} libxml2{a} m4{a} man-db{a} media-types{a} openssl{a} pkg-config{a} po-debconf{a} python-babel-localedata{a} python3{a} python3-alabaster{a} python3-babel{a} python3-certifi{a} python3-chardet{a} python3-distutils{a} python3-docutils{a} python3-idna{a} python3-imagesize{a} python3-jinja2{a} python3-lib2to3{a} python3-markupsafe{a} python3-minimal{a} python3-packaging{a} python3-pkg-resources{a} python3-pygments{a} python3-pyparsing{a} python3-requests{a} python3-roman{a} python3-six{a} python3-snowballstemmer{a} python3-sphinx{a} python3-sphinx-rtd-theme{a} python3-tz{a} python3-urllib3{a} python3.9{a} python3.9-minimal{a} readline-common{a} sbcl{a} sensible-utils{a} sgml-base{a} sphinx-common{a} sphinx-rtd-theme-common{a} tzdata{a} xml-core{a} zlib1g-dev{a} The following packages are RECOMMENDED but will NOT be installed: binfmt-support cl-fiveam cl-ptester curl javascript-common libarchive-cpio-perl libglib2.0-data libltdl-dev libmail-sendmail-perl libpaper-utils lynx python3-pil shared-mime-info wget xdg-user-dirs 0 packages upgraded, 159 newly installed, 0 to remove and 0 not upgraded. Need to get 66.5 MB of archives. After unpacking 301 MB will be used. Writing extended state information... Get: 1 http://deb.debian.org/debian bullseye/main amd64 bsdextrautils amd64 2.36.1-8+deb11u1 [145 kB] Get: 2 http://deb.debian.org/debian bullseye/main amd64 libuchardet0 amd64 0.0.7-1 [67.8 kB] Get: 3 http://deb.debian.org/debian bullseye/main amd64 groff-base amd64 1.22.4-6 [936 kB] Get: 4 http://deb.debian.org/debian bullseye/main amd64 libpipeline1 amd64 1.5.3-1 [34.3 kB] Get: 5 http://deb.debian.org/debian bullseye/main amd64 man-db amd64 2.9.4-2 [1354 kB] Get: 6 http://deb.debian.org/debian bullseye/main amd64 fonts-lato all 2.0-2.1 [2696 kB] Get: 7 http://deb.debian.org/debian bullseye/main amd64 readline-common all 8.1-1 [73.7 kB] Get: 8 http://deb.debian.org/debian bullseye/main amd64 libreadline8 amd64 8.1-1 [169 kB] Get: 9 http://deb.debian.org/debian bullseye/main amd64 libsigsegv2 amd64 2.13-1 [34.8 kB] Get: 10 http://deb.debian.org/debian bullseye/main amd64 gawk amd64 1:5.1.0-1 [605 kB] Get: 11 http://deb.debian.org/debian bullseye/main amd64 liblocale-gettext-perl amd64 1.07-4+b1 [19.0 kB] Get: 12 http://deb.debian.org/debian bullseye/main amd64 libpython3.9-minimal amd64 3.9.2-1 [801 kB] Get: 13 http://deb.debian.org/debian bullseye/main amd64 libexpat1 amd64 2.2.10-2+deb11u5 [98.2 kB] Get: 14 http://deb.debian.org/debian bullseye/main amd64 python3.9-minimal amd64 3.9.2-1 [1955 kB] Get: 15 http://deb.debian.org/debian bullseye/main amd64 python3-minimal amd64 3.9.2-3 [38.2 kB] Get: 16 http://deb.debian.org/debian bullseye/main amd64 media-types all 4.0.0 [30.3 kB] Get: 17 http://deb.debian.org/debian bullseye/main amd64 tzdata all 2021a-1+deb11u10 [286 kB] Get: 18 http://deb.debian.org/debian bullseye/main amd64 libmpdec3 amd64 2.5.1-1 [87.7 kB] Get: 19 http://deb.debian.org/debian bullseye/main amd64 libpython3.9-stdlib amd64 3.9.2-1 [1684 kB] Get: 20 http://deb.debian.org/debian bullseye/main amd64 python3.9 amd64 3.9.2-1 [466 kB] Get: 21 http://deb.debian.org/debian bullseye/main amd64 libpython3-stdlib amd64 3.9.2-3 [21.4 kB] Get: 22 http://deb.debian.org/debian bullseye/main amd64 python3 amd64 3.9.2-3 [37.9 kB] Get: 23 http://deb.debian.org/debian bullseye/main amd64 sgml-base all 1.30 [15.1 kB] Get: 24 http://deb.debian.org/debian bullseye/main amd64 sensible-utils all 0.0.14 [14.8 kB] Get: 25 http://deb.debian.org/debian bullseye/main amd64 openssl amd64 1.1.1w-0+deb11u1 [859 kB] Get: 26 http://deb.debian.org/debian bullseye/main amd64 ca-certificates all 20210119 [158 kB] Get: 27 http://deb.debian.org/debian bullseye/main amd64 libmagic-mgc amd64 1:5.39-3+deb11u1 [273 kB] Get: 28 http://deb.debian.org/debian bullseye/main amd64 libmagic1 amd64 1:5.39-3+deb11u1 [128 kB] Get: 29 http://deb.debian.org/debian bullseye/main amd64 file amd64 1:5.39-3+deb11u1 [69.2 kB] Get: 30 http://deb.debian.org/debian bullseye/main amd64 gettext-base amd64 0.21-4 [175 kB] Get: 31 http://deb.debian.org/debian bullseye/main amd64 m4 amd64 1.4.18-5 [204 kB] Get: 32 http://deb.debian.org/debian bullseye/main amd64 autoconf all 2.69-14 [313 kB] Get: 33 http://deb.debian.org/debian bullseye/main amd64 autotools-dev all 20180224.1+nmu1 [77.1 kB] Get: 34 http://deb.debian.org/debian bullseye/main amd64 automake all 1:1.16.3-2 [814 kB] Get: 35 http://deb.debian.org/debian bullseye/main amd64 autopoint all 0.21-4 [510 kB] Get: 36 http://deb.debian.org/debian bullseye/main amd64 sbcl amd64 2:2.1.1-2 [9187 kB] Get: 37 http://deb.debian.org/debian bullseye/main amd64 buildapp amd64 1.5.6-2 [7985 kB] Get: 38 http://deb.debian.org/debian bullseye/main amd64 cl-abnf all 20150608-1.1 [10.6 kB] Get: 39 http://deb.debian.org/debian bullseye/main amd64 cl-alexandria all 20200821.gitf35e232-1 [210 kB] Get: 40 http://deb.debian.org/debian bullseye/main amd64 cl-anaphora all 20190828.git018590d-1 [7724 B] Get: 41 http://deb.debian.org/debian bullseye/main amd64 cl-asdf all 2:3.3.4-2 [1263 kB] Get: 42 http://deb.debian.org/debian bullseye/main amd64 cl-asdf-finalizers all 20170403-1.1 [9620 B] Get: 43 http://deb.debian.org/debian bullseye/main amd64 cl-asdf-system-connections all 20170124-1.1 [5080 B] Get: 44 http://deb.debian.org/debian bullseye/main amd64 cl-trivial-features all 20200702.gite7bb968-1 [10.4 kB] Get: 45 http://deb.debian.org/debian bullseye/main amd64 cl-trivial-gray-streams all 20200731.git8e6a1a0-1 [10.4 kB] Get: 46 http://deb.debian.org/debian bullseye/main amd64 cl-babel all 20200719.gitf892d05-1 [126 kB] Get: 47 http://deb.debian.org/debian bullseye/main amd64 cl-rt all 20090812.gita6a7503-1 [13.2 kB] Get: 48 http://deb.debian.org/debian bullseye/main amd64 cl-kmrcl all 1.111-2 [46.7 kB] Get: 49 http://deb.debian.org/debian bullseye/main amd64 cl-base64 all 3.4.0-1 [9936 B] Get: 50 http://deb.debian.org/debian bullseye/main amd64 cl-bordeaux-threads all 0.8.8-4 [23.2 kB] Get: 51 http://deb.debian.org/debian bullseye/main amd64 libglib2.0-0 amd64 2.66.8-1 [1370 kB] Get: 52 http://deb.debian.org/debian bullseye/main amd64 pkg-config amd64 0.29.2-1 [65.1 kB] Get: 53 http://deb.debian.org/debian bullseye/main amd64 libffi-dev amd64 3.3-6 [56.5 kB] Get: 54 http://deb.debian.org/debian bullseye/main amd64 zlib1g-dev amd64 1:1.2.11.dfsg-2+deb11u2 [191 kB] Get: 55 http://deb.debian.org/debian bullseye/main amd64 cl-cffi all 1:0.23.0-1 [1682 kB] Get: 56 http://deb.debian.org/debian bullseye/main amd64 cl-chipz all 20190121.git0f6c9ea-1 [37.2 kB] Get: 57 http://deb.debian.org/debian bullseye/main amd64 cl-chunga all 20200403.gitcb333cd-1 [19.4 kB] Get: 58 http://deb.debian.org/debian bullseye/main amd64 cl-closer-mop all 2:20201029.git91f877a-1 [25.6 kB] Get: 59 http://deb.debian.org/debian bullseye/main amd64 cl-closure-common all 20101107-1.1 [25.2 kB] Get: 60 http://deb.debian.org/debian bullseye/main amd64 cl-command-line-arguments all 20151218-1.1 [9544 B] Get: 61 http://deb.debian.org/debian bullseye/main amd64 cl-metatilities-base all 20170403-1.1 [51.9 kB] Get: 62 http://deb.debian.org/debian bullseye/main amd64 cl-containers all 20170403-1.1 [114 kB] Get: 63 http://deb.debian.org/debian bullseye/main amd64 cl-iterate all 20180228-1.1 [45.9 kB] Get: 64 http://deb.debian.org/debian bullseye/main amd64 cl-ppcre all 20190407.git1ca0cd9-2 [113 kB] Get: 65 http://deb.debian.org/debian bullseye/main amd64 cl-flexi-streams all 20200913.git911a3e2-1 [173 kB] Get: 66 http://deb.debian.org/debian bullseye/main amd64 cl-unicode all 20201101.git54bdf2c-1 [1316 kB] Get: 67 http://deb.debian.org/debian bullseye/main amd64 cl-named-readtables all 20201221.gitc5689a4-1 [28.0 kB] Get: 68 http://deb.debian.org/debian bullseye/main amd64 cl-interpol all 20201106.git70a1137-1 [32.8 kB] Get: 69 http://deb.debian.org/debian bullseye/main amd64 cl-csv all 20200929.git68ecb5d-1 [27.7 kB] Get: 70 http://deb.debian.org/debian bullseye/main amd64 cl-cxml all 20110619-2.1 [82.5 kB] Get: 71 http://deb.debian.org/debian bullseye/main amd64 cl-db3 all 20200212-1 [8388 B] Get: 72 http://deb.debian.org/debian bullseye/main amd64 cl-puri all 1:1.5.7.2-1 [19.1 kB] Get: 73 http://deb.debian.org/debian bullseye/main amd64 cl-split-sequence all 1:2.0.0-1 [10.8 kB] Get: 74 http://deb.debian.org/debian bullseye/main amd64 cl-usocket all 0.8.3-2 [74.9 kB] Get: 75 http://deb.debian.org/debian bullseye/main amd64 cl-trivial-garbage all 20200801.git2319892-1 [8616 B] Get: 76 http://deb.debian.org/debian bullseye/main amd64 cl-plus-ssl all 20200609.gitff4634a-1 [42.9 kB] Get: 77 http://deb.debian.org/debian bullseye/main amd64 cl-drakma all 2.0.7-1 [46.0 kB] Get: 78 http://deb.debian.org/debian bullseye/main amd64 cl-dynamic-classes all 20130128-2.1 [6916 B] Get: 79 http://deb.debian.org/debian bullseye/main amd64 cl-esrap all 20180430-1.1 [43.5 kB] Get: 80 http://deb.debian.org/debian bullseye/main amd64 cl-fad all 20200513.git1c15a90-1 [23.8 kB] Get: 81 http://deb.debian.org/debian bullseye/main amd64 cl-garbage-pools all 20130720-1.1 [3144 B] Get: 82 http://deb.debian.org/debian bullseye/main amd64 cl-ieee-floats all 20170830-1.1 [6828 B] Get: 83 http://deb.debian.org/debian bullseye/main amd64 cl-ironclad all 0.54-1 [1165 kB] Get: 84 http://deb.debian.org/debian bullseye/main amd64 cl-ixf all 20180228-1.1 [9852 B] Get: 85 http://deb.debian.org/debian bullseye/main amd64 cl-local-time all 20180228-1.1 [26.7 kB] Get: 86 http://deb.debian.org/debian bullseye/main amd64 cl-log all 1.0.1-1.1 [20.8 kB] Get: 87 http://deb.debian.org/debian bullseye/main amd64 cl-lparallel all 20160825-1.1 [49.8 kB] Get: 88 http://deb.debian.org/debian bullseye/main amd64 cl-metabang-bind all 20171130-1.1 [13.8 kB] Get: 89 http://deb.debian.org/debian bullseye/main amd64 cl-markdown all 20101006-2.1 [37.4 kB] Get: 90 http://deb.debian.org/debian bullseye/main amd64 cl-md5 all 1:20180224.gitb141260-1 [14.6 kB] Get: 91 http://deb.debian.org/debian bullseye/main amd64 freetds-common all 1.2.3-1 [32.5 kB] Get: 92 http://deb.debian.org/debian bullseye/main amd64 libct4 amd64 1.2.3-1 [164 kB] Get: 93 http://deb.debian.org/debian bullseye/main amd64 libsybdb5 amd64 1.2.3-1 [191 kB] Get: 94 http://deb.debian.org/debian bullseye/main amd64 freetds-dev amd64 1.2.3-1 [282 kB] Get: 95 http://deb.debian.org/debian bullseye/main amd64 cl-mssql all 20180228-1.1 [8652 B] Get: 96 http://deb.debian.org/debian bullseye/main amd64 cl-mustache all 0.12.1-9-g684f227-1.1 [9880 B] Get: 97 http://deb.debian.org/debian bullseye/main amd64 cl-parse-number all 1.7-1.1 [7368 B] Get: 98 http://deb.debian.org/debian bullseye/main amd64 cl-postgres all 20180430-2 [33.2 kB] Get: 99 http://deb.debian.org/debian bullseye/main amd64 cl-s-sql all 20180430-2 [28.6 kB] Get: 100 http://deb.debian.org/debian bullseye/main amd64 cl-postmodern all 20180430-2 [63.3 kB] Get: 101 http://deb.debian.org/debian bullseye/main amd64 cl-py-configparser all 20170830-1.1 [8612 B] Get: 102 http://deb.debian.org/debian bullseye/main amd64 cl-qmynd all 20180131-1.1 [37.3 kB] Get: 103 http://deb.debian.org/debian bullseye/main amd64 cl-quri all 20150804-1.1 [66.5 kB] Get: 104 http://deb.debian.org/debian bullseye/main amd64 cl-simple-date all 20180430-2 [9016 B] Get: 105 http://deb.debian.org/debian bullseye/main amd64 cl-sqlite all 20130615-2.1 [14.7 kB] Get: 106 http://deb.debian.org/debian bullseye/main amd64 cl-trivial-backtrace all 20200511.git6eb65bd-1 [10.1 kB] Get: 107 http://deb.debian.org/debian bullseye/main amd64 cl-trivial-utf-8 all 20111001-1.1 [7760 B] Get: 108 http://deb.debian.org/debian bullseye/main amd64 cl-utilities all 1.2.4-3.2 [22.2 kB] Get: 109 http://deb.debian.org/debian bullseye/main amd64 cl-uuid all 20130813-1.1 [6876 B] Get: 110 http://deb.debian.org/debian bullseye/main amd64 cl-yason all 0.7.6-1.1 [10.0 kB] Get: 111 http://deb.debian.org/debian bullseye/main amd64 cl-zs3 all 1.3.1-1.1 [48.6 kB] Get: 112 http://deb.debian.org/debian bullseye/main amd64 libdebhelper-perl all 13.3.4 [189 kB] Get: 113 http://deb.debian.org/debian bullseye/main amd64 libtool all 2.4.6-15 [513 kB] Get: 114 http://deb.debian.org/debian bullseye/main amd64 dh-autoreconf all 20 [17.1 kB] Get: 115 http://deb.debian.org/debian bullseye/main amd64 libarchive-zip-perl all 1.68-1 [104 kB] Get: 116 http://deb.debian.org/debian bullseye/main amd64 libsub-override-perl all 0.09-2 [10.2 kB] Get: 117 http://deb.debian.org/debian bullseye/main amd64 libfile-stripnondeterminism-perl all 1.12.0-1 [26.3 kB] Get: 118 http://deb.debian.org/debian bullseye/main amd64 dh-strip-nondeterminism all 1.12.0-1 [15.4 kB] Get: 119 http://deb.debian.org/debian bullseye/main amd64 libelf1 amd64 0.183-1 [165 kB] Get: 120 http://deb.debian.org/debian bullseye/main amd64 dwz amd64 0.13+20210201-1 [175 kB] Get: 121 http://deb.debian.org/debian bullseye/main amd64 libicu67 amd64 67.1-7 [8622 kB] Get: 122 http://deb.debian.org/debian bullseye/main amd64 libxml2 amd64 2.9.10+dfsg-6.7+deb11u4 [693 kB] Get: 123 http://deb.debian.org/debian bullseye/main amd64 gettext amd64 0.21-4 [1311 kB] Get: 124 http://deb.debian.org/debian bullseye/main amd64 intltool-debian all 0.35.0+20060710.5 [26.8 kB] Get: 125 http://deb.debian.org/debian bullseye/main amd64 po-debconf all 1.0.21+nmu1 [248 kB] Get: 126 http://deb.debian.org/debian bullseye/main amd64 debhelper all 13.3.4 [1049 kB] Get: 127 http://deb.debian.org/debian bullseye/main amd64 xml-core all 0.18+nmu1 [23.8 kB] Get: 128 http://deb.debian.org/debian bullseye/main amd64 docutils-common all 0.16+dfsg-4 [129 kB] Get: 129 http://deb.debian.org/debian bullseye/main amd64 fonts-font-awesome all 5.0.10+really4.7.0~dfsg-4.1 [517 kB] Get: 130 http://deb.debian.org/debian bullseye/main amd64 help2man amd64 1.48.1 [190 kB] Get: 131 http://deb.debian.org/debian bullseye/main amd64 libjs-jquery all 3.5.1+dfsg+~3.5.5-7 [315 kB] Get: 132 http://deb.debian.org/debian bullseye/main amd64 libjs-underscore all 1.9.1~dfsg-3 [100 kB] Get: 133 http://deb.debian.org/debian bullseye/main amd64 libjs-sphinxdoc all 3.4.3-2 [127 kB] Get: 134 http://deb.debian.org/debian bullseye/main amd64 python-babel-localedata all 2.8.0+dfsg.1-7 [4997 kB] Get: 135 http://deb.debian.org/debian bullseye/main amd64 python3-alabaster all 0.7.8-1.1 [18.6 kB] Get: 136 http://deb.debian.org/debian bullseye/main amd64 python3-pkg-resources all 52.0.0-4 [190 kB] Get: 137 http://deb.debian.org/debian bullseye/main amd64 python3-tz all 2021.1-1 [34.8 kB] Get: 138 http://deb.debian.org/debian bullseye/main amd64 python3-babel all 2.8.0+dfsg.1-7 [100 kB] Get: 139 http://deb.debian.org/debian bullseye/main amd64 python3-certifi all 2020.6.20-1 [151 kB] Get: 140 http://deb.debian.org/debian bullseye/main amd64 python3-chardet all 4.0.0-1 [99.0 kB] Get: 141 http://deb.debian.org/debian bullseye/main amd64 python3-lib2to3 all 3.9.2-1 [77.8 kB] Get: 142 http://deb.debian.org/debian bullseye/main amd64 python3-distutils all 3.9.2-1 [143 kB] Get: 143 http://deb.debian.org/debian bullseye/main amd64 python3-roman all 2.0.0-5 [9064 B] Get: 144 http://deb.debian.org/debian bullseye/main amd64 python3-docutils all 0.16+dfsg-4 [384 kB] Get: 145 http://deb.debian.org/debian bullseye/main amd64 python3-idna all 2.10-1 [37.4 kB] Get: 146 http://deb.debian.org/debian bullseye/main amd64 python3-imagesize all 1.2.0-2 [5824 B] Get: 147 http://deb.debian.org/debian bullseye/main amd64 python3-markupsafe amd64 1.1.1-1+b3 [15.2 kB] Get: 148 http://deb.debian.org/debian bullseye/main amd64 python3-jinja2 all 2.11.3-1 [114 kB] Get: 149 http://deb.debian.org/debian bullseye/main amd64 python3-pyparsing all 2.4.7-1 [109 kB] Get: 150 http://deb.debian.org/debian bullseye/main amd64 python3-packaging all 20.9-2 [33.5 kB] Get: 151 http://deb.debian.org/debian bullseye/main amd64 python3-pygments all 2.7.1+dfsg-2.1 [657 kB] Get: 152 http://deb.debian.org/debian bullseye/main amd64 python3-six all 1.16.0-2 [17.5 kB] Get: 153 http://deb.debian.org/debian bullseye/main amd64 python3-urllib3 all 1.26.5-1~exp1 [114 kB] Get: 154 http://deb.debian.org/debian bullseye/main amd64 python3-requests all 2.25.1+dfsg-2 [69.3 kB] Get: 155 http://deb.debian.org/debian bullseye/main amd64 python3-snowballstemmer all 2.1.0-1 [58.7 kB] Get: 156 http://deb.debian.org/debian bullseye/main amd64 sphinx-common all 3.4.3-2 [578 kB] Get: 157 http://deb.debian.org/debian bullseye/main amd64 python3-sphinx all 3.4.3-2 [545 kB] Get: 158 http://deb.debian.org/debian bullseye/main amd64 sphinx-rtd-theme-common all 0.5.1+dfsg-1 [995 kB] Get: 159 http://deb.debian.org/debian bullseye/main amd64 python3-sphinx-rtd-theme all 0.5.1+dfsg-1 [20.9 kB] Fetched 66.5 MB in 6s (11.8 MB/s) debconf: delaying package configuration, since apt-utils is not installed Selecting previously unselected package bsdextrautils. (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 ... 17743 files and directories currently installed.) Preparing to unpack .../0-bsdextrautils_2.36.1-8+deb11u1_amd64.deb ... Unpacking bsdextrautils (2.36.1-8+deb11u1) ... Selecting previously unselected package libuchardet0:amd64. Preparing to unpack .../1-libuchardet0_0.0.7-1_amd64.deb ... Unpacking libuchardet0:amd64 (0.0.7-1) ... Selecting previously unselected package groff-base. Preparing to unpack .../2-groff-base_1.22.4-6_amd64.deb ... Unpacking groff-base (1.22.4-6) ... Selecting previously unselected package libpipeline1:amd64. Preparing to unpack .../3-libpipeline1_1.5.3-1_amd64.deb ... Unpacking libpipeline1:amd64 (1.5.3-1) ... Selecting previously unselected package man-db. Preparing to unpack .../4-man-db_2.9.4-2_amd64.deb ... Unpacking man-db (2.9.4-2) ... Selecting previously unselected package fonts-lato. Preparing to unpack .../5-fonts-lato_2.0-2.1_all.deb ... Unpacking fonts-lato (2.0-2.1) ... Selecting previously unselected package readline-common. Preparing to unpack .../6-readline-common_8.1-1_all.deb ... Unpacking readline-common (8.1-1) ... Selecting previously unselected package libreadline8:amd64. Preparing to unpack .../7-libreadline8_8.1-1_amd64.deb ... Unpacking libreadline8:amd64 (8.1-1) ... Selecting previously unselected package libsigsegv2:amd64. Preparing to unpack .../8-libsigsegv2_2.13-1_amd64.deb ... Unpacking libsigsegv2:amd64 (2.13-1) ... Setting up readline-common (8.1-1) ... Setting up libreadline8:amd64 (8.1-1) ... Setting up libsigsegv2:amd64 (2.13-1) ... Selecting previously unselected package gawk. (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 ... 18375 files and directories currently installed.) Preparing to unpack .../gawk_1%3a5.1.0-1_amd64.deb ... Unpacking gawk (1:5.1.0-1) ... Selecting previously unselected package liblocale-gettext-perl. Preparing to unpack .../liblocale-gettext-perl_1.07-4+b1_amd64.deb ... Unpacking liblocale-gettext-perl (1.07-4+b1) ... Selecting previously unselected package libpython3.9-minimal:amd64. Preparing to unpack .../libpython3.9-minimal_3.9.2-1_amd64.deb ... Unpacking libpython3.9-minimal:amd64 (3.9.2-1) ... Selecting previously unselected package libexpat1:amd64. Preparing to unpack .../libexpat1_2.2.10-2+deb11u5_amd64.deb ... Unpacking libexpat1:amd64 (2.2.10-2+deb11u5) ... Selecting previously unselected package python3.9-minimal. Preparing to unpack .../python3.9-minimal_3.9.2-1_amd64.deb ... Unpacking python3.9-minimal (3.9.2-1) ... Setting up libpython3.9-minimal:amd64 (3.9.2-1) ... Setting up libexpat1:amd64 (2.2.10-2+deb11u5) ... Setting up python3.9-minimal (3.9.2-1) ... Selecting previously unselected package python3-minimal. (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 ... 18859 files and directories currently installed.) Preparing to unpack .../0-python3-minimal_3.9.2-3_amd64.deb ... Unpacking python3-minimal (3.9.2-3) ... Selecting previously unselected package media-types. Preparing to unpack .../1-media-types_4.0.0_all.deb ... Unpacking media-types (4.0.0) ... Selecting previously unselected package tzdata. Preparing to unpack .../2-tzdata_2021a-1+deb11u10_all.deb ... Unpacking tzdata (2021a-1+deb11u10) ... Selecting previously unselected package libmpdec3:amd64. Preparing to unpack .../3-libmpdec3_2.5.1-1_amd64.deb ... Unpacking libmpdec3:amd64 (2.5.1-1) ... Selecting previously unselected package libpython3.9-stdlib:amd64. Preparing to unpack .../4-libpython3.9-stdlib_3.9.2-1_amd64.deb ... Unpacking libpython3.9-stdlib:amd64 (3.9.2-1) ... Selecting previously unselected package python3.9. Preparing to unpack .../5-python3.9_3.9.2-1_amd64.deb ... Unpacking python3.9 (3.9.2-1) ... Selecting previously unselected package libpython3-stdlib:amd64. Preparing to unpack .../6-libpython3-stdlib_3.9.2-3_amd64.deb ... Unpacking libpython3-stdlib:amd64 (3.9.2-3) ... Setting up python3-minimal (3.9.2-3) ... Selecting previously unselected package python3. (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 ... 21118 files and directories currently installed.) Preparing to unpack .../000-python3_3.9.2-3_amd64.deb ... Unpacking python3 (3.9.2-3) ... Selecting previously unselected package sgml-base. Preparing to unpack .../001-sgml-base_1.30_all.deb ... Unpacking sgml-base (1.30) ... Selecting previously unselected package sensible-utils. Preparing to unpack .../002-sensible-utils_0.0.14_all.deb ... Unpacking sensible-utils (0.0.14) ... Selecting previously unselected package openssl. Preparing to unpack .../003-openssl_1.1.1w-0+deb11u1_amd64.deb ... Unpacking openssl (1.1.1w-0+deb11u1) ... Selecting previously unselected package ca-certificates. Preparing to unpack .../004-ca-certificates_20210119_all.deb ... Unpacking ca-certificates (20210119) ... Selecting previously unselected package libmagic-mgc. Preparing to unpack .../005-libmagic-mgc_1%3a5.39-3+deb11u1_amd64.deb ... Unpacking libmagic-mgc (1:5.39-3+deb11u1) ... Selecting previously unselected package libmagic1:amd64. Preparing to unpack .../006-libmagic1_1%3a5.39-3+deb11u1_amd64.deb ... Unpacking libmagic1:amd64 (1:5.39-3+deb11u1) ... Selecting previously unselected package file. Preparing to unpack .../007-file_1%3a5.39-3+deb11u1_amd64.deb ... Unpacking file (1:5.39-3+deb11u1) ... Selecting previously unselected package gettext-base. Preparing to unpack .../008-gettext-base_0.21-4_amd64.deb ... Unpacking gettext-base (0.21-4) ... Selecting previously unselected package m4. Preparing to unpack .../009-m4_1.4.18-5_amd64.deb ... Unpacking m4 (1.4.18-5) ... Selecting previously unselected package autoconf. Preparing to unpack .../010-autoconf_2.69-14_all.deb ... Unpacking autoconf (2.69-14) ... Selecting previously unselected package autotools-dev. Preparing to unpack .../011-autotools-dev_20180224.1+nmu1_all.deb ... Unpacking autotools-dev (20180224.1+nmu1) ... Selecting previously unselected package automake. Preparing to unpack .../012-automake_1%3a1.16.3-2_all.deb ... Unpacking automake (1:1.16.3-2) ... Selecting previously unselected package autopoint. Preparing to unpack .../013-autopoint_0.21-4_all.deb ... Unpacking autopoint (0.21-4) ... Selecting previously unselected package sbcl. Preparing to unpack .../014-sbcl_2%3a2.1.1-2_amd64.deb ... Unpacking sbcl (2:2.1.1-2) ... Selecting previously unselected package buildapp. Preparing to unpack .../015-buildapp_1.5.6-2_amd64.deb ... Unpacking buildapp (1.5.6-2) ... Selecting previously unselected package cl-abnf. Preparing to unpack .../016-cl-abnf_20150608-1.1_all.deb ... Unpacking cl-abnf (20150608-1.1) ... Selecting previously unselected package cl-alexandria. Preparing to unpack .../017-cl-alexandria_20200821.gitf35e232-1_all.deb ... Unpacking cl-alexandria (20200821.gitf35e232-1) ... Selecting previously unselected package cl-anaphora. Preparing to unpack .../018-cl-anaphora_20190828.git018590d-1_all.deb ... Unpacking cl-anaphora (20190828.git018590d-1) ... Selecting previously unselected package cl-asdf. Preparing to unpack .../019-cl-asdf_2%3a3.3.4-2_all.deb ... Unpacking cl-asdf (2:3.3.4-2) ... Selecting previously unselected package cl-asdf-finalizers. Preparing to unpack .../020-cl-asdf-finalizers_20170403-1.1_all.deb ... Unpacking cl-asdf-finalizers (20170403-1.1) ... Selecting previously unselected package cl-asdf-system-connections. Preparing to unpack .../021-cl-asdf-system-connections_20170124-1.1_all.deb ... Unpacking cl-asdf-system-connections (20170124-1.1) ... Selecting previously unselected package cl-trivial-features. Preparing to unpack .../022-cl-trivial-features_20200702.gite7bb968-1_all.deb ... Unpacking cl-trivial-features (20200702.gite7bb968-1) ... Selecting previously unselected package cl-trivial-gray-streams. Preparing to unpack .../023-cl-trivial-gray-streams_20200731.git8e6a1a0-1_all.deb ... Unpacking cl-trivial-gray-streams (20200731.git8e6a1a0-1) ... Selecting previously unselected package cl-babel. Preparing to unpack .../024-cl-babel_20200719.gitf892d05-1_all.deb ... Unpacking cl-babel (20200719.gitf892d05-1) ... Selecting previously unselected package cl-rt. Preparing to unpack .../025-cl-rt_20090812.gita6a7503-1_all.deb ... Unpacking cl-rt (20090812.gita6a7503-1) ... Selecting previously unselected package cl-kmrcl. Preparing to unpack .../026-cl-kmrcl_1.111-2_all.deb ... Unpacking cl-kmrcl (1.111-2) ... Selecting previously unselected package cl-base64. Preparing to unpack .../027-cl-base64_3.4.0-1_all.deb ... Unpacking cl-base64 (3.4.0-1) ... Selecting previously unselected package cl-bordeaux-threads. Preparing to unpack .../028-cl-bordeaux-threads_0.8.8-4_all.deb ... Unpacking cl-bordeaux-threads (0.8.8-4) ... Selecting previously unselected package libglib2.0-0:amd64. Preparing to unpack .../029-libglib2.0-0_2.66.8-1_amd64.deb ... Unpacking libglib2.0-0:amd64 (2.66.8-1) ... Selecting previously unselected package pkg-config. Preparing to unpack .../030-pkg-config_0.29.2-1_amd64.deb ... Unpacking pkg-config (0.29.2-1) ... Selecting previously unselected package libffi-dev:amd64. Preparing to unpack .../031-libffi-dev_3.3-6_amd64.deb ... Unpacking libffi-dev:amd64 (3.3-6) ... Selecting previously unselected package zlib1g-dev:amd64. Preparing to unpack .../032-zlib1g-dev_1%3a1.2.11.dfsg-2+deb11u2_amd64.deb ... Unpacking zlib1g-dev:amd64 (1:1.2.11.dfsg-2+deb11u2) ... Selecting previously unselected package cl-cffi. Preparing to unpack .../033-cl-cffi_1%3a0.23.0-1_all.deb ... Unpacking cl-cffi (1:0.23.0-1) ... Selecting previously unselected package cl-chipz. Preparing to unpack .../034-cl-chipz_20190121.git0f6c9ea-1_all.deb ... Unpacking cl-chipz (20190121.git0f6c9ea-1) ... Selecting previously unselected package cl-chunga. Preparing to unpack .../035-cl-chunga_20200403.gitcb333cd-1_all.deb ... Unpacking cl-chunga (20200403.gitcb333cd-1) ... Selecting previously unselected package cl-closer-mop. Preparing to unpack .../036-cl-closer-mop_2%3a20201029.git91f877a-1_all.deb ... Unpacking cl-closer-mop (2:20201029.git91f877a-1) ... Selecting previously unselected package cl-closure-common. Preparing to unpack .../037-cl-closure-common_20101107-1.1_all.deb ... Unpacking cl-closure-common (20101107-1.1) ... Selecting previously unselected package cl-command-line-arguments. Preparing to unpack .../038-cl-command-line-arguments_20151218-1.1_all.deb ... Unpacking cl-command-line-arguments (20151218-1.1) ... Selecting previously unselected package cl-metatilities-base. Preparing to unpack .../039-cl-metatilities-base_20170403-1.1_all.deb ... Unpacking cl-metatilities-base (20170403-1.1) ... Selecting previously unselected package cl-containers. Preparing to unpack .../040-cl-containers_20170403-1.1_all.deb ... Unpacking cl-containers (20170403-1.1) ... Selecting previously unselected package cl-iterate. Preparing to unpack .../041-cl-iterate_20180228-1.1_all.deb ... Unpacking cl-iterate (20180228-1.1) ... Selecting previously unselected package cl-ppcre. Preparing to unpack .../042-cl-ppcre_20190407.git1ca0cd9-2_all.deb ... Unpacking cl-ppcre (20190407.git1ca0cd9-2) ... Selecting previously unselected package cl-flexi-streams. Preparing to unpack .../043-cl-flexi-streams_20200913.git911a3e2-1_all.deb ... Unpacking cl-flexi-streams (20200913.git911a3e2-1) ... Selecting previously unselected package cl-unicode. Preparing to unpack .../044-cl-unicode_20201101.git54bdf2c-1_all.deb ... Unpacking cl-unicode (20201101.git54bdf2c-1) ... Selecting previously unselected package cl-named-readtables. Preparing to unpack .../045-cl-named-readtables_20201221.gitc5689a4-1_all.deb ... Unpacking cl-named-readtables (20201221.gitc5689a4-1) ... Selecting previously unselected package cl-interpol. Preparing to unpack .../046-cl-interpol_20201106.git70a1137-1_all.deb ... Unpacking cl-interpol (20201106.git70a1137-1) ... Selecting previously unselected package cl-csv. Preparing to unpack .../047-cl-csv_20200929.git68ecb5d-1_all.deb ... Unpacking cl-csv (20200929.git68ecb5d-1) ... Selecting previously unselected package cl-cxml. Preparing to unpack .../048-cl-cxml_20110619-2.1_all.deb ... Unpacking cl-cxml (20110619-2.1) ... Selecting previously unselected package cl-db3. Preparing to unpack .../049-cl-db3_20200212-1_all.deb ... Unpacking cl-db3 (20200212-1) ... Selecting previously unselected package cl-puri. Preparing to unpack .../050-cl-puri_1%3a1.5.7.2-1_all.deb ... Unpacking cl-puri (1:1.5.7.2-1) ... Selecting previously unselected package cl-split-sequence. Preparing to unpack .../051-cl-split-sequence_1%3a2.0.0-1_all.deb ... Unpacking cl-split-sequence (1:2.0.0-1) ... Selecting previously unselected package cl-usocket. Preparing to unpack .../052-cl-usocket_0.8.3-2_all.deb ... Unpacking cl-usocket (0.8.3-2) ... Selecting previously unselected package cl-trivial-garbage. Preparing to unpack .../053-cl-trivial-garbage_20200801.git2319892-1_all.deb ... Unpacking cl-trivial-garbage (20200801.git2319892-1) ... Selecting previously unselected package cl-plus-ssl. Preparing to unpack .../054-cl-plus-ssl_20200609.gitff4634a-1_all.deb ... Unpacking cl-plus-ssl (20200609.gitff4634a-1) ... Selecting previously unselected package cl-drakma. Preparing to unpack .../055-cl-drakma_2.0.7-1_all.deb ... Unpacking cl-drakma (2.0.7-1) ... Selecting previously unselected package cl-dynamic-classes. Preparing to unpack .../056-cl-dynamic-classes_20130128-2.1_all.deb ... Unpacking cl-dynamic-classes (20130128-2.1) ... Selecting previously unselected package cl-esrap. Preparing to unpack .../057-cl-esrap_20180430-1.1_all.deb ... Unpacking cl-esrap (20180430-1.1) ... Selecting previously unselected package cl-fad. Preparing to unpack .../058-cl-fad_20200513.git1c15a90-1_all.deb ... Unpacking cl-fad (20200513.git1c15a90-1) ... Selecting previously unselected package cl-garbage-pools. Preparing to unpack .../059-cl-garbage-pools_20130720-1.1_all.deb ... Unpacking cl-garbage-pools (20130720-1.1) ... Selecting previously unselected package cl-ieee-floats. Preparing to unpack .../060-cl-ieee-floats_20170830-1.1_all.deb ... Unpacking cl-ieee-floats (20170830-1.1) ... Selecting previously unselected package cl-ironclad. Preparing to unpack .../061-cl-ironclad_0.54-1_all.deb ... Unpacking cl-ironclad (0.54-1) ... Selecting previously unselected package cl-ixf. Preparing to unpack .../062-cl-ixf_20180228-1.1_all.deb ... Unpacking cl-ixf (20180228-1.1) ... Selecting previously unselected package cl-local-time. Preparing to unpack .../063-cl-local-time_20180228-1.1_all.deb ... Unpacking cl-local-time (20180228-1.1) ... Selecting previously unselected package cl-log. Preparing to unpack .../064-cl-log_1.0.1-1.1_all.deb ... Unpacking cl-log (1.0.1-1.1) ... Selecting previously unselected package cl-lparallel. Preparing to unpack .../065-cl-lparallel_20160825-1.1_all.deb ... Unpacking cl-lparallel (20160825-1.1) ... Selecting previously unselected package cl-metabang-bind. Preparing to unpack .../066-cl-metabang-bind_20171130-1.1_all.deb ... Unpacking cl-metabang-bind (20171130-1.1) ... Selecting previously unselected package cl-markdown. Preparing to unpack .../067-cl-markdown_20101006-2.1_all.deb ... Unpacking cl-markdown (20101006-2.1) ... Selecting previously unselected package cl-md5. Preparing to unpack .../068-cl-md5_1%3a20180224.gitb141260-1_all.deb ... Unpacking cl-md5 (1:20180224.gitb141260-1) ... Selecting previously unselected package freetds-common. Preparing to unpack .../069-freetds-common_1.2.3-1_all.deb ... Unpacking freetds-common (1.2.3-1) ... Selecting previously unselected package libct4:amd64. Preparing to unpack .../070-libct4_1.2.3-1_amd64.deb ... Unpacking libct4:amd64 (1.2.3-1) ... Selecting previously unselected package libsybdb5:amd64. Preparing to unpack .../071-libsybdb5_1.2.3-1_amd64.deb ... Unpacking libsybdb5:amd64 (1.2.3-1) ... Selecting previously unselected package freetds-dev. Preparing to unpack .../072-freetds-dev_1.2.3-1_amd64.deb ... Unpacking freetds-dev (1.2.3-1) ... Selecting previously unselected package cl-mssql. Preparing to unpack .../073-cl-mssql_20180228-1.1_all.deb ... Unpacking cl-mssql (20180228-1.1) ... Selecting previously unselected package cl-mustache. Preparing to unpack .../074-cl-mustache_0.12.1-9-g684f227-1.1_all.deb ... Unpacking cl-mustache (0.12.1-9-g684f227-1.1) ... Selecting previously unselected package cl-parse-number. Preparing to unpack .../075-cl-parse-number_1.7-1.1_all.deb ... Unpacking cl-parse-number (1.7-1.1) ... Selecting previously unselected package cl-postgres. Preparing to unpack .../076-cl-postgres_20180430-2_all.deb ... Unpacking cl-postgres (20180430-2) ... Selecting previously unselected package cl-s-sql. Preparing to unpack .../077-cl-s-sql_20180430-2_all.deb ... Unpacking cl-s-sql (20180430-2) ... Selecting previously unselected package cl-postmodern. Preparing to unpack .../078-cl-postmodern_20180430-2_all.deb ... Unpacking cl-postmodern (20180430-2) ... Selecting previously unselected package cl-py-configparser. Preparing to unpack .../079-cl-py-configparser_20170830-1.1_all.deb ... Unpacking cl-py-configparser (20170830-1.1) ... Selecting previously unselected package cl-qmynd. Preparing to unpack .../080-cl-qmynd_20180131-1.1_all.deb ... Unpacking cl-qmynd (20180131-1.1) ... Selecting previously unselected package cl-quri. Preparing to unpack .../081-cl-quri_20150804-1.1_all.deb ... Unpacking cl-quri (20150804-1.1) ... Selecting previously unselected package cl-simple-date. Preparing to unpack .../082-cl-simple-date_20180430-2_all.deb ... Unpacking cl-simple-date (20180430-2) ... Selecting previously unselected package cl-sqlite. Preparing to unpack .../083-cl-sqlite_20130615-2.1_all.deb ... Unpacking cl-sqlite (20130615-2.1) ... Selecting previously unselected package cl-trivial-backtrace. Preparing to unpack .../084-cl-trivial-backtrace_20200511.git6eb65bd-1_all.deb ... Unpacking cl-trivial-backtrace (20200511.git6eb65bd-1) ... Selecting previously unselected package cl-trivial-utf-8. Preparing to unpack .../085-cl-trivial-utf-8_20111001-1.1_all.deb ... Unpacking cl-trivial-utf-8 (20111001-1.1) ... Selecting previously unselected package cl-utilities. Preparing to unpack .../086-cl-utilities_1.2.4-3.2_all.deb ... Unpacking cl-utilities (1.2.4-3.2) ... Selecting previously unselected package cl-uuid. Preparing to unpack .../087-cl-uuid_20130813-1.1_all.deb ... Unpacking cl-uuid (20130813-1.1) ... Selecting previously unselected package cl-yason. Preparing to unpack .../088-cl-yason_0.7.6-1.1_all.deb ... Unpacking cl-yason (0.7.6-1.1) ... Selecting previously unselected package cl-zs3. Preparing to unpack .../089-cl-zs3_1.3.1-1.1_all.deb ... Unpacking cl-zs3 (1.3.1-1.1) ... Selecting previously unselected package libdebhelper-perl. Preparing to unpack .../090-libdebhelper-perl_13.3.4_all.deb ... Unpacking libdebhelper-perl (13.3.4) ... Selecting previously unselected package libtool. Preparing to unpack .../091-libtool_2.4.6-15_all.deb ... Unpacking libtool (2.4.6-15) ... Selecting previously unselected package dh-autoreconf. Preparing to unpack .../092-dh-autoreconf_20_all.deb ... Unpacking dh-autoreconf (20) ... Selecting previously unselected package libarchive-zip-perl. Preparing to unpack .../093-libarchive-zip-perl_1.68-1_all.deb ... Unpacking libarchive-zip-perl (1.68-1) ... Selecting previously unselected package libsub-override-perl. Preparing to unpack .../094-libsub-override-perl_0.09-2_all.deb ... Unpacking libsub-override-perl (0.09-2) ... Selecting previously unselected package libfile-stripnondeterminism-perl. Preparing to unpack .../095-libfile-stripnondeterminism-perl_1.12.0-1_all.deb ... Unpacking libfile-stripnondeterminism-perl (1.12.0-1) ... Selecting previously unselected package dh-strip-nondeterminism. Preparing to unpack .../096-dh-strip-nondeterminism_1.12.0-1_all.deb ... Unpacking dh-strip-nondeterminism (1.12.0-1) ... Selecting previously unselected package libelf1:amd64. Preparing to unpack .../097-libelf1_0.183-1_amd64.deb ... Unpacking libelf1:amd64 (0.183-1) ... Selecting previously unselected package dwz. Preparing to unpack .../098-dwz_0.13+20210201-1_amd64.deb ... Unpacking dwz (0.13+20210201-1) ... Selecting previously unselected package libicu67:amd64. Preparing to unpack .../099-libicu67_67.1-7_amd64.deb ... Unpacking libicu67:amd64 (67.1-7) ... Selecting previously unselected package libxml2:amd64. Preparing to unpack .../100-libxml2_2.9.10+dfsg-6.7+deb11u4_amd64.deb ... Unpacking libxml2:amd64 (2.9.10+dfsg-6.7+deb11u4) ... Selecting previously unselected package gettext. Preparing to unpack .../101-gettext_0.21-4_amd64.deb ... Unpacking gettext (0.21-4) ... Selecting previously unselected package intltool-debian. Preparing to unpack .../102-intltool-debian_0.35.0+20060710.5_all.deb ... Unpacking intltool-debian (0.35.0+20060710.5) ... Selecting previously unselected package po-debconf. Preparing to unpack .../103-po-debconf_1.0.21+nmu1_all.deb ... Unpacking po-debconf (1.0.21+nmu1) ... Selecting previously unselected package debhelper. Preparing to unpack .../104-debhelper_13.3.4_all.deb ... Unpacking debhelper (13.3.4) ... Selecting previously unselected package xml-core. Preparing to unpack .../105-xml-core_0.18+nmu1_all.deb ... Unpacking xml-core (0.18+nmu1) ... Selecting previously unselected package docutils-common. Preparing to unpack .../106-docutils-common_0.16+dfsg-4_all.deb ... Unpacking docutils-common (0.16+dfsg-4) ... Selecting previously unselected package fonts-font-awesome. Preparing to unpack .../107-fonts-font-awesome_5.0.10+really4.7.0~dfsg-4.1_all.deb ... Unpacking fonts-font-awesome (5.0.10+really4.7.0~dfsg-4.1) ... Selecting previously unselected package help2man. Preparing to unpack .../108-help2man_1.48.1_amd64.deb ... Unpacking help2man (1.48.1) ... Selecting previously unselected package libjs-jquery. Preparing to unpack .../109-libjs-jquery_3.5.1+dfsg+~3.5.5-7_all.deb ... Unpacking libjs-jquery (3.5.1+dfsg+~3.5.5-7) ... Selecting previously unselected package libjs-underscore. Preparing to unpack .../110-libjs-underscore_1.9.1~dfsg-3_all.deb ... Unpacking libjs-underscore (1.9.1~dfsg-3) ... Selecting previously unselected package libjs-sphinxdoc. Preparing to unpack .../111-libjs-sphinxdoc_3.4.3-2_all.deb ... Unpacking libjs-sphinxdoc (3.4.3-2) ... Selecting previously unselected package python-babel-localedata. Preparing to unpack .../112-python-babel-localedata_2.8.0+dfsg.1-7_all.deb ... Unpacking python-babel-localedata (2.8.0+dfsg.1-7) ... Selecting previously unselected package python3-alabaster. Preparing to unpack .../113-python3-alabaster_0.7.8-1.1_all.deb ... Unpacking python3-alabaster (0.7.8-1.1) ... Selecting previously unselected package python3-pkg-resources. Preparing to unpack .../114-python3-pkg-resources_52.0.0-4_all.deb ... Unpacking python3-pkg-resources (52.0.0-4) ... Selecting previously unselected package python3-tz. Preparing to unpack .../115-python3-tz_2021.1-1_all.deb ... Unpacking python3-tz (2021.1-1) ... Selecting previously unselected package python3-babel. Preparing to unpack .../116-python3-babel_2.8.0+dfsg.1-7_all.deb ... Unpacking python3-babel (2.8.0+dfsg.1-7) ... Selecting previously unselected package python3-certifi. Preparing to unpack .../117-python3-certifi_2020.6.20-1_all.deb ... Unpacking python3-certifi (2020.6.20-1) ... Selecting previously unselected package python3-chardet. Preparing to unpack .../118-python3-chardet_4.0.0-1_all.deb ... Unpacking python3-chardet (4.0.0-1) ... Selecting previously unselected package python3-lib2to3. Preparing to unpack .../119-python3-lib2to3_3.9.2-1_all.deb ... Unpacking python3-lib2to3 (3.9.2-1) ... Selecting previously unselected package python3-distutils. Preparing to unpack .../120-python3-distutils_3.9.2-1_all.deb ... Unpacking python3-distutils (3.9.2-1) ... Selecting previously unselected package python3-roman. Preparing to unpack .../121-python3-roman_2.0.0-5_all.deb ... Unpacking python3-roman (2.0.0-5) ... Selecting previously unselected package python3-docutils. Preparing to unpack .../122-python3-docutils_0.16+dfsg-4_all.deb ... Unpacking python3-docutils (0.16+dfsg-4) ... Selecting previously unselected package python3-idna. Preparing to unpack .../123-python3-idna_2.10-1_all.deb ... Unpacking python3-idna (2.10-1) ... Selecting previously unselected package python3-imagesize. Preparing to unpack .../124-python3-imagesize_1.2.0-2_all.deb ... Unpacking python3-imagesize (1.2.0-2) ... Selecting previously unselected package python3-markupsafe. Preparing to unpack .../125-python3-markupsafe_1.1.1-1+b3_amd64.deb ... Unpacking python3-markupsafe (1.1.1-1+b3) ... Selecting previously unselected package python3-jinja2. Preparing to unpack .../126-python3-jinja2_2.11.3-1_all.deb ... Unpacking python3-jinja2 (2.11.3-1) ... Selecting previously unselected package python3-pyparsing. Preparing to unpack .../127-python3-pyparsing_2.4.7-1_all.deb ... Unpacking python3-pyparsing (2.4.7-1) ... Selecting previously unselected package python3-packaging. Preparing to unpack .../128-python3-packaging_20.9-2_all.deb ... Unpacking python3-packaging (20.9-2) ... Selecting previously unselected package python3-pygments. Preparing to unpack .../129-python3-pygments_2.7.1+dfsg-2.1_all.deb ... Unpacking python3-pygments (2.7.1+dfsg-2.1) ... Selecting previously unselected package python3-six. Preparing to unpack .../130-python3-six_1.16.0-2_all.deb ... Unpacking python3-six (1.16.0-2) ... Selecting previously unselected package python3-urllib3. Preparing to unpack .../131-python3-urllib3_1.26.5-1~exp1_all.deb ... Unpacking python3-urllib3 (1.26.5-1~exp1) ... Selecting previously unselected package python3-requests. Preparing to unpack .../132-python3-requests_2.25.1+dfsg-2_all.deb ... Unpacking python3-requests (2.25.1+dfsg-2) ... Selecting previously unselected package python3-snowballstemmer. Preparing to unpack .../133-python3-snowballstemmer_2.1.0-1_all.deb ... Unpacking python3-snowballstemmer (2.1.0-1) ... Selecting previously unselected package sphinx-common. Preparing to unpack .../134-sphinx-common_3.4.3-2_all.deb ... Unpacking sphinx-common (3.4.3-2) ... Selecting previously unselected package python3-sphinx. Preparing to unpack .../135-python3-sphinx_3.4.3-2_all.deb ... Unpacking python3-sphinx (3.4.3-2) ... Selecting previously unselected package sphinx-rtd-theme-common. Preparing to unpack .../136-sphinx-rtd-theme-common_0.5.1+dfsg-1_all.deb ... Unpacking sphinx-rtd-theme-common (0.5.1+dfsg-1) ... Selecting previously unselected package python3-sphinx-rtd-theme. Preparing to unpack .../137-python3-sphinx-rtd-theme_0.5.1+dfsg-1_all.deb ... Unpacking python3-sphinx-rtd-theme (0.5.1+dfsg-1) ... Setting up media-types (4.0.0) ... Setting up libpipeline1:amd64 (1.5.3-1) ... Setting up cl-trivial-utf-8 (20111001-1.1) ... Setting up fonts-lato (2.0-2.1) ... Setting up cl-trivial-garbage (20200801.git2319892-1) ... Setting up cl-garbage-pools (20130720-1.1) ... Setting up bsdextrautils (2.36.1-8+deb11u1) ... update-alternatives: using /usr/bin/write.ul to provide /usr/bin/write (write) in auto mode Setting up cl-closer-mop (2:20201029.git91f877a-1) ... Setting up libicu67:amd64 (67.1-7) ... Setting up libmagic-mgc (1:5.39-3+deb11u1) ... Setting up cl-metabang-bind (20171130-1.1) ... Setting up gawk (1:5.1.0-1) ... Setting up cl-asdf (2:3.3.4-2) ... Setting up libarchive-zip-perl (1.68-1) ... Setting up cl-closure-common (20101107-1.1) ... Setting up libglib2.0-0:amd64 (2.66.8-1) ... No schema files found: doing nothing. Setting up cl-parse-number (1.7-1.1) ... Setting up libdebhelper-perl (13.3.4) ... Setting up cl-log (1.0.1-1.1) ... Setting up cl-puri (1:1.5.7.2-1) ... Setting up cl-simple-date (20180430-2) ... Setting up cl-quri (20150804-1.1) ... Setting up libmagic1:amd64 (1:5.39-3+deb11u1) ... Setting up gettext-base (0.21-4) ... Setting up cl-named-readtables (20201221.gitc5689a4-1) ... Setting up m4 (1.4.18-5) ... Setting up cl-trivial-features (20200702.gite7bb968-1) ... Setting up cl-trivial-backtrace (20200511.git6eb65bd-1) ... Setting up file (1:5.39-3+deb11u1) ... Setting up libffi-dev:amd64 (3.3-6) ... Setting up python-babel-localedata (2.8.0+dfsg.1-7) ... Setting up cl-split-sequence (1:2.0.0-1) ... Setting up cl-metatilities-base (20170403-1.1) ... Setting up cl-trivial-gray-streams (20200731.git8e6a1a0-1) ... Setting up tzdata (2021a-1+deb11u10) ... Current default time zone: 'Etc/UTC' Local time is now: Sat Jan 6 22:19:30 UTC 2024. Universal Time is now: Sat Jan 6 22:19:30 UTC 2024. Run 'dpkg-reconfigure tzdata' if you wish to change it. Setting up cl-cxml (20110619-2.1) ... Setting up cl-asdf-finalizers (20170403-1.1) ... Setting up autotools-dev (20180224.1+nmu1) ... Setting up cl-yason (0.7.6-1.1) ... Setting up cl-mustache (0.12.1-9-g684f227-1.1) ... Setting up cl-dynamic-classes (20130128-2.1) ... Setting up cl-command-line-arguments (20151218-1.1) ... Setting up autopoint (0.21-4) ... Setting up pkg-config (0.29.2-1) ... Setting up autoconf (2.69-14) ... Setting up cl-chipz (20190121.git0f6c9ea-1) ... Setting up sbcl (2:2.1.1-2) ... Setting up zlib1g-dev:amd64 (1:1.2.11.dfsg-2+deb11u2) ... Setting up cl-chunga (20200403.gitcb333cd-1) ... Setting up sensible-utils (0.0.14) ... Setting up libuchardet0:amd64 (0.0.7-1) ... Setting up libmpdec3:amd64 (2.5.1-1) ... Setting up cl-alexandria (20200821.gitf35e232-1) ... Setting up libsub-override-perl (0.09-2) ... Setting up sgml-base (1.30) ... Setting up cl-iterate (20180228-1.1) ... Setting up cl-db3 (20200212-1) ... Setting up cl-utilities (1.2.4-3.2) ... Setting up cl-rt (20090812.gita6a7503-1) ... Setting up cl-asdf-system-connections (20170124-1.1) ... Setting up freetds-common (1.2.3-1) ... Setting up libjs-jquery (3.5.1+dfsg+~3.5.5-7) ... Setting up cl-py-configparser (20170830-1.1) ... Setting up cl-ppcre (20190407.git1ca0cd9-2) ... Setting up cl-abnf (20150608-1.1) ... Setting up cl-anaphora (20190828.git018590d-1) ... Setting up openssl (1.1.1w-0+deb11u1) ... Setting up cl-ieee-floats (20170830-1.1) ... Setting up libelf1:amd64 (0.183-1) ... Setting up libxml2:amd64 (2.9.10+dfsg-6.7+deb11u4) ... Setting up fonts-font-awesome (5.0.10+really4.7.0~dfsg-4.1) ... Setting up sphinx-rtd-theme-common (0.5.1+dfsg-1) ... Setting up liblocale-gettext-perl (1.07-4+b1) ... Setting up libpython3.9-stdlib:amd64 (3.9.2-1) ... Setting up libpython3-stdlib:amd64 (3.9.2-3) ... Setting up libjs-underscore (1.9.1~dfsg-3) ... Setting up buildapp (1.5.6-2) ... Setting up automake (1:1.16.3-2) ... update-alternatives: using /usr/bin/automake-1.16 to provide /usr/bin/automake (automake) in auto mode Setting up libfile-stripnondeterminism-perl (1.12.0-1) ... Setting up cl-containers (20170403-1.1) ... Setting up gettext (0.21-4) ... Setting up cl-flexi-streams (20200913.git911a3e2-1) ... Setting up libtool (2.4.6-15) ... Setting up cl-ixf (20180228-1.1) ... Setting up libsybdb5:amd64 (1.2.3-1) ... Setting up cl-babel (20200719.gitf892d05-1) ... Setting up cl-bordeaux-threads (0.8.8-4) ... Setting up intltool-debian (0.35.0+20060710.5) ... Setting up help2man (1.48.1) ... Setting up dh-autoreconf (20) ... Setting up ca-certificates (20210119) ... Updating certificates in /etc/ssl/certs... 129 added, 0 removed; done. Setting up libct4:amd64 (1.2.3-1) ... Setting up cl-kmrcl (1.111-2) ... Setting up cl-lparallel (20160825-1.1) ... Setting up cl-usocket (0.8.3-2) ... Setting up libjs-sphinxdoc (3.4.3-2) ... Setting up cl-md5 (1:20180224.gitb141260-1) ... Setting up dh-strip-nondeterminism (1.12.0-1) ... Setting up dwz (0.13+20210201-1) ... Setting up cl-esrap (20180430-1.1) ... Setting up groff-base (1.22.4-6) ... Setting up xml-core (0.18+nmu1) ... Setting up cl-markdown (20101006-2.1) ... Setting up cl-cffi (1:0.23.0-1) ... Setting up cl-unicode (20201101.git54bdf2c-1) ... Setting up python3.9 (3.9.2-1) ... Setting up cl-base64 (3.4.0-1) ... Setting up cl-ironclad (0.54-1) ... Setting up cl-interpol (20201106.git70a1137-1) ... Setting up freetds-dev (1.2.3-1) ... Setting up cl-fad (20200513.git1c15a90-1) ... Setting up po-debconf (1.0.21+nmu1) ... Setting up cl-csv (20200929.git68ecb5d-1) ... Setting up python3 (3.9.2-3) ... Setting up man-db (2.9.4-2) ... Not building database; man-db/auto-update is not 'true'. Setting up python3-markupsafe (1.1.1-1+b3) ... Setting up python3-tz (2021.1-1) ... Setting up cl-mssql (20180228-1.1) ... Setting up python3-six (1.16.0-2) ... Setting up python3-roman (2.0.0-5) ... Setting up python3-jinja2 (2.11.3-1) ... Setting up cl-qmynd (20180131-1.1) ... Setting up cl-plus-ssl (20200609.gitff4634a-1) ... Setting up python3-pyparsing (2.4.7-1) ... Setting up python3-certifi (2020.6.20-1) ... Setting up python3-snowballstemmer (2.1.0-1) ... Setting up cl-sqlite (20130615-2.1) ... Setting up sphinx-common (3.4.3-2) ... Setting up python3-idna (2.10-1) ... Setting up cl-postgres (20180430-2) ... Setting up cl-drakma (2.0.7-1) ... Setting up python3-urllib3 (1.26.5-1~exp1) ... Setting up cl-uuid (20130813-1.1) ... Setting up python3-lib2to3 (3.9.2-1) ... Setting up python3-imagesize (1.2.0-2) ... Setting up python3-pkg-resources (52.0.0-4) ... Setting up python3-distutils (3.9.2-1) ... Setting up cl-local-time (20180228-1.1) ... Setting up python3-babel (2.8.0+dfsg.1-7) ... update-alternatives: using /usr/bin/pybabel-python3 to provide /usr/bin/pybabel (pybabel) in auto mode Setting up python3-alabaster (0.7.8-1.1) ... Setting up debhelper (13.3.4) ... Setting up cl-zs3 (1.3.1-1.1) ... Setting up python3-pygments (2.7.1+dfsg-2.1) ... Setting up python3-packaging (20.9-2) ... Setting up python3-chardet (4.0.0-1) ... Setting up cl-s-sql (20180430-2) ... Setting up python3-requests (2.25.1+dfsg-2) ... Setting up cl-postmodern (20180430-2) ... Processing triggers for libc-bin (2.31-13+deb11u6) ... Processing triggers for sgml-base (1.30) ... Setting up docutils-common (0.16+dfsg-4) ... Processing triggers for sgml-base (1.30) ... Setting up python3-docutils (0.16+dfsg-4) ... update-alternatives: using /usr/share/docutils/scripts/python3/rst-buildhtml to provide /usr/bin/rst-buildhtml (rst-buildhtml) in auto mode update-alternatives: using /usr/share/docutils/scripts/python3/rst2html to provide /usr/bin/rst2html (rst2html) in auto mode update-alternatives: using /usr/share/docutils/scripts/python3/rst2html4 to provide /usr/bin/rst2html4 (rst2html4) in auto mode update-alternatives: using /usr/share/docutils/scripts/python3/rst2html5 to provide /usr/bin/rst2html5 (rst2html5) in auto mode update-alternatives: using /usr/share/docutils/scripts/python3/rst2latex to provide /usr/bin/rst2latex (rst2latex) in auto mode update-alternatives: using /usr/share/docutils/scripts/python3/rst2man to provide /usr/bin/rst2man (rst2man) in auto mode update-alternatives: using /usr/share/docutils/scripts/python3/rst2odt to provide /usr/bin/rst2odt (rst2odt) in auto mode update-alternatives: using /usr/share/docutils/scripts/python3/rst2odt_prepstyles to provide /usr/bin/rst2odt_prepstyles (rst2odt_prepstyles) in auto mode update-alternatives: using /usr/share/docutils/scripts/python3/rst2pseudoxml to provide /usr/bin/rst2pseudoxml (rst2pseudoxml) in auto mode update-alternatives: using /usr/share/docutils/scripts/python3/rst2s5 to provide /usr/bin/rst2s5 (rst2s5) in auto mode update-alternatives: using /usr/share/docutils/scripts/python3/rst2xetex to provide /usr/bin/rst2xetex (rst2xetex) in auto mode update-alternatives: using /usr/share/docutils/scripts/python3/rst2xml to provide /usr/bin/rst2xml (rst2xml) in auto mode update-alternatives: using /usr/share/docutils/scripts/python3/rstpep2html to provide /usr/bin/rstpep2html (rstpep2html) in auto mode Setting up python3-sphinx (3.4.3-2) ... Setting up python3-sphinx-rtd-theme (0.5.1+dfsg-1) ... Processing triggers for ca-certificates (20210119) ... Updating certificates in /etc/ssl/certs... 0 added, 0 removed; done. Running hooks in /etc/ca-certificates/update.d... done. Reading package lists... Building dependency tree... Reading state information... Reading extended state information... Initializing package states... Writing extended state information... Building tag database... -> Finished parsing the build-deps Reading package lists... Building dependency tree... Reading state information... fakeroot is already the newest version (1.25.3-1.1). 0 upgraded, 0 newly installed, 0 to remove and 0 not upgraded. I: Building the package I: Running cd /build/reproducible-path/pgloader-3.6.2/ && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games" HOME="/nonexistent/first-build" dpkg-buildpackage -us -uc -b && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games" HOME="/nonexistent/first-build" dpkg-genchanges -S > ../pgloader_3.6.2-1_source.changes dpkg-buildpackage: info: source package pgloader dpkg-buildpackage: info: source version 3.6.2-1 dpkg-buildpackage: info: source distribution unstable dpkg-buildpackage: info: source changed by Christoph Berg dpkg-source --before-build . dpkg-buildpackage: info: host architecture amd64 dpkg-source: info: using options from pgloader-3.6.2/debian/source/options: --extend-diff-ignore=src/params.lisp --extend-diff-ignore=src/parsers/command-csv.lisp fakeroot debian/rules clean dh clean debian/rules override_dh_auto_clean make[1]: Entering directory '/build/reproducible-path/pgloader-3.6.2' dh_auto_clean make -j15 clean make[2]: Entering directory '/build/reproducible-path/pgloader-3.6.2' rm -rf build/libs.stamp build/quicklisp build/manifest.ql build/bin/buildapp.sbcl build/bin/pgloader docs/_build make[2]: Leaving directory '/build/reproducible-path/pgloader-3.6.2' rm -rf debian/home make[1]: Leaving directory '/build/reproducible-path/pgloader-3.6.2' dh_clean debian/rules build make: 'build' is up to date. fakeroot debian/rules binary dh binary dh_update_autotools_config dh_autoreconf dh_auto_configure debian/rules override_dh_auto_build-arch make[1]: Entering directory '/build/reproducible-path/pgloader-3.6.2' mkdir -p build/bin mkdir -p /build/reproducible-path/pgloader-3.6.2/debian/home buildapp --require sb-posix \ --require sb-bsd-sockets \ --load /usr/share/common-lisp/source/cl-asdf/build/asdf.lisp \ --asdf-path . \ --asdf-tree /usr/share/common-lisp/systems \ --load-system asdf-finalizers \ --load-system asdf-system-connections \ --load-system cffi \ --load-system cl+ssl \ --load-system mssql \ --load src/hooks.lisp \ --load-system pgloader \ --entry pgloader:main \ --dynamic-space-size 4096 \ --compress-core \ --logfile buildapp.log \ --output build/bin/pgloader \ || echo $? > buildapp.fail ; compiling file "/usr/share/common-lisp/source/cl-asdf/build/asdf.lisp" (written 14 JAN 2021 01:45:37 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-asdf/build/asdf-tmpGHU3ALSV.fasl ; compilation finished in 0:00:34.062 ;; loading file #P"/usr/share/common-lisp/source/cl-asdf/build/asdf.lisp" ;; loading system "asdf-finalizers" ;; loading system "asdf-system-connections" ;; loading system "cffi" ;; loading system "cl+ssl" ;; loading system "mssql" ;; loading file #P"/build/reproducible-path/pgloader-3.6.2/src/hooks.lisp" ;; loading system "pgloader" compressed 0 bytes into 8 at level -1 compressed 32768 bytes into 516 at level -1 compressed 89751552 bytes into 17940908 at level -1 compressed 3014656 bytes into 842996 at level -1 compressed 22020096 bytes into 6733456 at level -1 cat buildapp.log ;; loading file #P"/usr/share/common-lisp/source/cl-asdf/build/asdf.lisp" ;; loading #P"/usr/share/common-lisp/source/cl-asdf/build/asdf.lisp" ;; # ;; # ;; HOME-PACKAGE-P ;; UNREIFY-SYMBOL ;; NOTE-PACKAGE-FISHINESS ;; RENAME-PACKAGE-AWAY ;; PACKAGE-DEFINITION-FORM ;; ENSURE-PACKAGE ;; PARSE-DEFINE-PACKAGE-FORM ;; DEFINE-PACKAGE ;; # ;; # ;; (:ASDF3.3 :ASDF3.2 :ASDF3.1 :ASDF3 :ASDF2 :ASDF :OS-UNIX :NON-BASE-CHARS-EXIST-P :ASDF-UNICODE :X86-64 :GENCGC :64-BIT :ANSI-CL :COMMON-LISP :ELF :IEEE-FLOATING-POINT :LINUX :LITTLE-ENDIAN :PACKAGE-LOCAL-NICKNAMES :SB-CORE-COMPRESSION :SB-LDB :SB-PACKAGE-LOCKS :SB-THREAD :SB-UNICODE :SBCL :UNIX) ;; NIL ;; LOOP* ;; COMPATFMT ;; # ;; # ;; WITH-UPGRADABILITY ;; LOAD-UIOP-DEBUG-UTILITY ;; IF-LET ;; PARSE-BODY ;; ENSURE-LIST ;; REMOVE-PLIST-KEYS ;; EMPTYP ;; (:ASDF3.3 :ASDF3.2 :ASDF3.1 :ASDF3 :ASDF2 :ASDF :OS-UNIX :NON-BASE-CHARS-EXIST-P :ASDF-UNICODE :X86-64 :GENCGC :64-BIT :ANSI-CL :COMMON-LISP :ELF :IEEE-FLOATING-POINT :LINUX :LITTLE-ENDIAN :PACKAGE-LOCAL-NICKNAMES :SB-CORE-COMPRESSION :SB-LDB :SB-PACKAGE-LOCKS :SB-THREAD :SB-UNICODE :SBCL :UNIX) ;; CHARACTER-TYPE-INDEX ;; FIND-STANDARD-CASE-SYMBOL ;; TIMESTAMP ;; LATEST-TIMESTAMP-F ;; REGISTER-HOOK-FUNCTION ;; COERCE-CLASS ;; LIST-TO-HASH-SET ;; LEXICOGRAPHIC<= ;; STYLE-WARN ;; WITH-MUFFLED-CONDITIONS ;; PARAMETER-ERROR ;; SYMBOL-TEST-TO-FEATURE-EXPRESSION ;; # ;; # ;; VERSION<= ;; WITH-DEPRECATION ;; # ;; # ;; :OS-UNIX ;; GETENVP ;; IMPLEMENTATION-IDENTIFIER ;; HOSTNAME ;; CHDIR ;; PARSE-WINDOWS-SHORTCUT ;; # ;; # ;; WITH-PATHNAME-DEFAULTS ;; FILE-PATHNAME-P ;; ENSURE-DIRECTORY-PATHNAME ;; UNIX-NAMESTRING ;; WITH-ENOUGH-PATHNAME ;; WILDEN ;; *OUTPUT-TRANSLATION-FUNCTION* ;; # ;; # ;; PARSE-NATIVE-NAMESTRING ;; COLLECT-SUB*DIRECTORIES ;; RESOLVE-SYMLINKS* ;; ENSURE-PATHNAME ;; WITH-CURRENT-DIRECTORY ;; LISP-IMPLEMENTATION-PATHNAME-P ;; DELETE-DIRECTORY-TREE ;; # ;; # ;; # ;; ENCODING-EXTERNAL-FORMAT ;; SAFE-READ-FROM-STRING ;; OUTPUT-STRING ;; INPUT-STRING ;; WITH-NULL-OUTPUT ;; SAFE-FORMAT! ;; STANDARD-EVAL-THUNK ;; WRITELN ;; WITH-STAGING-PATHNAME ;; FILE-OR-SYNONYM-STREAM-P ;; # ;; # ;; *IMAGE-DUMP-HOOK* ;; FATAL-CONDITION ;; SHELL-BOOLEAN-EXIT ;; CALL-IMAGE-DUMP-HOOK ;; RESTORE-IMAGE ;; CREATE-IMAGE ;; NIL ;; # ;; # ;; *BASE-BUILD-DIRECTORY* ;; WITH-OPTIMIZATION-SETTINGS ;; *UNINTERESTING-LOADER-CONDITIONS* ;; WITH-MUFFLED-LOADER-CONDITIONS ;; CHECK-LISP-COMPILE-RESULTS ;; WITH-SAVED-DEFERRED-WARNINGS ;; LOAD-FROM-STRING ;; COMBINE-FASLS ;; # ;; # ;; ESCAPE-SHELL-COMMAND ;; LAUNCH-PROGRAM ;; # ;; # ;; # ;; # ;; RUN-PROGRAM ;; # ;; # ;; UIOP-DIRECTORY ;; # ;; # ;; VERSION-COMPATIBLE-P ;; # ;; T ;; T ;; # ;; # ;; NIL ;; NIL ;; WITH-ASDF-DEPRECATION ;; # ;; # ;; SYSDEF-ERROR ;; # ;; # ;; DUPLICATE-NAMES ;; # ;; # ;; COMPUTE-CHILDREN-BY-NAME ;; # ;; # ;; # ;; # ;; # ;; SUB-COMPONENTS ;; # ;; # ;; NIL ;; # ;; # ;; # ;; # ;; # ;; RESET-SYSTEM-CLASS ;; COERCE-FILENAME ;; SYSTEM-LICENSE ;; # ;; # ;; # ;; SYSDEF-CENTRAL-REGISTRY-SEARCH ;; # ;; # ;; OPERATION-DESIGNATOR ;; ACTION-COMPONENT ;; FIND-ACTION ;; DEFINE-CONVENIENCE-ACTION-METHODS ;; FORMAT-ACTION ;; WHILE-VISITING-ACTION ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; NIL ;; +STATUS-VOID+ ;; # ;; # ;; # ;; ACTION-UP-TO-DATE-P ;; REQUIRED-COMPONENTS ;; # ;; # ;; # ;; RECURSIVE-OPERATE ;; NIL ;; TEST-SYSTEM ;; ALREADY-LOADED-SYSTEMS ;; MODULE-PROVIDE-ASDF ;; NIL ;; # ;; # ;; MARK-COMPONENT-PRELOADED ;; # ;; # ;; DETERMINE-SYSTEM-DIRECTORY ;; CLASS-FOR-TYPE ;; NORMALIZE-VERSION ;; %REFRESH-COMPONENT-INLINE-METHODS ;; DEFSYSTEM ;; # ;; # ;; # ;; NIL ;; USER-SYSTEM-P ;; USER-SYSTEM ;; SELECT-BUNDLE-OPERATION ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; SYSDEF-PACKAGE-INFERRED-SYSTEM-SEARCH ;; (DUMPER433::SYSTEM-SEARCH-FUNCTION SYSDEF-PACKAGE-INFERRED-SYSTEM-SEARCH SYSDEF-CENTRAL-REGISTRY-SEARCH SYSDEF-SOURCE-REGISTRY-SEARCH) ;; # ;; # ;; NIL ;; APPLY-OUTPUT-TRANSLATIONS ;; # ;; # ;; SYSDEF-SOURCE-REGISTRY-SEARCH ;; # ;; # ;; LOAD-SYSDEF ;; # ;; # ;; # ;; REQUIRE-SYSTEM ;; # ;; # ;; # ;; # ;; NIL ;; (MODULE-PROVIDE-ASDF SB-IMPL::MODULE-PROVIDE-CONTRIB) ;; NIL ;; NIL ;; loading system "asdf-finalizers" ; compiling file "/usr/share/common-lisp/source/asdf-finalizers/pkgdcl.lisp" (written 26 MAR 2017 05:20:19 PM): ; processing (UIOP/PACKAGE:DEFINE-PACKAGE :ASDF-FINALIZERS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/asdf-finalizers/pkgdcl-tmpAAURSO1.fasl ; compilation finished in 0:00:00.035 ; compiling file "/usr/share/common-lisp/source/asdf-finalizers/finalizers.lisp" (written 26 MAR 2017 05:20:19 PM): ; processing (IN-PACKAGE :ASDF-FINALIZERS) ; processing (DEFVAR *WARN-WHEN-FINALIZERS-OFF* ...) ; processing (DEFVAR *DEBUG-FINALIZERS* ...) ; processing (DEFINE-CONDITION FINALIZERS-OFF ...) ; processing (DEFINE-CONDITION FINALIZERS-OFF-ERROR ...) ; processing (DEFINE-CONDITION FINALIZERS-OFF-SIMPLE-ERROR ...) ; processing (DEFINE-CONDITION FINALIZERS-OFF-WARNING ...) ; processing (DEFINE-CONDITION FINALIZERS-OFF-SIMPLE-WARNING ...) ; processing (DEFINE-CONDITION MISSING-FINAL-FORMS ...) ; processing (DEFVAR *FINALIZERS*) ; processing (DEFVAR *FINALIZERS-DATA* ...) ; processing (DEFUN USING-FINALIZERS-P ...) ; processing (DEFUN RESET-FINALIZERS ...) ; processing (DEFUN DISABLE-FINALIZERS ...) ; processing (DEFMACRO FINAL-FORMS ...) ; processing (DEFMACRO FINAL-FORMS-INTERNAL ...) ; processing (DEFUN EXPAND-FINAL-FORMS ...) ; processing (DEFUN REGISTER-FINALIZER ...) ; processing (DEFUN REGISTER-FINAL-FORM ...) ; processing (DEFUN NO-FINALIZER-LEFT-BEHIND-P ...) ; processing (DEFUN ASSERT-NO-FINALIZER-LEFT-BEHIND ...) ; processing (DEFMACRO WITH-FINALIZERS ...) ; processing (DEFUN CALL-WITH-FINALIZERS ...) ; processing (DEFUN EVAL-AT-TOPLEVEL ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/asdf-finalizers/finalizers-tmp5GEXGEG5.fasl ; compilation finished in 0:00:00.175 ; compiling file "/usr/share/common-lisp/source/asdf-finalizers/asdf-support.lisp" (written 26 MAR 2017 05:20:19 PM): ; processing (IN-PACKAGE :ASDF-FINALIZERS) ; processing (DEFUN COMPILE-CHECK-FINALIZERS ...) ; processing (DEFUN CHECK-FINALIZERS-AROUND-COMPILE ...) ; processing (DEFCLASS ASDF/INTERFACE::FINALIZED-CL-SOURCE-FILE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/asdf-finalizers/asdf-support-tmpAR3FSGEY.fasl ; compilation finished in 0:00:00.027 ; compiling file "/usr/share/common-lisp/source/asdf-finalizers/initialization.lisp" (written 26 MAR 2017 05:20:19 PM): ; processing (IN-PACKAGE :ASDF-FINALIZERS) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/asdf-finalizers/initialization-tmpJAIDFZTC.fasl ; compilation finished in 0:00:00.007 ;; loading system "asdf-system-connections" ; compiling file "/usr/share/common-lisp/source/asdf-system-connections/dev/asdf-system-connections.lisp" (written 23 DEC 2016 07:00:46 AM): ; processing (IN-PACKAGE :ASDF) ; processing (EXPORT (QUOTE #)) ; processing (DEFCLASS SYSTEM-CONNECTION ...) ; processing (DEFUN MAP-SYSTEM-CONNECTIONS ...) ; processing (DEFMACRO DEFSYSTEM-CONNECTION ...) ; processing (DEFUN LOAD-CONNECTED-SYSTEMS ...) ; processing (DEFUN REQUIRED-SYSTEMS-LOADED-P ...) ; processing (UNLESS (FBOUNDP #) ...) ; file: /usr/share/common-lisp/source/asdf-system-connections/dev/asdf-system-connections.lisp ; in: DEFUN REGISTERED-SYSTEM ; (ASDF/BACKWARD-INTERFACE:SYSTEM-REGISTERED-P ASDF/INTERFACE::SYSTEM-NAME) ; ; caught STYLE-WARNING: ; DEPRECATED-FUNCTION-STYLE-WARNING: Using deprecated function ASDF/BACKWARD-INTERFACE:SYSTEM-REGISTERED-P -- please update your code to use a newer API. ; The docstring for this function says: ; DEPRECATED. Return a generalized boolean that is true if a system of given NAME was registered already. ; NAME is a system designator, to be normalized by COERCE-NAME. ; The value returned if true is a pair of a timestamp and a system object. ; ; processing (DEFUN SYSTEM-LOADED-P ...) ; processing (DEFMETHOD OPERATE ...) ; processing (PUSHNEW :ASDF-SYSTEM-CONNECTIONS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/asdf-system-connections/dev/asdf-system-connections-tmp8V3J6PE9.fasl ; compilation finished in 0:00:00.091 WARNING: Lisp compilation had style-warnings while compiling # ; ; compilation unit finished ; caught 1 STYLE-WARNING condition ;; loading system "cffi" ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/package.lisp" (written 21 AUG 2020 04:45:02 AM): ; processing (DEFPACKAGE :ALEXANDRIA ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/alexandria/alexandria-1/package-tmp9V47YWQF.fasl ; compilation finished in 0:00:00.016 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/definitions.lisp" (written 21 AUG 2020 04:45:02 AM): ; processing (IN-PACKAGE :ALEXANDRIA) ; processing (DEFUN %REEVALUATE-CONSTANT ...) ; processing (DEFMACRO DEFINE-CONSTANT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/alexandria/alexandria-1/definitions-tmp9BN22RMA.fasl ; compilation finished in 0:00:00.067 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/binding.lisp" (written 21 AUG 2020 04:45:02 AM): ; processing (IN-PACKAGE :ALEXANDRIA) ; processing (DEFMACRO IF-LET ...) ; processing (DEFMACRO WHEN-LET ...) ; processing (DEFMACRO WHEN-LET* ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/alexandria/alexandria-1/binding-tmp1CXFJSK9.fasl ; compilation finished in 0:00:00.103 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/strings.lisp" (written 21 AUG 2020 04:45:02 AM): ; processing (IN-PACKAGE :ALEXANDRIA) ; processing (DEFTYPE STRING-DESIGNATOR ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/alexandria/alexandria-1/strings-tmpX4BRKI0R.fasl ; compilation finished in 0:00:00.003 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/conditions.lisp" (written 21 AUG 2020 04:45:02 AM): ; processing (IN-PACKAGE :ALEXANDRIA) ; processing (DEFUN REQUIRED-ARGUMENT ...) ; processing (DEFINE-CONDITION SIMPLE-STYLE-WARNING ...) ; processing (DEFUN SIMPLE-STYLE-WARNING ...) ; processing (DEFINE-CONDITION SIMPLE-READER-ERROR ...) ; processing (DEFUN SIMPLE-READER-ERROR ...) ; processing (DEFINE-CONDITION SIMPLE-PARSE-ERROR ...) ; processing (DEFUN SIMPLE-PARSE-ERROR ...) ; processing (DEFINE-CONDITION SIMPLE-PROGRAM-ERROR ...) ; processing (DEFUN SIMPLE-PROGRAM-ERROR ...) ; processing (DEFMACRO IGNORE-SOME-CONDITIONS ...) ; processing (DEFMACRO UNWIND-PROTECT-CASE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/alexandria/alexandria-1/conditions-tmpQ371UGST.fasl ; compilation finished in 0:00:00.131 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/symbols.lisp" (written 21 AUG 2020 04:45:02 AM): ; processing (IN-PACKAGE :ALEXANDRIA) ; processing (DECLAIM (INLINE ENSURE-SYMBOL)) ; processing (DEFUN ENSURE-SYMBOL ...) ; processing (DEFUN MAYBE-INTERN ...) ; processing (DECLAIM (INLINE FORMAT-SYMBOL)) ; processing (DEFUN FORMAT-SYMBOL ...) ; processing (DEFUN MAKE-KEYWORD ...) ; processing (DEFUN MAKE-GENSYM ...) ; processing (DEFUN MAKE-GENSYM-LIST ...) ; processing (DEFUN SYMBOLICATE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/alexandria/alexandria-1/symbols-tmp2OWI3Q7U.fasl ; compilation finished in 0:00:00.095 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/macros.lisp" (written 21 AUG 2020 04:45:02 AM): ; processing (IN-PACKAGE :ALEXANDRIA) ; processing (DEFMACRO WITH-GENSYMS ...) ; processing (DEFMACRO WITH-UNIQUE-NAMES ...) ; processing (DEFMACRO ONCE-ONLY ...) ; processing (DEFUN PARSE-BODY ...) ; processing (DEFUN PARSE-ORDINARY-LAMBDA-LIST ...) ; processing (DEFUN EXPAND-DESTRUCTURING-CASE ...) ; processing (DEFMACRO DESTRUCTURING-CASE ...) ; processing (DEFMACRO DESTRUCTURING-CCASE ...) ; processing (DEFMACRO DESTRUCTURING-ECASE ...) ; processing (DOLIST (NAME #) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/alexandria/alexandria-1/macros-tmp9KKTJMYV.fasl ; compilation finished in 0:00:00.447 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/functions.lisp" (written 21 AUG 2020 04:45:02 AM): ; processing (IN-PACKAGE :ALEXANDRIA) ; processing (DECLAIM (INLINE ENSURE-FUNCTION)) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN ENSURE-FUNCTION ...) ; processing (DEFINE-MODIFY-MACRO ENSURE-FUNCTIONF/1 ...) ; processing (DEFMACRO ENSURE-FUNCTIONF ...) ; processing (DEFUN DISJOIN ...) ; processing (DEFUN CONJOIN ...) ; processing (DEFUN COMPOSE ...) ; processing (DEFINE-COMPILER-MACRO COMPOSE ...) ; processing (DEFUN MULTIPLE-VALUE-COMPOSE ...) ; processing (DEFINE-COMPILER-MACRO MULTIPLE-VALUE-COMPOSE ...) ; processing (DECLAIM (INLINE CURRY ...)) ; processing (DEFUN CURRY ...) ; processing (DEFINE-COMPILER-MACRO CURRY ...) ; processing (DEFUN RCURRY ...) ; processing (DEFINE-COMPILER-MACRO RCURRY ...) ; processing (DECLAIM (NOTINLINE CURRY ...)) ; processing (DEFMACRO NAMED-LAMBDA ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/alexandria/alexandria-1/functions-tmpJU0JWO19.fasl ; compilation finished in 0:00:00.323 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/lists.lisp" (written 21 AUG 2020 04:45:02 AM): ; processing (IN-PACKAGE :ALEXANDRIA) ; processing (DECLAIM (INLINE SAFE-ENDP)) ; processing (DEFUN SAFE-ENDP ...) ; processing (DEFUN ALIST-PLIST ...) ; processing (DEFUN PLIST-ALIST ...) ; processing (DECLAIM (INLINE RACONS)) ; processing (DEFUN RACONS ...) ; processing (DEFINE-ALIST-GET ASSOC-VALUE ...) ; processing (DEFINE-ALIST-GET RASSOC-VALUE ...) ; processing (DEFUN MALFORMED-PLIST ...) ; processing (DEFMACRO DOPLIST ...) ; processing (DEFINE-MODIFY-MACRO APPENDF ...) ; processing (DEFINE-MODIFY-MACRO NCONCF ...) ; processing (DEFINE-MODIFY-MACRO UNIONF ...) ; processing (DEFINE-MODIFY-MACRO NUNIONF ...) ; processing (DEFINE-MODIFY-MACRO REVERSEF ...) ; processing (DEFINE-MODIFY-MACRO NREVERSEF ...) ; processing (DEFUN CIRCULAR-LIST ...) ; processing (DEFUN CIRCULAR-LIST-P ...) ; processing (DEFUN CIRCULAR-TREE-P ...) ; processing (DEFUN PROPER-LIST-P ...) ; processing (DEFTYPE PROPER-LIST ...) ; processing (DEFUN CIRCULAR-LIST-ERROR ...) ; processing (DEF PROPER-LIST-LENGTH ...) ; processing (DEF LASTCAR ...) ; processing (DEF (SETF LASTCAR) ...) ; processing (DEFUN MAKE-CIRCULAR-LIST ...) ; processing (DEFTYPE CIRCULAR-LIST ...) ; processing (DEFUN ENSURE-CAR ...) ; processing (DEFUN ENSURE-CONS ...) ; processing (DEFUN ENSURE-LIST ...) ; processing (DEFUN REMOVE-FROM-PLIST ...) ; processing (DEFUN DELETE-FROM-PLIST ...) ; processing (DEFINE-MODIFY-MACRO REMOVE-FROM-PLISTF ...) ; processing (DEFINE-MODIFY-MACRO DELETE-FROM-PLISTF ...) ; processing (DECLAIM (INLINE SANS)) ; processing (DEFUN SANS ...) ; processing (DEFUN MAPPEND ...) ; processing (DEFUN SETP ...) ; processing (DEFUN SET-EQUAL ...) ; processing (DEFUN MAP-PRODUCT ...) ; processing (DEFUN FLATTEN ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/alexandria/alexandria-1/lists-tmpZX2WN8N4.fasl ; compilation finished in 0:00:00.959 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/types.lisp" (written 21 AUG 2020 04:45:02 AM): ; processing (IN-PACKAGE :ALEXANDRIA) ; processing (DEFTYPE ARRAY-INDEX ...) ; processing (DEFTYPE ARRAY-LENGTH ...) ; processing (FROB FIXNUM ...) ; processing (FROB INTEGER) ; processing (FROB RATIONAL) ; processing (FROB REAL) ; processing (FROB FLOAT) ; processing (FROB SHORT-FLOAT) ; processing (FROB SINGLE-FLOAT) ; processing (FROB DOUBLE-FLOAT) ; processing (FROB LONG-FLOAT) ; processing (DEFUN OF-TYPE ...) ; processing (DEFINE-COMPILER-MACRO OF-TYPE ...) ; processing (DECLAIM (INLINE TYPE=)) ; processing (DEFUN TYPE= ...) ; processing (DEFINE-MODIFY-MACRO COERCEF ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/alexandria/alexandria-1/types-tmpOU81XRV0.fasl ; compilation finished in 0:00:00.459 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/io.lisp" (written 21 AUG 2020 04:45:02 AM): ; processing (IN-PACKAGE :ALEXANDRIA) ; processing (DEFMACRO WITH-OPEN-FILE* ...) ; processing (DEFMACRO WITH-INPUT-FROM-FILE ...) ; processing (DEFMACRO WITH-OUTPUT-TO-FILE ...) ; processing (DEFUN READ-STREAM-CONTENT-INTO-STRING ...) ; processing (DEFUN READ-FILE-INTO-STRING ...) ; processing (DEFUN WRITE-STRING-INTO-FILE ...) ; processing (DEFUN READ-STREAM-CONTENT-INTO-BYTE-VECTOR ...) ; processing (DEFUN READ-FILE-INTO-BYTE-VECTOR ...) ; processing (DEFUN WRITE-BYTE-VECTOR-INTO-FILE ...) ; processing (DEFUN COPY-FILE ...) ; processing (DEFUN COPY-STREAM ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/alexandria/alexandria-1/io-tmpY2ML9CFA.fasl ; compilation finished in 0:00:00.503 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/hash-tables.lisp" (written 21 AUG 2020 04:45:02 AM): ; processing (IN-PACKAGE :ALEXANDRIA) ; processing (DEFMACRO ENSURE-GETHASH ...) ; processing (DEFUN COPY-HASH-TABLE ...) ; processing (DECLAIM (INLINE MAPHASH-KEYS)) ; processing (DEFUN MAPHASH-KEYS ...) ; processing (DECLAIM (INLINE MAPHASH-VALUES)) ; processing (DEFUN MAPHASH-VALUES ...) ; processing (DEFUN HASH-TABLE-KEYS ...) ; processing (DEFUN HASH-TABLE-VALUES ...) ; processing (DEFUN HASH-TABLE-ALIST ...) ; processing (DEFUN HASH-TABLE-PLIST ...) ; processing (DEFUN ALIST-HASH-TABLE ...) ; processing (DEFUN PLIST-HASH-TABLE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/alexandria/alexandria-1/hash-tables-tmpX2JYJDQE.fasl ; compilation finished in 0:00:00.215 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/control-flow.lisp" (written 21 AUG 2020 04:45:02 AM): ; processing (IN-PACKAGE :ALEXANDRIA) ; processing (DEFUN EXTRACT-FUNCTION-NAME ...) ; processing (DEFUN GENERATE-SWITCH-BODY ...) ; processing (DEFMACRO SWITCH ...) ; processing (DEFMACRO ESWITCH ...) ; processing (DEFMACRO CSWITCH ...) ; processing (DEFMACRO WHICHEVER ...) ; processing (DEFMACRO XOR ...) ; processing (DEFMACRO NTH-VALUE-OR ...) ; processing (DEFMACRO MULTIPLE-VALUE-PROG2 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/alexandria/alexandria-1/control-flow-tmpOPCILR65.fasl ; compilation finished in 0:00:00.299 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/arrays.lisp" (written 21 AUG 2020 04:45:02 AM): ; processing (IN-PACKAGE :ALEXANDRIA) ; processing (DEFUN COPY-ARRAY ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/alexandria/alexandria-1/arrays-tmpRV9F8A9A.fasl ; compilation finished in 0:00:00.043 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/sequences.lisp" (written 21 AUG 2020 04:45:02 AM): ; processing (IN-PACKAGE :ALEXANDRIA) ; processing (DECLAIM (INLINE COPY-SEQUENCE ...)) ; processing (DEFUN SEQUENCE-OF-LENGTH-P ...) ; processing (DEFUN ROTATE-TAIL-TO-HEAD ...) ; processing (DEFUN ROTATE-HEAD-TO-TAIL ...) ; processing (DEFUN ROTATE ...) ; processing (DEFUN SHUFFLE ...) ; processing (DEFUN RANDOM-ELT ...) ; processing (DECLAIM (INLINE REMOVE/SWAPPED-ARGUMENTS)) ; processing (DEFUN REMOVE/SWAPPED-ARGUMENTS ...) ; processing (DEFINE-MODIFY-MACRO REMOVEF ...) ; processing (DECLAIM (INLINE DELETE/SWAPPED-ARGUMENTS)) ; processing (DEFUN DELETE/SWAPPED-ARGUMENTS ...) ; processing (DEFINE-MODIFY-MACRO DELETEF ...) ; processing (DEFTYPE PROPER-SEQUENCE ...) ; processing (WHEN (AND # ...) ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (SETF (SYMBOL-FUNCTION #) ...) ; processing (DEFINE-COMPILER-MACRO EMPTYP ...) ; processing (DEFUN LENGTH= ...) ; 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. ; processing (DEFINE-COMPILER-MACRO LENGTH= ...) ; processing (DEFUN COPY-SEQUENCE ...) ; processing (DEFUN FIRST-ELT ...) ; processing (DEFUN (SETF FIRST-ELT) ...) ; processing (DEFUN LAST-ELT ...) ; processing (DEFUN (SETF LAST-ELT) ...) ; processing (DEFUN STARTS-WITH-SUBSEQ ...) ; processing (DEFUN ENDS-WITH-SUBSEQ ...) ; processing (DEFUN STARTS-WITH ...) ; processing (DEFUN ENDS-WITH ...) ; processing (DEFUN MAP-COMBINATIONS ...) ; processing (DEFUN MAP-PERMUTATIONS ...) ; processing (DEFUN MAP-DERANGEMENTS ...) ; file: /usr/share/common-lisp/source/alexandria/alexandria-1/sequences.lisp ; in: DEFUN MAP-DERANGEMENTS ; (MAKE-ARRAY ALEXANDRIA::SIZE :ELEMENT-TYPE 'BIT :INITIAL-ELEMENT 0) ; ; note: could not stack allocate: ; (MAKE-ARRAY SIZE :ELEMENT-TYPE 'BIT :INITIAL-ELEMENT 0) ; processing (DECLAIM (NOTINLINE SEQUENCE-OF-LENGTH-P)) ; processing (DEFUN EXTREMUM ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/alexandria/alexandria-1/sequences-tmpK2ZAJT4I.fasl ; compilation finished in 0:00:00.799 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/numbers.lisp" (written 21 AUG 2020 04:45:02 AM): ; processing (IN-PACKAGE :ALEXANDRIA) ; processing (DECLAIM (INLINE CLAMP)) ; processing (DEFUN CLAMP ...) ; processing (DEFUN GAUSSIAN-RANDOM ...) ; processing (DECLAIM (INLINE IOTA)) ; processing (DEFUN IOTA ...) ; processing (DECLAIM (INLINE MAP-IOTA)) ; processing (DEFUN MAP-IOTA ...) ; processing (DECLAIM (INLINE LERP)) ; processing (DEFUN LERP ...) ; processing (DECLAIM (INLINE MEAN)) ; processing (DEFUN MEAN ...) ; processing (DEFUN MEDIAN ...) ; processing (DECLAIM (INLINE VARIANCE)) ; processing (DEFUN VARIANCE ...) ; processing (DECLAIM (INLINE STANDARD-DEVIATION)) ; processing (DEFUN STANDARD-DEVIATION ...) ; processing (DEFINE-MODIFY-MACRO MAXF ...) ; processing (DEFINE-MODIFY-MACRO MINF ...) ; processing (DEFCONSTANT +FACTORIAL-BISECTION-RANGE-LIMIT+ ...) ; processing (DEFCONSTANT +FACTORIAL-DIRECT-MULTIPLICATION-LIMIT+ ...) ; processing (DEFUN %MULTIPLY-RANGE ...) ; processing (DECLAIM (INLINE FACTORIAL)) ; processing (DEFUN %FACTORIAL ...) ; processing (DEFUN FACTORIAL ...) ; processing (DEFUN BINOMIAL-COEFFICIENT ...) ; processing (DEFUN SUBFACTORIAL ...) ; processing (DEFUN COUNT-PERMUTATIONS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/alexandria/alexandria-1/numbers-tmpUX5S4ADN.fasl ; compilation finished in 0:00:00.571 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/features.lisp" (written 21 AUG 2020 04:45:02 AM): ; processing (IN-PACKAGE :ALEXANDRIA) ; processing (DEFUN FEATUREP ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/alexandria/alexandria-1/features-tmp10401X32.fasl ; compilation finished in 0:00:00.051 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-2/package.lisp" (written 21 AUG 2020 04:45:02 AM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE :ALEXANDRIA-2 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/alexandria/alexandria-2/package-tmpZ7CBRM0G.fasl ; compilation finished in 0:00:00.027 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-2/control-flow.lisp" (written 21 AUG 2020 04:45:02 AM): ; processing (IN-PACKAGE :ALEXANDRIA-2) ; processing (DEFUN LINE-UP-ITER ...) ; processing (DEFMACRO LINE-UP-FIRST ...) ; processing (DEFMACRO LINE-UP-LAST ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/alexandria/alexandria-2/control-flow-tmp9OZEQ0G2.fasl ; compilation finished in 0:00:00.035 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-2/sequences.lisp" (written 21 AUG 2020 04:45:02 AM): ; processing (IN-PACKAGE :ALEXANDRIA-2) ; processing (DEFUN SUBSEQ* ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/alexandria/alexandria-2/sequences-tmpB2JTL1W9.fasl ; compilation finished in 0:00:00.019 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-2/lists.lisp" (written 21 AUG 2020 04:45:02 AM): ; processing (IN-PACKAGE :ALEXANDRIA-2) ; processing (DEFUN DELETE-FROM-PLIST* ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/alexandria/alexandria-2/lists-tmpP3BI68WQ.fasl ; compilation finished in 0:00:00.027 ; compiling file "/usr/share/common-lisp/source/trivial-features/src/tf-sbcl.lisp" (written 02 JUL 2020 10:57:28 AM): ; processing (IN-PACKAGE :CL-USER) ; processing (PUSHNEW (WITH-ALIEN # ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/trivial-features/src/tf-sbcl-tmpQDARA81Z.fasl ; compilation finished in 0:00:00.027 ; compiling file "/usr/share/common-lisp/source/babel/src/packages.lisp" (written 18 JUL 2020 06:57:54 PM): ; processing (IN-PACKAGE #:CL-USER) ; processing (DEFPACKAGE #:BABEL-ENCODINGS ...) ; processing (DEFPACKAGE #:BABEL ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/babel/src/packages-tmpYEMMM7SE.fasl ; compilation finished in 0:00:00.011 ; compiling file "/usr/share/common-lisp/source/babel/src/encodings.lisp" (written 18 JUL 2020 06:57:54 PM): ; processing (IN-PACKAGE #:BABEL-ENCODINGS) ; processing (DEFCLASS CHARACTER-ENCODING ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFVAR *SUPPORTED-CHARACTER-ENCODINGS* ...) ; processing (DEFUN LIST-CHARACTER-ENCODINGS ...) ; processing (DEFVAR *CHARACTER-ENCODINGS* ...) ; processing (DEFVAR *DEFAULT-CHARACTER-ENCODING* ...) ; processing (DEFUN GET-CHARACTER-ENCODING ...) ; processing (DEFMETHOD AMBIGUOUS-ENCODING-P ...) ; processing (DEFUN NOTICE-CHARACTER-ENCODING ...) ; processing (DEFMACRO DEFINE-CHARACTER-ENCODING ...) ; processing (DEFUN MAKE-FIXED-WIDTH-COUNTER ...) ; processing (DEFUN MAKE-DUMMY-CODER ...) ; processing (DEFCLASS ABSTRACT-MAPPING ...) ; processing (DEFCLASS CONCRETE-MAPPING ...) ; processing (DEFPARAMETER *ABSTRACT-MAPPINGS* ...) ; processing (DEFUN GET-ABSTRACT-MAPPING ...) ; processing (DEFUN (SETF GET-ABSTRACT-MAPPING) ...) ; processing (DEFUN %REGISTER-MAPPING-PART ...) ; processing (DEFMACRO DEFINE-ENCODER ...) ; processing (DEFMACRO DEFINE-DECODER ...) ; processing (DEFMACRO DEFINE-OCTET-COUNTER ...) ; processing (DEFMACRO DEFINE-CODE-POINT-COUNTER ...) ; processing (DEFUN INSTANTIATE-ENCODER ...) ; processing (DEFUN INSTANTIATE-DECODER ...) ; processing (DEFUN INSTANTIATE-CODE-POINT-COUNTER ...) ; processing (DEFUN INSTANTIATE-OCTET-COUNTER ...) ; processing (DEFMACRO INSTANTIATE-CONCRETE-MAPPINGS ...) ; processing (DEFCONSTANT +DEFAULT-SUBSTITUTION-CODE-POINT+ ...) ; processing (DEFTYPE UB8 ...) ; processing (DEFTYPE CODE-POINT ...) ; processing (DEFMACRO DEFINE-UNIBYTE-ENCODER ...) ; processing (DEFMACRO DEFINE-UNIBYTE-DECODER ...) ; processing (DEFVAR *SUPPRESS-CHARACTER-CODING-ERRORS* ...) ; processing (DEFINE-CONDITION CHARACTER-CODING-ERROR ...) ; processing (DEFINE-CONDITION CHARACTER-ENCODING-ERROR ...) ; processing (DECLAIM (INLINE ENCODING-ERROR)) ; processing (DEFUN ENCODING-ERROR ...) ; processing (DEFINE-CONDITION CHARACTER-DECODING-ERROR ...) ; processing (DEFINE-CONDITION END-OF-INPUT-IN-CHARACTER ...) ; processing (DEFINE-CONDITION CHARACTER-OUT-OF-RANGE ...) ; processing (DECLAIM (INLINE DECODING-ERROR)) ; processing (DEFUN DECODING-ERROR ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/babel/src/encodings-tmp73HU0RPK.fasl ; compilation finished in 0:00:00.735 ; compiling file "/usr/share/common-lisp/source/babel/src/enc-ascii.lisp" (written 18 JUL 2020 06:57:54 PM): ; processing (IN-PACKAGE #:BABEL-ENCODINGS) ; processing (DEFINE-CHARACTER-ENCODING :ASCII ...) ; processing (DEFINE-UNIBYTE-ENCODER :ASCII ...) ; processing (DEFINE-UNIBYTE-DECODER :ASCII ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/babel/src/enc-ascii-tmpIO5N7K88.fasl ; compilation finished in 0:00:00.043 ; compiling file "/usr/share/common-lisp/source/babel/src/enc-ebcdic.lisp" (written 18 JUL 2020 06:57:54 PM): ; processing (IN-PACKAGE #:BABEL-ENCODINGS) ; processing (DEFINE-CHARACTER-ENCODING :EBCDIC-US ...) ; processing (DEFINE-CONSTANT +EBCDIC-DECODE-TABLE+ ...) ; processing (DEFINE-CONSTANT +EBCDIC-ENCODE-TABLE+ ...) ; processing (DEFINE-UNIBYTE-ENCODER :EBCDIC-US ...) ; processing (DEFINE-UNIBYTE-DECODER :EBCDIC-US ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/babel/src/enc-ebcdic-tmpCM21U60Z.fasl ; compilation finished in 0:00:00.099 ; compiling file "/usr/share/common-lisp/source/babel/src/enc-ebcdic-int.lisp" (written 18 JUL 2020 06:57:54 PM): ; processing (IN-PACKAGE #:BABEL-ENCODINGS) ; processing (DEFINE-CHARACTER-ENCODING :EBCDIC-INTERNATIONAL ...) ; processing (DEFPARAMETER +EBCDIC-INT-TO-UNICODE+ ...) ; processing (DEFPARAMETER +UNICODE-UPTO-AC-EBCDIC-INT+ ...) ; processing (DEFPARAMETER +UNICODE-0410-0450-EBCDIC-INT+ ...) ; processing (DEFINE-UNIBYTE-DECODER :EBCDIC-INTERNATIONAL ...) ; processing (DEFINE-UNIBYTE-ENCODER :EBCDIC-INTERNATIONAL ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/babel/src/enc-ebcdic-int-tmp9DT7SEFG.fasl ; compilation finished in 0:00:00.043 ; compiling file "/usr/share/common-lisp/source/babel/src/enc-iso-8859.lisp" (written 18 JUL 2020 06:57:54 PM): ; processing (IN-PACKAGE #:BABEL-ENCODINGS) ; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-1 ...) ; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-1 ...) ; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-1 ...) ; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-2 ...) ; processing (DEFINE-CONSTANT +UNICODE-00A0-0180-TO-ISO-8859-2+ ...) ; processing (DEFINE-CONSTANT +UNICODE-02C0-02E0-TO-ISO-8859-2+ ...) ; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-2 ...) ; processing (DEFINE-CONSTANT +ISO-8859-2-TO-UNICODE+ ...) ; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-2 ...) ; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-3 ...) ; processing (DEFINE-CONSTANT +UNICODE-A0-100-TO-ISO-8859-3+ ...) ; processing (DEFINE-CONSTANT +UNICODE-108-180-TO-ISO-8859-3+ ...) ; processing (DEFINE-CONSTANT +UNICODE-2D8-2E0-TO-ISO-8859-3+ ...) ; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-3 ...) ; processing (DEFINE-CONSTANT +ISO-8859-3-TO-UNICODE+ ...) ; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-3 ...) ; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-4 ...) ; processing (DEFINE-CONSTANT +UNICODE-A0-180-TO-ISO-8859-4+ ...) ; processing (DEFINE-CONSTANT +UNICODE-2C0-2E0-TO-ISO-8859-4+ ...) ; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-4 ...) ; processing (DEFINE-CONSTANT +ISO-8859-4-TO-UNICODE+ ...) ; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-4 ...) ; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-5 ...) ; processing (DEFINE-CONSTANT +UNICODE-A0-B0-TO-ISO-8859-5+ ...) ; processing (DEFINE-CONSTANT +UNICODE-400-460-TO-ISO-8859-5+ ...) ; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-5 ...) ; processing (DEFINE-CONSTANT +ISO-8859-5-TO-UNICODE+ ...) ; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-5 ...) ; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-6 ...) ; processing (DEFINE-CONSTANT +UNICODE-A0-B0-TO-ISO-8859-6+ ...) ; processing (DEFINE-CONSTANT +UNICODE-608-658-TO-ISO-8859-6+ ...) ; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-6 ...) ; processing (DEFINE-CONSTANT +ISO-8859-6-TO-UNICODE+ ...) ; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-6 ...) ; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-7 ...) ; processing (DEFINE-CONSTANT +UNICODE-A0-C0-TO-ISO-8859-7+ ...) ; processing (DEFINE-CONSTANT +UNICODE-378-3D0-TO-ISO-8859-7+ ...) ; processing (DEFINE-CONSTANT +UNICODE-2010-2020-TO-ISO-8859-7+ ...) ; processing (DEFINE-CONSTANT +UNICODE-20AC-20B0-TO-ISO-8859-7+ ...) ; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-7 ...) ; processing (DEFINE-CONSTANT +ISO-8859-7-TO-UNICODE+ ...) ; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-7 ...) ; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-8 ...) ; processing (DEFINE-CONSTANT +UNICODE-A0-F8-TO-ISO-8859-8+ ...) ; processing (DEFINE-CONSTANT +UNICODE-5D0-5F0-TO-ISO-8859-8+ ...) ; processing (DEFINE-CONSTANT +UNICODE-2008-2018-TO-ISO-8859-8+ ...) ; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-8 ...) ; processing (DEFINE-CONSTANT +ISO-8859-8-TO-UNICODE+ ...) ; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-8 ...) ; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-9 ...) ; processing (DEFINE-CONSTANT +UNICODE-D0-100-TO-ISO-8859-9+ ...) ; processing (DEFINE-CONSTANT +UNICODE-118-160-TO-ISO-8859-9+ ...) ; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-9 ...) ; processing (DEFINE-CONSTANT +ISO-8859-9-TO-UNICODE+ ...) ; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-9 ...) ; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-10 ...) ; processing (DEFINE-CONSTANT +UNICODE-A0-180-TO-ISO-8859-10+ ...) ; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-10 ...) ; processing (DEFINE-CONSTANT +ISO-8859-10-TO-UNICODE+ ...) ; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-10 ...) ; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-11 ...) ; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-11 ...) ; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-11 ...) ; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-13 ...) ; processing (DEFINE-CONSTANT +UNICODE-A0-180-TO-ISO-8859-13+ ...) ; processing (DEFINE-CONSTANT +UNICODE-2018-2020-TO-ISO-8859-13+ ...) ; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-13 ...) ; processing (DEFINE-CONSTANT +ISO-8859-13-TO-UNICODE+ ...) ; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-13 ...) ; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-14 ...) ; processing (DEFINE-CONSTANT +UNICODE-A0-100-TO-ISO-8859-14+ ...) ; processing (DEFINE-CONSTANT +UNICODE-108-128-TO-ISO-8859-14+ ...) ; processing (DEFINE-CONSTANT +UNICODE-170-180-TO-ISO-8859-14+ ...) ; processing (DEFINE-CONSTANT +UNICODE-1E00-1E88-TO-ISO-8859-14+ ...) ; processing (DEFINE-CONSTANT +UNICODE-1EF0-1EF8-TO-ISO-8859-14+ ...) ; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-14 ...) ; processing (DEFINE-CONSTANT +ISO-8859-14-TO-UNICODE+ ...) ; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-14 ...) ; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-15 ...) ; processing (DEFINE-CONSTANT +UNICODE-A0-100-TO-ISO-8859-15+ ...) ; processing (DEFINE-CONSTANT +UNICODE-150-180-TO-ISO-8859-15+ ...) ; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-15 ...) ; processing (DEFINE-CONSTANT +ISO-8859-15-TO-UNICODE+ ...) ; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-15 ...) ; processing (DEFINE-CHARACTER-ENCODING :ISO-8859-16 ...) ; processing (DEFINE-CONSTANT +UNICODE-A0-180-TO-ISO-8859-16+ ...) ; processing (DEFINE-CONSTANT +UNICODE-218-220-TO-ISO-8859-16+ ...) ; processing (DEFINE-CONSTANT +UNICODE-2018-2020-TO-ISO-8859-16+ ...) ; processing (DEFINE-UNIBYTE-ENCODER :ISO-8859-16 ...) ; processing (DEFINE-CONSTANT +ISO-8859-16-TO-UNICODE+ ...) ; processing (DEFINE-UNIBYTE-DECODER :ISO-8859-16 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/babel/src/enc-iso-8859-tmp8065ESJT.fasl ; compilation finished in 0:00:00.623 ; compiling file "/usr/share/common-lisp/source/babel/src/enc-unicode.lisp" (written 18 JUL 2020 06:57:54 PM): ; processing (IN-PACKAGE #:BABEL-ENCODINGS) ; processing (DEFCONSTANT +REPL+ ...) ; processing (DEFCONSTANT +BYTE-ORDER-MARK-CODE+ ...) ; processing (DEFCONSTANT +SWAPPED-BYTE-ORDER-MARK-CODE+ ...) ; processing (DEFCONSTANT +SWAPPED-BYTE-ORDER-MARK-CODE-32+ ...) ; processing (DEFMACRO F-ASH ...) ; processing (DEFMACRO F-LOGIOR ...) ; processing (DEFMACRO F-LOGAND ...) ; processing (DEFMACRO F-LOGXOR ...) ; processing (DEFINE-CHARACTER-ENCODING :UTF-8 ...) ; processing (DEFINE-CONDITION INVALID-UTF8-STARTER-BYTE ...) ; processing (DEFINE-CONDITION INVALID-UTF8-CONTINUATION-BYTE ...) ; processing (DEFINE-CONDITION OVERLONG-UTF8-SEQUENCE ...) ; processing (DEFINE-OCTET-COUNTER :UTF-8 ...) ; processing (DEFINE-CODE-POINT-COUNTER :UTF-8 ...) ; processing (DEFINE-ENCODER :UTF-8 ...) ; processing (DEFINE-DECODER :UTF-8 ...) ; processing (DEFINE-CHARACTER-ENCODING :UTF-8B ...) ; processing (DEFINE-OCTET-COUNTER :UTF-8B ...) ; processing (DEFINE-CODE-POINT-COUNTER :UTF-8B ...) ; processing (DEFINE-ENCODER :UTF-8B ...) ; processing (DEFINE-DECODER :UTF-8B ...) ; processing (DEFMACRO UTF16-OCTET-COUNTER ...) ; processing (DEFMACRO UTF-16-COMBINE-SURROGATE-PAIRS ...) ; processing (DEFMACRO DEFINE-UTF-16 ...) ; processing (DEFINE-CHARACTER-ENCODING :UTF-16 ...) ; processing (DEFINE-UTF-16 :UTF-16) ; processing (DEFINE-CHARACTER-ENCODING :UTF-16LE ...) ; processing (DEFINE-UTF-16 :UTF-16LE ...) ; processing (DEFINE-CHARACTER-ENCODING :UTF-16BE ...) ; processing (DEFINE-UTF-16 :UTF-16BE ...) ; processing (DEFMACRO DEFINE-UCS ...) ; processing (DEFINE-CHARACTER-ENCODING :UTF-32 ...) ; processing (DEFINE-UCS :UTF-32 ...) ; processing (DEFINE-CHARACTER-ENCODING :UTF-32LE ...) ; processing (DEFINE-UCS :UTF-32LE ...) ; processing (DEFINE-CHARACTER-ENCODING :UTF-32BE ...) ; processing (DEFINE-UCS :UTF-32BE ...) ; processing (DEFINE-CHARACTER-ENCODING :UCS-2 ...) ; processing (DEFINE-UCS :UCS-2 ...) ; processing (DEFINE-CHARACTER-ENCODING :UCS-2LE ...) ; processing (DEFINE-UCS :UCS-2LE ...) ; processing (DEFINE-CHARACTER-ENCODING :UCS-2BE ...) ; processing (DEFINE-UCS :UCS-2BE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/babel/src/enc-unicode-tmp7S8Z6FGF.fasl ; compilation finished in 0:00:01.531 ; compiling file "/usr/share/common-lisp/source/babel/src/enc-cp437.lisp" (written 18 JUL 2020 06:57:54 PM): ; processing (IN-PACKAGE #:BABEL-ENCODINGS) ; processing (DEFINE-CHARACTER-ENCODING :CP437 ...) ; processing (DEFINE-CONSTANT +CP437-TO-UNICODE+ ...) ; processing (DEFINE-UNIBYTE-DECODER :CP437 ...) ; processing (DEFINE-UNIBYTE-ENCODER :CP437 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/babel/src/enc-cp437-tmpSIT3QPKP.fasl ; compilation finished in 0:00:00.111 ; compiling file "/usr/share/common-lisp/source/babel/src/enc-cp1251.lisp" (written 18 JUL 2020 06:57:54 PM): ; processing (IN-PACKAGE #:BABEL-ENCODINGS) ; processing (DEFINE-CHARACTER-ENCODING :CP1251 ...) ; processing (DEFINE-CONSTANT +CP1251-TO-UNICODE+ ...) ; processing (DEFINE-UNIBYTE-DECODER :CP1251 ...) ; processing (DEFINE-CONSTANT +UNICODE-A0-BF-TO-CP1251+ ...) ; processing (DEFINE-CONSTANT +UNICODE-0-97-TO-CP1251+ ...) ; processing (DEFINE-CONSTANT +UNICODE-10-3F-TO-CP1251+ ...) ; processing (DEFINE-UNIBYTE-ENCODER :CP1251 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/babel/src/enc-cp1251-tmpE0PA0714.fasl ; compilation finished in 0:00:00.119 ; compiling file "/usr/share/common-lisp/source/babel/src/enc-cp1252.lisp" (written 18 JUL 2020 06:57:54 PM): ; processing (IN-PACKAGE #:BABEL-ENCODINGS) ; processing (DEFINE-CHARACTER-ENCODING :CP1252 ...) ; processing (DEFINE-CONSTANT +CP1252-TO-UNICODE+ ...) ; processing (DEFINE-UNIBYTE-DECODER :CP1252 ...) ; processing (DEFINE-CONSTANT +UNICODE-0152-017E-CP1252+ ...) ; processing (DEFINE-CONSTANT +UNICODE-2013-203A-CP1252+ ...) ; processing (DEFINE-UNIBYTE-ENCODER :CP1252 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/babel/src/enc-cp1252-tmpJRWHHVG0.fasl ; compilation finished in 0:00:00.111 ; compiling file "/usr/share/common-lisp/source/babel/src/jpn-table.lisp" (written 18 JUL 2020 06:57:54 PM): ; processing (IN-PACKAGE #:BABEL-ENCODINGS) ; processing (DEFVAR *CP932-ONLY* ...) ; processing (DEFVAR *EUCJP-ONLY* ...) ; processing (DEFVAR *EUCJP* ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/babel/src/jpn-table-tmp4WZVROCX.fasl ; compilation finished in 0:00:01.487 ; compiling file "/usr/share/common-lisp/source/babel/src/enc-jpn.lisp" (written 18 JUL 2020 06:57:54 PM): ; processing (IN-PACKAGE #:BABEL-ENCODINGS) ; processing (DEFVAR *EUCJP-TO-UCS-HASH* ...) ; processing (DEFVAR *UCS-TO-EUCJP-HASH* ...) ; processing (DEFVAR *CP932-TO-UCS-HASH* ...) ; processing (DEFVAR *UCS-TO-CP932-HASH* ...) ; processing (DOLIST (I #) ...) ; processing (FLET (#) ...) ; processing (LOOP FOR ...) ; processing (LOOP FOR ...) ; processing (LET (#) ...) ; processing (DEFUN EUCJP-TO-UCS ...) ; processing (DEFUN UCS-TO-EUCJP ...) ; processing (DEFUN CP932-TO-UCS ...) ; processing (DEFUN UCS-TO-CP932 ...) ; processing (DEFINE-CHARACTER-ENCODING :EUCJP ...) ; processing (DEFINE-OCTET-COUNTER :EUCJP ...) ; processing (DEFINE-CODE-POINT-COUNTER :EUCJP ...) ; processing (DEFINE-ENCODER :EUCJP ...) ; processing (DEFINE-DECODER :EUCJP ...) ; processing (DEFINE-CHARACTER-ENCODING :CP932 ...) ; processing (DEFINE-OCTET-COUNTER :CP932 ...) ; processing (DEFINE-CODE-POINT-COUNTER :CP932 ...) ; processing (DEFINE-ENCODER :CP932 ...) ; processing (DEFINE-DECODER :CP932 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/babel/src/enc-jpn-tmpA0I3UKX8.fasl ; compilation finished in 0:00:00.423 ; compiling file "/usr/share/common-lisp/source/babel/src/enc-gbk.lisp" (written 18 JUL 2020 06:57:54 PM): ; processing (IN-PACKAGE #:BABEL-ENCODINGS) ; processing (DEFVAR *GBK-UNICODE-MAPPING*) ; processing (DEFCONSTANT +GBK2-OFFSET+ ...) ; processing (DEFCONSTANT +GBK3-OFFSET+ ...) ; processing (DEFCONSTANT +GBK4-OFFSET+ ...) ; processing (DEFCONSTANT +GBK1-OFFSET+ ...) ; processing (DEFCONSTANT +GBK5-OFFSET+ ...) ; processing (DEFINE-CHARACTER-ENCODING :GBK ...) ; processing (DEFINE-CONDITION INVALID-GBK-BYTE ...) ; processing (DEFINE-CONDITION INVALID-GBK-CHARACTER ...) ; processing (DEFINE-OCTET-COUNTER :GBK ...) ; processing (DEFINE-CODE-POINT-COUNTER :GBK ...) ; processing (DEFINE-ENCODER :GBK ...) ; processing (DEFINE-DECODER :GBK ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/babel/src/enc-gbk-tmp267Y2N80.fasl ; compilation finished in 0:00:00.143 ; compiling file "/usr/share/common-lisp/source/babel/src/enc-koi8.lisp" (written 18 JUL 2020 06:57:54 PM): ; processing (IN-PACKAGE #:BABEL-ENCODINGS) ; processing (DEFINE-CHARACTER-ENCODING :KOI8-RU ...) ; processing (DEFINE-CONSTANT +KOI8-RU-TO-UNICODE+ ...) ; processing (DEFINE-UNIBYTE-DECODER :KOI8-RU ...) ; processing (DEFINE-CONSTANT +UNICODE-04->KOI8-RU+ ...) ; processing (DEFINE-UNIBYTE-ENCODER :KOI8-RU ...) ; processing (DEFINE-CHARACTER-ENCODING :KOI8-R ...) ; processing (DEFINE-CONSTANT +KOI8-R-TO-UNICODE+ ...) ; processing (DEFINE-UNIBYTE-DECODER :KOI8-R ...) ; processing (DEFINE-CONSTANT +UNICODE-X04->KOI8-R+ ...) ; processing (DEFINE-CONSTANT +UNICODE-X25->KOI8-R+ ...) ; processing (DEFINE-UNIBYTE-ENCODER :KOI8-R ...) ; processing (DEFINE-CHARACTER-ENCODING :KOI8-U ...) ; processing (DEFINE-CONSTANT +KOI8-U-TO-UNICODE+ ...) ; processing (DEFINE-UNIBYTE-DECODER :KOI8-U ...) ; processing (DEFINE-CONSTANT +UNICODE-X04->KOI8-U+ ...) ; processing (DEFINE-CONSTANT +UNICODE-X25->KOI8-U+ ...) ; processing (DEFINE-UNIBYTE-ENCODER :KOI8-U ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/babel/src/enc-koi8-tmpOUPE5FSJ.fasl ; compilation finished in 0:00:00.159 ; compiling file "/usr/share/common-lisp/source/babel/src/external-format.lisp" (written 18 JUL 2020 06:57:54 PM): ; processing (IN-PACKAGE #:BABEL) ; processing (DEFVAR *DEFAULT-EOL-STYLE* ...) ; processing (DEFTYPE EOL-STYLE ...) ; processing (DEFCLASS EXTERNAL-FORMAT ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN MAKE-EXTERNAL-FORMAT ...) ; processing (DEFUN ENSURE-EXTERNAL-FORMAT ...) ; processing (DEFUN EXTERNAL-FORMAT-EQUAL ...) ; processing (DECLAIM (INLINE LOOKUP-MAPPING)) ; processing (DEFUN LOOKUP-MAPPING ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/babel/src/external-format-tmpIGHCU6ZA.fasl ; compilation finished in 0:00:00.119 ; compiling file "/usr/share/common-lisp/source/babel/src/strings.lisp" (written 18 JUL 2020 06:57:54 PM): ; processing (IN-PACKAGE #:BABEL) ; processing (CASE (EVAL CHAR-CODE-LIMIT) ...) ; processing (DEFMACRO UB-GET ...) ; processing (DEFMACRO UB-SET ...) ; processing (DEFMACRO STRING-GET ...) ; processing (DEFMACRO STRING-SET ...) ; processing (DEFCONSTANT UNICODE-CHAR-CODE-LIMIT ...) ; processing (DEFTYPE UNICODE-CHAR ...) ; processing (DEFTYPE SIMPLE-UNICODE-STRING ...) ; processing (DEFTYPE UNICODE-STRING ...) ; processing (DEFPARAMETER *STRING-VECTOR-MAPPINGS* ...) ; processing (DEFPARAMETER *SIMPLE-BASE-STRING-VECTOR-MAPPINGS* ...) ; processing (DEFUN CHECK-VECTOR-BOUNDS ...) ; processing (DEFMACRO WITH-SIMPLE-VECTOR ...) ; processing (DEFMACRO WITH-CHECKED-SIMPLE-VECTOR ...) ; processing (DECLAIM (INLINE OCTETS-TO-STRING ...)) ; processing (DEFUN OCTETS-TO-STRING ...) ; processing (DEFUN BOM-VECTOR ...) ; processing (DEFUN STRING-TO-OCTETS ...) ; processing (DEFUN CONCATENATE-STRINGS-TO-OCTETS ...) ; processing (DEFUN STRING-SIZE-IN-OCTETS ...) ; processing (DEFUN VECTOR-SIZE-IN-CHARS ...) ; processing (DECLAIM (NOTINLINE OCTETS-TO-STRING ...)) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/babel/src/strings-tmpBO0TUGLK.fasl ; compilation finished in 0:00:25.078 ; compiling file "/usr/share/common-lisp/source/babel/src/gbk-map.lisp" (written 18 JUL 2020 06:57:54 PM): ; processing (IN-PACKAGE #:BABEL-ENCODINGS) ; processing (DEFPARAMETER *GBK-UNICODE-MAPPING* ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/babel/src/gbk-map-tmpIIXPIQNW.fasl ; compilation finished in 0:00:00.671 ; compiling file "/usr/share/common-lisp/source/babel/src/sharp-backslash.lisp" (written 18 JUL 2020 06:57:54 PM): ; processing (IN-PACKAGE #:BABEL) ; processing (DEFUN SHARP-BACKSLASH-READER ...) ; processing (DEFUN MAKE-SHARP-BACKSLASH-READER ...) ; processing (DEFMACRO ENABLE-SHARP-BACKSLASH-SYNTAX ...) ; processing (DEFUN SET-SHARP-BACKSLASH-SYNTAX-IN-READTABLE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/babel/src/sharp-backslash-tmpOHM494YR.fasl ; compilation finished in 0:00:00.127 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/cffi-sbcl.lisp" (written 07 JUL 2020 11:38:29 PM): ; processing (DEFPACKAGE #:CFFI-SYS ...) ; processing (IN-PACKAGE #:CFFI-SYS) ; processing (PUSHNEW (QUOTE FLAT-NAMESPACE) ...) ; processing (DECLAIM (INLINE CANONICALIZE-SYMBOL-NAME-CASE)) ; processing (DEFUN CANONICALIZE-SYMBOL-NAME-CASE ...) ; processing (DEFTYPE FOREIGN-POINTER ...) ; processing (DECLAIM (INLINE POINTERP)) ; processing (DEFUN POINTERP ...) ; processing (DECLAIM (INLINE POINTER-EQ)) ; processing (DEFUN POINTER-EQ ...) ; processing (DECLAIM (INLINE NULL-POINTER)) ; processing (DEFUN NULL-POINTER ...) ; processing (DECLAIM (INLINE NULL-POINTER-P)) ; processing (DEFUN NULL-POINTER-P ...) ; processing (DECLAIM (INLINE INC-POINTER)) ; processing (DEFUN INC-POINTER ...) ; processing (DECLAIM (INLINE MAKE-POINTER)) ; processing (DEFUN MAKE-POINTER ...) ; processing (DECLAIM (INLINE POINTER-ADDRESS)) ; processing (DEFUN POINTER-ADDRESS ...) ; processing (DECLAIM (INLINE %FOREIGN-ALLOC)) ; processing (DEFUN %FOREIGN-ALLOC ...) ; processing (DECLAIM (INLINE FOREIGN-FREE)) ; processing (DEFUN FOREIGN-FREE ...) ; processing (DEFMACRO WITH-FOREIGN-POINTER ...) ; processing (DECLAIM (INLINE MAKE-SHAREABLE-BYTE-VECTOR)) ; processing (DEFUN MAKE-SHAREABLE-BYTE-VECTOR ...) ; processing (DEFMACRO WITH-POINTER-TO-VECTOR-DATA ...) ; processing (DEFMACRO DEFINE-MEM-ACCESSORS ...) ; processing (DEFMACRO DEFINE-TYPE-MAPPING ...) ; processing (DEFINE-TYPE-MAPPING (# # ...) ...) ; processing (DEFUN %FOREIGN-TYPE-SIZE ...) ; processing (DEFUN %FOREIGN-TYPE-ALIGNMENT ...) ; processing (DEFUN FOREIGN-FUNCALL-TYPE-AND-ARGS ...) ; processing (DEFMACRO %%FOREIGN-FUNCALL ...) ; processing (DEFMACRO %FOREIGN-FUNCALL ...) ; processing (DEFMACRO %FOREIGN-FUNCALL-POINTER ...) ; processing (DEFVAR *CALLBACKS* ...) ; processing (DEFMACRO %DEFCALLBACK ...) ; processing (DEFUN %CALLBACK ...) ; processing (DECLAIM (INLINE %LOAD-FOREIGN-LIBRARY)) ; processing (DEFUN %LOAD-FOREIGN-LIBRARY ...) ; processing (DEFUN UNLOAD-SHARED-OBJECT-PRESENT-P ...) ; processing (DEFUN %CLOSE-FOREIGN-LIBRARY ...) ; processing (DEFUN NATIVE-NAMESTRING ...) ; processing (DEFUN %FOREIGN-SYMBOL-POINTER ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-cffi/src/cffi-sbcl-tmpOVFB07XF.fasl ; compilation finished in 0:00:01.871 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/package.lisp" (written 07 JUL 2020 11:38:29 PM): ; processing (IN-PACKAGE #:CL-USER) ; processing (DEFPACKAGE #:CFFI ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-cffi/src/package-tmpG6VFGMYP.fasl ; compilation finished in 0:00:00.035 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/utils.lisp" (written 07 JUL 2020 11:38:29 PM): ; processing (IN-PACKAGE #:CFFI) ; processing (DEFMACRO DISCARD-DOCSTRING ...) ; processing (DEFUN SINGLE-BIT-P ...) ; processing (DEFUN WARN-IF-KW-OR-BELONGS-TO-CL ...) ; processing (DEFINE-CONDITION OBSOLETE-ARGUMENT-WARNING ...) ; processing (DEFUN WARN-OBSOLETE-ARGUMENT ...) ; processing (DEFUN SPLIT-IF ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-cffi/src/utils-tmp4QIPRMOF.fasl ; compilation finished in 0:00:00.259 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/libraries.lisp" (written 07 JUL 2020 11:38:29 PM): ; processing (IN-PACKAGE #:CFFI) ; processing (DEFUN EXPLODE-PATH-ENVIRONMENT-VARIABLE ...) ; processing (DEFUN DARWIN-FALLBACK-LIBRARY-PATH ...) ; processing (DEFVAR *FOREIGN-LIBRARY-DIRECTORIES* ...) ; processing (DEFUN FALLBACK-DARWIN-FRAMEWORK-DIRECTORIES ...) ; processing (DEFVAR *DARWIN-FRAMEWORK-DIRECTORIES* ...) ; processing (DEFUN MINI-EVAL ...) ; processing (DEFUN PARSE-DIRECTORIES ...) ; processing (DEFUN FIND-FILE ...) ; processing (DEFUN FIND-DARWIN-FRAMEWORK ...) ; processing (DEFVAR *FOREIGN-LIBRARIES* ...) ; processing (DEFCLASS FOREIGN-LIBRARY ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFINE-CONDITION FOREIGN-LIBRARY-UNDEFINED-ERROR ...) ; processing (DEFUN GET-FOREIGN-LIBRARY ...) ; processing (DEFUN (SETF GET-FOREIGN-LIBRARY) ...) ; processing (DEFUN FOREIGN-LIBRARY-TYPE ...) ; processing (DEFUN FOREIGN-LIBRARY-PATHNAME ...) ; processing (DEFUN %FOREIGN-LIBRARY-SPEC ...) ; processing (DEFUN FOREIGN-LIBRARY-SPEC ...) ; processing (DEFUN FOREIGN-LIBRARY-OPTIONS ...) ; processing (DEFUN FOREIGN-LIBRARY-SEARCH-PATH ...) ; processing (DEFUN FOREIGN-LIBRARY-LOADED-P ...) ; processing (DEFUN LIST-FOREIGN-LIBRARIES ...) ; processing (DEFUN CLEAN-SPEC-UP ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFUN REGISTER-FOREIGN-LIBRARY ...) ; processing (DEFMACRO DEFINE-FOREIGN-LIBRARY ...) ; processing (DEFINE-CONDITION LOAD-FOREIGN-LIBRARY-ERROR ...) ; processing (DEFUN READ-NEW-VALUE ...) ; processing (DEFUN FL-ERROR ...) ; processing (DEFUN LOAD-DARWIN-FRAMEWORK ...) ; processing (DEFUN REPORT-SIMPLE-ERROR ...) ; processing (DEFUN LOAD-FOREIGN-LIBRARY-PATH ...) ; processing (DEFUN TRY-FOREIGN-LIBRARY-ALTERNATIVES ...) ; processing (DEFPARAMETER *CFFI-FEATURE-SUFFIX-MAP* ...) ; processing (DEFUN DEFAULT-LIBRARY-SUFFIX ...) ; processing (DEFUN LOAD-FOREIGN-LIBRARY-HELPER ...) ; processing (DEFUN %DO-LOAD-FOREIGN-LIBRARY ...) ; processing (DEFUN FILTER-PATHNAME ...) ; processing (DEFUN LOAD-FOREIGN-LIBRARY ...) ; processing (DEFMACRO USE-FOREIGN-LIBRARY ...) ; processing (DEFUN CLOSE-FOREIGN-LIBRARY ...) ; processing (DEFUN RELOAD-FOREIGN-LIBRARIES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-cffi/src/libraries-tmpGW0QV22K.fasl ; compilation finished in 0:00:01.379 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/early-types.lisp" (written 07 JUL 2020 11:38:29 PM): ; processing (IN-PACKAGE #:CFFI) ; processing (DEFVAR *TYPE-PARSERS* ...) ; processing (DEFINE-CONDITION CFFI-ERROR ...) ; processing (DEFINE-CONDITION FOREIGN-TYPE-ERROR ...) ; processing (DEFUN FOREIGN-TYPE-ERROR/COMPOUND-NAME ...) ; processing (DEFINE-CONDITION SIMPLE-FOREIGN-TYPE-ERROR ...) ; processing (DEFUN SIMPLE-FOREIGN-TYPE-ERROR ...) ; processing (DEFINE-CONDITION UNDEFINED-FOREIGN-TYPE-ERROR ...) ; processing (DEFUN UNDEFINED-FOREIGN-TYPE-ERROR ...) ; processing (DEFTYPE C-NAMESPACE-NAME ...) ; processing (DEFUN FIND-TYPE-PARSER ...) ; processing (DEFUN (SETF FIND-TYPE-PARSER) ...) ; processing (DEFUN UNDEFINE-FOREIGN-TYPE ...) ; processing (DEFMACRO DEFINE-PARSE-METHOD ...) ; processing (DEFUN NOTICE-FOREIGN-TYPE ...) ; processing (DEFGENERIC CANONICALIZE ...) ; processing (DEFGENERIC AGGREGATEP ...) ; processing (DEFGENERIC FOREIGN-TYPE-ALIGNMENT ...) ; processing (DEFGENERIC FOREIGN-TYPE-SIZE ...) ; processing (DEFGENERIC UNPARSE-TYPE ...) ; processing (DEFCLASS FOREIGN-TYPE ...) ; processing (DEFMETHOD MAKE-LOAD-FORM ...) ; processing (DEFMETHOD FOREIGN-TYPE-SIZE ...) ; processing (DEFCLASS NAMED-FOREIGN-TYPE ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFMETHOD UNPARSE-TYPE ...) ; processing (DEFCLASS FOREIGN-BUILT-IN-TYPE ...) ; processing (DEFMETHOD CANONICALIZE ...) ; processing (DEFMETHOD AGGREGATEP ...) ; processing (DEFMETHOD FOREIGN-TYPE-ALIGNMENT ...) ; processing (DEFMETHOD FOREIGN-TYPE-SIZE ...) ; processing (DEFMETHOD UNPARSE-TYPE ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFVAR *BUILT-IN-FOREIGN-TYPES* ...) ; processing (DEFMACRO DEFINE-BUILT-IN-FOREIGN-TYPE ...) ; processing (DEFCLASS FOREIGN-POINTER-TYPE ...) ; processing (LET (#) ...) ; processing (DEFMETHOD UNPARSE-TYPE ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFGENERIC BARE-STRUCT-TYPE-P ...) ; processing (DEFMETHOD BARE-STRUCT-TYPE-P ...) ; processing (DEFCLASS FOREIGN-STRUCT-TYPE ...) ; processing (DEFUN SLOTS-IN-ORDER ...) ; processing (DEFMETHOD CANONICALIZE ...) ; processing (DEFMETHOD UNPARSE-TYPE ...) ; processing (DEFMETHOD AGGREGATEP ...) ; processing (DEFMETHOD FOREIGN-TYPE-SIZE ...) ; processing (DEFMETHOD FOREIGN-TYPE-ALIGNMENT ...) ; processing (DEFCLASS FOREIGN-UNION-TYPE ...) ; processing (DEFMETHOD CANONICALIZE ...) ; processing (DEFCLASS FOREIGN-TYPE-ALIAS ...) ; processing (DEFMETHOD CANONICALIZE ...) ; processing (DEFMETHOD AGGREGATEP ...) ; processing (DEFMETHOD FOREIGN-TYPE-ALIGNMENT ...) ; processing (DEFMETHOD FOREIGN-TYPE-SIZE ...) ; processing (DEFCLASS FOREIGN-TYPEDEF ...) ; processing (DEFUN FOLLOW-TYPEDEFS ...) ; processing (DEFMETHOD BARE-STRUCT-TYPE-P ...) ; processing (DEFUN STRUCTURE-SLOTS ...) ; processing (DEFCLASS TRANSLATABLE-FOREIGN-TYPE ...) ; processing (DEFCLASS ENHANCED-FOREIGN-TYPE ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD UNPARSE-TYPE ...) ; processing (DEFUN CHECK-FOR-TYPEDEF-CYCLES ...) ; processing (DEFUN PARSE-TYPE ...) ; processing (DEFUN ENSURE-PARSED-BASE-TYPE ...) ; processing (DEFUN CANONICALIZE-FOREIGN-TYPE ...) ; processing (DEFGENERIC TRANSLATE-TO-FOREIGN ...) ; processing (DEFGENERIC TRANSLATE-INTO-FOREIGN-MEMORY ...) ; processing (DEFGENERIC TRANSLATE-AGGREGATE-TO-FOREIGN ...) ; processing (DEFGENERIC TRANSLATE-FROM-FOREIGN ...) ; processing (DEFGENERIC FREE-TRANSLATED-OBJECT ...) ; processing (DEFVAR *RUNTIME-TRANSLATOR-FORM*) ; processing (DEFGENERIC EXPAND-FROM-FOREIGN ...) ; processing (DEFMETHOD EXPAND-FROM-FOREIGN ...) ; processing (DEFMETHOD EXPAND-FROM-FOREIGN ...) ; processing (DEFGENERIC EXPAND-TO-FOREIGN ...) ; processing (DEFMETHOD EXPAND-TO-FOREIGN ...) ; processing (DEFMETHOD EXPAND-TO-FOREIGN ...) ; processing (DEFGENERIC EXPAND-INTO-FOREIGN-MEMORY ...) ; processing (DEFMETHOD EXPAND-INTO-FOREIGN-MEMORY ...) ; processing (DEFMETHOD EXPAND-INTO-FOREIGN-MEMORY ...) ; processing (DEFGENERIC EXPAND-TO-FOREIGN-DYN ...) ; processing (DEFMETHOD EXPAND-TO-FOREIGN-DYN ...) ; processing (DEFUN FOREIGN-EXPAND-RUNTIME-TRANSLATOR-OR-BINDING ...) ; processing (DEFMETHOD EXPAND-TO-FOREIGN-DYN ...) ; processing (DEFGENERIC EXPAND-TO-FOREIGN-DYN-INDIRECT ...) ; processing (DEFMETHOD EXPAND-TO-FOREIGN-DYN-INDIRECT ...) ; processing (DEFMETHOD EXPAND-TO-FOREIGN-DYN-INDIRECT ...) ; processing (DEFMETHOD EXPAND-TO-FOREIGN-DYN-INDIRECT ...) ; processing (DEFMETHOD EXPAND-TO-FOREIGN-DYN-INDIRECT ...) ; processing (DEFMETHOD EXPAND-TO-FOREIGN-DYN-INDIRECT ...) ; processing (DEFUN CONVERT-TO-FOREIGN ...) ; processing (DEFINE-COMPILER-MACRO CONVERT-TO-FOREIGN ...) ; processing (DEFUN CONVERT-FROM-FOREIGN ...) ; processing (DEFINE-COMPILER-MACRO CONVERT-FROM-FOREIGN ...) ; processing (DEFUN CONVERT-INTO-FOREIGN-MEMORY ...) ; processing (DEFINE-COMPILER-MACRO CONVERT-INTO-FOREIGN-MEMORY ...) ; processing (DEFUN FREE-CONVERTED-OBJECT ...) ; processing (DEFCLASS ENHANCED-TYPEDEF ...) ; processing (DEFMETHOD TRANSLATE-TO-FOREIGN ...) ; processing (DEFMETHOD TRANSLATE-INTO-FOREIGN-MEMORY ...) ; processing (DEFMETHOD TRANSLATE-FROM-FOREIGN ...) ; processing (DEFMETHOD FREE-TRANSLATED-OBJECT ...) ; processing (DEFMETHOD EXPAND-FROM-FOREIGN ...) ; processing (DEFMETHOD EXPAND-TO-FOREIGN ...) ; processing (DEFMETHOD EXPAND-TO-FOREIGN-DYN ...) ; processing (DEFMETHOD EXPAND-INTO-FOREIGN-MEMORY ...) ; processing (DEFMACRO DEFINE-FOREIGN-TYPE ...) ; processing (DEFMACRO DEFCTYPE ...) ; processing (DEFMACRO DEFCTYPE* ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-cffi/src/early-types-tmp2K9J0HSR.fasl ; compilation finished in 0:00:03.175 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/types.lisp" (written 07 JUL 2020 11:38:29 PM): ; processing (IN-PACKAGE #:CFFI) ; processing (DEFINE-BUILT-IN-FOREIGN-TYPE :CHAR) ; processing (DEFINE-BUILT-IN-FOREIGN-TYPE :UNSIGNED-CHAR) ; processing (DEFINE-BUILT-IN-FOREIGN-TYPE :SHORT) ; processing (DEFINE-BUILT-IN-FOREIGN-TYPE :UNSIGNED-SHORT) ; processing (DEFINE-BUILT-IN-FOREIGN-TYPE :INT) ; processing (DEFINE-BUILT-IN-FOREIGN-TYPE :UNSIGNED-INT) ; processing (DEFINE-BUILT-IN-FOREIGN-TYPE :LONG) ; processing (DEFINE-BUILT-IN-FOREIGN-TYPE :UNSIGNED-LONG) ; processing (DEFINE-BUILT-IN-FOREIGN-TYPE :FLOAT) ; processing (DEFINE-BUILT-IN-FOREIGN-TYPE :DOUBLE) ; processing (DEFINE-BUILT-IN-FOREIGN-TYPE :VOID) ; processing (DEFINE-BUILT-IN-FOREIGN-TYPE :LONG-LONG) ; processing (DEFINE-BUILT-IN-FOREIGN-TYPE :UNSIGNED-LONG-LONG) ; processing (DEFPARAMETER *POSSIBLE-FLOAT-TYPES* ...) ; processing (DEFPARAMETER *OTHER-BUILTIN-TYPES* ...) ; processing (DEFPARAMETER *BUILT-IN-INTEGER-TYPES* ...) ; processing (DEFPARAMETER *BUILT-IN-FLOAT-TYPES* ...) ; processing (DEFINE-COMPILER-MACRO INC-POINTER ...) ; processing (DEFINE-MODIFY-MACRO INCF-POINTER ...) ; processing (DEFUN MEM-REF ...) ; processing (DEFINE-COMPILER-MACRO MEM-REF ...) ; processing (DEFUN MEM-SET ...) ; processing (DEFINE-SETF-EXPANDER MEM-REF ...) ; processing (DEFINE-COMPILER-MACRO MEM-SET ...) ; processing (DEFUN MEM-AREF ...) ; processing (DEFINE-COMPILER-MACRO MEM-AREF ...) ; processing (DEFINE-SETF-EXPANDER MEM-AREF ...) ; processing (DEFMETHOD TRANSLATE-INTO-FOREIGN-MEMORY ...) ; processing (DEFMETHOD TRANSLATE-INTO-FOREIGN-MEMORY ...) ; processing (DEFUN MEM-APTR ...) ; processing (DEFINE-COMPILER-MACRO MEM-APTR ...) ; processing (DEFINE-FOREIGN-TYPE FOREIGN-ARRAY-TYPE ...) ; processing (DEFMETHOD AGGREGATEP ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN ARRAY-ELEMENT-SIZE ...) ; processing (DEFMETHOD FOREIGN-TYPE-SIZE ...) ; processing (DEFMETHOD FOREIGN-TYPE-ALIGNMENT ...) ; processing (DEFINE-PARSE-METHOD :ARRAY ...) ; processing (DEFUN INDEXES-TO-ROW-MAJOR-INDEX ...) ; processing (DEFUN ROW-MAJOR-INDEX-TO-INDEXES ...) ; processing (DEFUN FOREIGN-ALLOC ...) ; processing (DEFINE-COMPILER-MACRO FOREIGN-ALLOC ...) ; processing (DEFUN LISP-ARRAY-TO-FOREIGN ...) ; processing (DEFUN FOREIGN-ARRAY-TO-LISP ...) ; processing (DEFUN FOREIGN-ARRAY-ALLOC ...) ; processing (DEFUN FOREIGN-ARRAY-FREE ...) ; processing (DEFMACRO WITH-FOREIGN-ARRAY ...) ; processing (DEFUN FOREIGN-AREF ...) ; processing (DEFUN (SETF FOREIGN-AREF) ...) ; processing (DEFMETHOD TRANSLATE-TO-FOREIGN ...) ; processing (DEFMETHOD TRANSLATE-AGGREGATE-TO-FOREIGN ...) ; processing (DEFMETHOD TRANSLATE-FROM-FOREIGN ...) ; processing (DEFMETHOD FREE-TRANSLATED-OBJECT ...) ; processing (DEFGENERIC FOREIGN-STRUCT-SLOT-POINTER ...) ; processing (DEFGENERIC FOREIGN-STRUCT-SLOT-POINTER-FORM ...) ; processing (DEFGENERIC FOREIGN-STRUCT-SLOT-VALUE ...) ; processing (DEFGENERIC (SETF FOREIGN-STRUCT-SLOT-VALUE) ...) ; processing (DEFGENERIC FOREIGN-STRUCT-SLOT-VALUE-FORM ...) ; processing (DEFGENERIC FOREIGN-STRUCT-SLOT-SET-FORM ...) ; processing (DEFCLASS FOREIGN-STRUCT-SLOT ...) ; processing (DEFMETHOD FOREIGN-STRUCT-SLOT-POINTER ...) ; processing (DEFMETHOD FOREIGN-STRUCT-SLOT-POINTER-FORM ...) ; processing (DEFUN FOREIGN-SLOT-NAMES ...) ; processing (DEFCLASS SIMPLE-STRUCT-SLOT ...) ; processing (DEFMETHOD FOREIGN-STRUCT-SLOT-VALUE ...) ; processing (DEFMETHOD FOREIGN-STRUCT-SLOT-VALUE-FORM ...) ; processing (DEFMETHOD (SETF FOREIGN-STRUCT-SLOT-VALUE) ...) ; processing (DEFMETHOD FOREIGN-STRUCT-SLOT-SET-FORM ...) ; processing (DEFCLASS AGGREGATE-STRUCT-SLOT ...) ; processing (DEFMETHOD FOREIGN-STRUCT-SLOT-VALUE ...) ; processing (DEFMETHOD FOREIGN-STRUCT-SLOT-VALUE-FORM ...) ; processing (DEFMETHOD TRANSLATE-AGGREGATE-TO-FOREIGN ...) ; processing (DEFMETHOD (SETF FOREIGN-STRUCT-SLOT-VALUE) ...) ; processing (DEFMETHOD FOREIGN-STRUCT-SLOT-SET-FORM ...) ; processing (DEFUN MAKE-STRUCT-SLOT ...) ; processing (DEFUN PARSE-DEPRECATED-STRUCT-TYPE ...) ; processing (DEFUN GET-ALIGNMENT ...) ; processing (DEFUN ADJUST-FOR-ALIGNMENT ...) ; processing (DEFMACRO WITH-TENTATIVE-TYPE-DEFINITION ...) ; processing (DEFUN NOTICE-FOREIGN-STRUCT-DEFINITION ...) ; processing (DEFUN GENERATE-STRUCT-ACCESSORS ...) ; processing (DEFINE-PARSE-METHOD :STRUCT ...) ; processing (DEFVAR *DEFCSTRUCT-HOOK* ...) ; processing (DEFMACRO DEFCSTRUCT ...) ; processing (DEFUN GET-SLOT-INFO ...) ; processing (DEFUN FOREIGN-SLOT-POINTER ...) ; processing (DEFINE-COMPILER-MACRO FOREIGN-SLOT-POINTER ...) ; processing (DEFUN FOREIGN-SLOT-TYPE ...) ; processing (DEFUN FOREIGN-SLOT-OFFSET ...) ; processing (DEFUN FOREIGN-SLOT-COUNT ...) ; processing (DEFUN FOREIGN-SLOT-VALUE ...) ; processing (DEFINE-COMPILER-MACRO FOREIGN-SLOT-VALUE ...) ; processing (DEFINE-SETF-EXPANDER FOREIGN-SLOT-VALUE ...) ; processing (DEFUN FOREIGN-SLOT-SET ...) ; processing (DEFINE-COMPILER-MACRO FOREIGN-SLOT-SET ...) ; processing (DEFMACRO WITH-FOREIGN-SLOTS ...) ; processing (DEFMACRO DEFINE-C-STRUCT-WRAPPER ...) ; processing (DEFUN NOTICE-FOREIGN-UNION-DEFINITION ...) ; processing (DEFINE-PARSE-METHOD :UNION ...) ; processing (DEFMACRO DEFCUNION ...) ; processing (DEFMETHOD FOREIGN-TYPE-ALIGNMENT ...) ; processing (DEFMACRO WITH-FOREIGN-OBJECT ...) ; processing (DEFMACRO WITH-FOREIGN-OBJECTS ...) ; processing (DEFINE-FOREIGN-TYPE FOREIGN-TYPE-WRAPPER ...) ; processing (DEFINE-PARSE-METHOD :WRAPPER ...) ; processing (DEFMETHOD TRANSLATE-TO-FOREIGN ...) ; processing (DEFMETHOD TRANSLATE-FROM-FOREIGN ...) ; processing (DEFINE-FOREIGN-TYPE FOREIGN-BOOLEAN-TYPE ...) ; processing (DEFINE-PARSE-METHOD :BOOLEAN ...) ; processing (DEFMETHOD TRANSLATE-TO-FOREIGN ...) ; processing (DEFMETHOD TRANSLATE-FROM-FOREIGN ...) ; processing (DEFMETHOD EXPAND-TO-FOREIGN ...) ; processing (DEFMETHOD EXPAND-FROM-FOREIGN ...) ; processing (DEFCTYPE :BOOL ...) ; processing (DEFCTYPE :UCHAR ...) ; processing (DEFCTYPE :USHORT ...) ; processing (DEFCTYPE :UINT ...) ; processing (DEFCTYPE :ULONG ...) ; processing (DEFCTYPE :LLONG ...) ; processing (DEFCTYPE :ULLONG ...) ; processing (MATCH-TYPES (# # ...) ...) ; processing (MATCH-TYPES (# # ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-cffi/src/types-tmpP44I4E0Y.fasl ; compilation finished in 0:00:02.699 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/enum.lisp" (written 07 JUL 2020 11:38:29 PM): ; processing (IN-PACKAGE #:CFFI) ; processing (DEFCLASS FOREIGN-ENUM ...) ; processing (DEFTYPE ENUM-KEY ...) ; processing (DEFPARAMETER +VALID-ENUM-BASE-TYPES+ ...) ; processing (DEFUN PARSE-FOREIGN-ENUM-LIKE ...) ; processing (DEFUN MAKE-FOREIGN-ENUM ...) ; processing (DEFUN %DEFCENUM-LIKE ...) ; processing (DEFMACRO DEFCENUM ...) ; processing (DEFUN HASH-KEYS-TO-LIST ...) ; processing (DEFUN FOREIGN-ENUM-KEYWORD-LIST ...) ; processing (DEFUN %FOREIGN-ENUM-VALUE ...) ; processing (DEFUN FOREIGN-ENUM-VALUE ...) ; processing (DEFUN %FOREIGN-ENUM-KEYWORD ...) ; processing (DEFUN FOREIGN-ENUM-KEYWORD ...) ; processing (DEFMETHOD TRANSLATE-TO-FOREIGN ...) ; processing (DEFMETHOD TRANSLATE-INTO-FOREIGN-MEMORY ...) ; processing (DEFMETHOD TRANSLATE-FROM-FOREIGN ...) ; processing (DEFMETHOD EXPAND-TO-FOREIGN ...) ; processing (DEFMETHOD EXPAND-TO-FOREIGN-DYN-INDIRECT ...) ; processing (DEFCLASS FOREIGN-BITFIELD ...) ; processing (DEFUN MAKE-FOREIGN-BITFIELD ...) ; processing (DEFMACRO DEFBITFIELD ...) ; processing (DEFUN FOREIGN-BITFIELD-SYMBOL-LIST ...) ; processing (DEFUN %FOREIGN-BITFIELD-VALUE ...) ; processing (DEFUN FOREIGN-BITFIELD-VALUE ...) ; processing (DEFINE-COMPILER-MACRO FOREIGN-BITFIELD-VALUE ...) ; processing (DEFUN %FOREIGN-BITFIELD-SYMBOLS ...) ; processing (DEFUN FOREIGN-BITFIELD-SYMBOLS ...) ; processing (DEFINE-COMPILER-MACRO FOREIGN-BITFIELD-SYMBOLS ...) ; processing (DEFMETHOD TRANSLATE-TO-FOREIGN ...) ; processing (DEFMETHOD TRANSLATE-FROM-FOREIGN ...) ; processing (DEFMETHOD EXPAND-TO-FOREIGN ...) ; processing (DEFMETHOD EXPAND-FROM-FOREIGN ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-cffi/src/enum-tmp63LQ7EX6.fasl ; compilation finished in 0:00:01.427 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/strings.lisp" (written 07 JUL 2020 11:38:29 PM): ; processing (IN-PACKAGE #:CFFI) ; processing (DEFVAR *DEFAULT-FOREIGN-ENCODING* ...) ; processing (DEFMACRO BGET ...) ; processing (DEFMACRO BSET ...) ; processing (DEFPARAMETER *FOREIGN-STRING-MAPPINGS* ...) ; processing (DEFUN NULL-TERMINATOR-LEN ...) ; processing (DEFUN LISP-STRING-TO-FOREIGN ...) ; processing (DEFMACRO %FOREIGN-STRING-LENGTH ...) ; processing (DEFUN FOREIGN-STRING-LENGTH ...) ; processing (DEFUN FOREIGN-STRING-TO-LISP ...) ; processing (DEFUN FOREIGN-STRING-ALLOC ...) ; processing (DEFUN FOREIGN-STRING-FREE ...) ; processing (DEFMACRO WITH-FOREIGN-STRING ...) ; processing (DEFMACRO WITH-FOREIGN-STRINGS ...) ; processing (DEFMACRO WITH-FOREIGN-POINTER-AS-STRING ...) ; processing (DEFINE-FOREIGN-TYPE FOREIGN-STRING-TYPE ...) ; processing (DEFUN FST-ENCODING ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFMETHOD TRANSLATE-TO-FOREIGN ...) ; processing (DEFMETHOD TRANSLATE-TO-FOREIGN ...) ; processing (DEFMETHOD TRANSLATE-FROM-FOREIGN ...) ; processing (DEFMETHOD FREE-TRANSLATED-OBJECT ...) ; processing (DEFMETHOD EXPAND-TO-FOREIGN-DYN-INDIRECT ...) ; processing (DEFINE-FOREIGN-TYPE FOREIGN-STRING+PTR-TYPE ...) ; processing (DEFMETHOD TRANSLATE-FROM-FOREIGN ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-cffi/src/strings-tmp86F1A8FB.fasl ; compilation finished in 0:00:17.695 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/structures.lisp" (written 07 JUL 2020 11:38:29 PM): ; processing (IN-PACKAGE #:CFFI) ; processing (DEFMETHOD TRANSLATE-INTO-FOREIGN-MEMORY ...) ; processing (DEFMETHOD TRANSLATE-TO-FOREIGN ...) ; processing (DEFMETHOD TRANSLATE-FROM-FOREIGN ...) ; processing (DEFMETHOD FREE-TRANSLATED-OBJECT ...) ; processing (DEFMACRO DEFINE-TRANSLATION-METHOD ...) ; processing (DEFMACRO TRANSLATION-FORMS-FOR-CLASS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-cffi/src/structures-tmpH7D4HL98.fasl ; compilation finished in 0:00:00.511 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/functions.lisp" (written 07 JUL 2020 11:38:29 PM): ; processing (IN-PACKAGE #:CFFI) ; processing (DEFUN TRANSLATE-OBJECTS ...) ; processing (DEFUN PARSE-ARGS-AND-TYPES ...) ; processing (DEFUN PARSE-FUNCTION-OPTIONS ...) ; processing (DEFUN STRUCTURE-BY-VALUE-P ...) ; processing (DEFUN FN-CALL-BY-VALUE-P ...) ; processing (DEFVAR *FOREIGN-STRUCTURES-BY-VALUE* ...) ; processing (DEFUN FOREIGN-FUNCALL-FORM ...) ; processing (DEFMACRO FOREIGN-FUNCALL ...) ; processing (DEFMACRO FOREIGN-FUNCALL-POINTER ...) ; processing (DEFUN PROMOTE-VARARGS-TYPE ...) ; processing (UNLESS (FBOUNDP #) ...) ; processing (UNLESS (FBOUNDP #) ...) ; processing (DEFUN FOREIGN-FUNCALL-VARARGS-FORM ...) ; processing (DEFMACRO FOREIGN-FUNCALL-VARARGS ...) ; processing (DEFMACRO FOREIGN-FUNCALL-POINTER-VARARGS ...) ; processing (UNLESS (FBOUNDP #) ...) ; processing (DEFUN %DEFCFUN ...) ; processing (DEFUN %DEFCFUN-VARARGS ...) ; processing (DEFGENERIC TRANSLATE-UNDERSCORE-SEPARATED-NAME ...) ; processing (DEFUN COLLAPSE-PREFIX ...) ; processing (DEFUN CHECK-PREFIX ...) ; processing (DEFGENERIC TRANSLATE-CAMELCASE-NAME ...) ; processing (DEFGENERIC TRANSLATE-NAME-FROM-FOREIGN ...) ; processing (DEFGENERIC TRANSLATE-NAME-TO-FOREIGN ...) ; processing (DEFUN LISP-NAME ...) ; processing (DEFUN FOREIGN-NAME ...) ; processing (DEFUN FOREIGN-OPTIONS ...) ; processing (DEFUN LISP-NAME-P ...) ; processing (DEFUN %PARSE-NAME-AND-OPTIONS ...) ; processing (DEFUN PARSE-NAME-AND-OPTIONS ...) ; processing (DEFMACRO DEFCFUN ...) ; processing (DEFUN INVERSE-TRANSLATE-OBJECTS ...) ; processing (DEFUN PARSE-DEFCALLBACK-OPTIONS ...) ; processing (DEFMACRO DEFCALLBACK ...) ; processing (DECLAIM (INLINE GET-CALLBACK)) ; processing (DEFUN GET-CALLBACK ...) ; processing (DEFMACRO CALLBACK ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-cffi/src/functions-tmpCDM7YXYI.fasl ; compilation finished in 0:00:01.107 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/foreign-vars.lisp" (written 07 JUL 2020 11:38:29 PM): ; processing (IN-PACKAGE #:CFFI) ; processing (DEFUN PARSE-DEFCVAR-OPTIONS ...) ; processing (DEFUN GET-VAR-POINTER ...) ; processing (DEFUN FOREIGN-SYMBOL-POINTER ...) ; processing (DEFUN FS-POINTER-OR-LOSE ...) ; processing (DEFMACRO DEFCVAR ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-cffi/src/foreign-vars-tmpLM57P5P.fasl ; compilation finished in 0:00:00.331 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/features.lisp" (written 07 JUL 2020 11:38:29 PM): ; processing (IN-PACKAGE #:CL-USER) ; processing (PUSHNEW :CFFI ...) ; processing (DEFPACKAGE #:CFFI-FEATURES ...) ; processing (IN-PACKAGE #:CFFI-FEATURES) ; processing (DEFUN CFFI-FEATURE-P ...) ; processing (MAPC (LAMBDA # ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-cffi/src/features-tmpZE69DN33.fasl ; compilation finished in 0:00:00.163 ; ; compilation unit finished ; printed 2 notes ;; loading system "cl+ssl" WARNING: System definition file #P"/usr/share/common-lisp/source/cl-flexi-streams/flexi-streams.asd" contains definition for system "flexi-streams-test". Please only define "flexi-streams" and secondary systems with a name starting with "flexi-streams/" (e.g. "flexi-streams/test") in that file. ; compiling file "/usr/share/common-lisp/source/cl-trivial-gray-streams/package.lisp" (written 31 JUL 2020 08:41:20 AM): ; processing (IN-PACKAGE :CL-USER) ; processing (FROB) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-trivial-gray-streams/package-tmpG8099TO3.fasl ; compilation finished in 0:00:00.035 ; compiling file "/usr/share/common-lisp/source/cl-trivial-gray-streams/streams.lisp" (written 31 JUL 2020 08:41:20 AM): ; processing (IN-PACKAGE :TRIVIAL-GRAY-STREAMS) ; processing (DEFCLASS FUNDAMENTAL-STREAM ...) ; processing (DEFCLASS FUNDAMENTAL-INPUT-STREAM ...) ; processing (DEFCLASS FUNDAMENTAL-OUTPUT-STREAM ...) ; processing (DEFCLASS FUNDAMENTAL-CHARACTER-STREAM ...) ; processing (DEFCLASS FUNDAMENTAL-BINARY-STREAM ...) ; processing (DEFCLASS FUNDAMENTAL-CHARACTER-INPUT-STREAM ...) ; processing (DEFCLASS FUNDAMENTAL-CHARACTER-OUTPUT-STREAM ...) ; processing (DEFCLASS FUNDAMENTAL-BINARY-INPUT-STREAM ...) ; processing (DEFCLASS FUNDAMENTAL-BINARY-OUTPUT-STREAM ...) ; processing (DEFGENERIC STREAM-READ-SEQUENCE ...) ; processing (DEFGENERIC STREAM-WRITE-SEQUENCE ...) ; processing (DEFGENERIC STREAM-FILE-POSITION ...) ; processing (DEFGENERIC (SETF STREAM-FILE-POSITION) ...) ; processing (DEFMETHOD STREAM-READ-SEQUENCE ...) ; processing (DEFMETHOD STREAM-WRITE-SEQUENCE ...) ; processing (DEFMACRO OR-FALLBACK ...) ; processing (DEFMETHOD STREAM-TERPRI ...) ; processing (DEFMETHOD STREAM-FILE-POSITION ...) ; processing (DEFMETHOD (SETF STREAM-FILE-POSITION) ...) ; processing (DEFMETHOD SB-GRAY:STREAM-READ-SEQUENCE ...) ; processing (DEFMETHOD SB-GRAY:STREAM-WRITE-SEQUENCE ...) ; processing (DEFMETHOD SB-GRAY:STREAM-FILE-POSITION ...) ; processing (DEFMETHOD SB-GRAY:STREAM-LINE-LENGTH ...) ; processing (DEFCLASS TRIVIAL-GRAY-STREAM-MIXIN ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-trivial-gray-streams/streams-tmpTASQCYAW.fasl ; compilation finished in 0:00:00.407 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/packages.lisp" (written 13 SEP 2020 06:48:03 AM): ; processing (IN-PACKAGE :CL-USER) ; processing (UNLESS (FIND-SYMBOL # ...) ...) ; processing (DEFPACKAGE :FLEXI-STREAMS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-flexi-streams/packages-tmp35U57IV6.fasl ; compilation finished in 0:00:00.015 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/mapping.lisp" (written 13 SEP 2020 06:48:03 AM): ; processing (IN-PACKAGE :FLEXI-STREAMS) ; processing (DEFTYPE OCTET ...) ; processing (DEFTYPE CHAR* ...) ; processing (DEFTYPE STRING* ...) ; processing (DEFTYPE CHAR-CODE-INTEGER ...) ; processing (DEFTYPE CODE-POINT ...) ; processing (DEFMACRO DEFCONSTANT ...) ; processing (DEFUN INVERT-TABLE ...) ; processing (DEFUN MAKE-DECODING-TABLE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-flexi-streams/mapping-tmpTZOONXRW.fasl ; compilation finished in 0:00:00.091 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/ascii.lisp" (written 13 SEP 2020 06:48:03 AM): ; processing (IN-PACKAGE :FLEXI-STREAMS) ; processing (DEFCONSTANT +ASCII-TABLE+ ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-flexi-streams/ascii-tmpWN0UKDSV.fasl ; compilation finished in 0:00:00.011 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/koi8-r.lisp" (written 13 SEP 2020 06:48:03 AM): ; processing (IN-PACKAGE :FLEXI-STREAMS) ; processing (DEFCONSTANT +KOI8-R-TABLE+ ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-flexi-streams/koi8-r-tmpBF3HHBTQ.fasl ; compilation finished in 0:00:00.008 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/iso-8859.lisp" (written 13 SEP 2020 06:48:03 AM): ; processing (IN-PACKAGE :FLEXI-STREAMS) ; processing (DEFCONSTANT +ISO-8859-TABLES+ ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-flexi-streams/iso-8859-tmpGYUNPZCY.fasl ; compilation finished in 0:00:00.047 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/enc-cn-tbl.lisp" (written 13 SEP 2020 06:48:03 AM): ; processing (IN-PACKAGE :FLEXI-STREAMS) ; processing (DEFUN MAKE-MULTIBYTE-MAPPER ...) ; processing (DEFMACRO DEFINE-MULTIBYTE-MAPPER ...) ; processing (DEFINE-MULTIBYTE-MAPPER *GBK-TO-UCS-SPECIAL-TABLE* ...) ; processing (DEFINE-MULTIBYTE-MAPPER *UCS-TO-GBK-SPECIAL-TABLE* ...) ; processing (DEFINE-MULTIBYTE-MAPPER *GBK-TO-UCS-TABLE* ...) ; processing (DEFINE-MULTIBYTE-MAPPER *UCS-TO-GBK-TABLE* ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-flexi-streams/enc-cn-tbl-tmpD68Q8WCA.fasl ; compilation finished in 0:00:03.443 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/code-pages.lisp" (written 13 SEP 2020 06:48:03 AM): ; processing (IN-PACKAGE :FLEXI-STREAMS) ; processing (DEFCONSTANT +CODE-PAGE-TABLES+ ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-flexi-streams/code-pages-tmp7MK9KM9C.fasl ; compilation finished in 0:00:00.163 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/specials.lisp" (written 13 SEP 2020 06:48:03 AM): ; processing (IN-PACKAGE :FLEXI-STREAMS) ; processing (DEFVAR *STANDARD-OPTIMIZE-SETTINGS* ...) ; processing (DEFVAR *FIXNUM-OPTIMIZE-SETTINGS* ...) ; processing (DEFCONSTANT +LF+ ...) ; processing (DEFCONSTANT +CR+ ...) ; processing (DEFVAR *CURRENT-UNREADER* ...) ; processing (DEFVAR +NAME-MAP+ ...) ; processing (DEFVAR +SHORTCUT-MAP+ ...) ; processing (DEFVAR *DEFAULT-EOL-STYLE* ...) ; processing (DEFVAR *DEFAULT-LITTLE-ENDIAN* ...) ; processing (DEFVAR *SUBSTITUTION-CHAR* ...) ; processing (DEFCONSTANT +ISO-8859-HASHES+ ...) ; processing (DEFCONSTANT +CODE-PAGE-HASHES+ ...) ; processing (DEFCONSTANT +ASCII-HASH+ ...) ; processing (DEFCONSTANT +KOI8-R-HASH+ ...) ; processing (DEFCONSTANT +BUFFER-SIZE+ ...) ; processing (PUSHNEW :FLEXI-STREAMS ...) ; processing (DEFVAR *HYPERDOC-BASE-URI* ...) ; processing (LET (#) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-flexi-streams/specials-tmpJJ71X849.fasl ; compilation finished in 0:00:00.287 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/util.lisp" (written 13 SEP 2020 06:48:03 AM): ; processing (IN-PACKAGE :FLEXI-STREAMS) ; processing (DEFMACRO WHEN-LET ...) ; processing (DEFMACRO WITH-UNIQUE-NAMES ...) ; processing (DEFMACRO WITH-REBINDING ...) ; processing (DEFUN NORMALIZE-EXTERNAL-FORMAT-NAME ...) ; processing (DEFUN ASCII-NAME-P ...) ; processing (DEFUN KOI8-R-NAME-P ...) ; processing (DEFUN CODE-PAGE-NAME-P ...) ; processing (DEFUN ISO-8859-NAME-P ...) ; processing (DEFUN KNOWN-CODE-PAGE-ID-P ...) ; processing (DEFUN SANS ...) ; processing (DEFUN MAKE-OCTET-BUFFER ...) ; processing (DEFUN TYPE-EQUAL ...) ; processing (DEFUN MAYBE-REWIND ...) ; processing (DEFMACRO LOGAND* ...) ; processing (DEFMACRO LOGIOR* ...) ; processing (DEFMACRO ASH* ...) ; processing (DEFUN GET-MULTIBYTE-MAPPER ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/util.lisp ; in: DEFUN GET-MULTIBYTE-MAPPER ; (AREF FLEXI-STREAMS::TABLE FLEXI-STREAMS::M 0) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (ARRAY * (* 2)), not a SIMPLE-ARRAY. ; (AREF FLEXI-STREAMS::TABLE FLEXI-STREAMS::M 1) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (ARRAY * (* 2)), not a SIMPLE-ARRAY. ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-flexi-streams/util-tmp1VUK6SR2.fasl ; compilation finished in 0:00:01.371 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/conditions.lisp" (written 13 SEP 2020 06:48:03 AM): ; processing (IN-PACKAGE :FLEXI-STREAMS) ; processing (DEFINE-CONDITION FLEXI-STREAM-ERROR ...) ; processing (DEFINE-CONDITION FLEXI-STREAM-SIMPLE-ERROR ...) ; processing (DEFINE-CONDITION FLEXI-STREAM-ELEMENT-TYPE-ERROR ...) ; processing (DEFINE-CONDITION FLEXI-STREAM-OUT-OF-SYNC-ERROR ...) ; processing (DEFINE-CONDITION IN-MEMORY-STREAM-ERROR ...) ; processing (DEFINE-CONDITION IN-MEMORY-STREAM-SIMPLE-ERROR ...) ; processing (DEFINE-CONDITION IN-MEMORY-STREAM-CLOSED-ERROR ...) ; processing (DEFINE-CONDITION IN-MEMORY-STREAM-POSITION-SPEC-ERROR ...) ; processing (DEFINE-CONDITION EXTERNAL-FORMAT-CONDITION ...) ; processing (DEFINE-CONDITION EXTERNAL-FORMAT-ERROR ...) ; processing (DEFINE-CONDITION EXTERNAL-FORMAT-ENCODING-ERROR ...) ; processing (DEFUN SIGNAL-ENCODING-ERROR ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-flexi-streams/conditions-tmpR2FIHSUG.fasl ; compilation finished in 0:00:00.075 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/external-format.lisp" (written 13 SEP 2020 06:48:03 AM): ; processing (IN-PACKAGE :FLEXI-STREAMS) ; processing (DEFCLASS EXTERNAL-FORMAT ...) ; processing (DEFMETHOD MAKE-LOAD-FORM ...) ; processing (DEFCLASS FLEXI-CR-MIXIN ...) ; processing (DEFCLASS FLEXI-CRLF-MIXIN ...) ; processing (DEFCLASS FLEXI-8-BIT-FORMAT ...) ; processing (DEFCLASS FLEXI-CR-8-BIT-FORMAT ...) ; processing (DEFCLASS FLEXI-CRLF-8-BIT-FORMAT ...) ; processing (DEFCLASS FLEXI-ASCII-FORMAT ...) ; processing (DEFCLASS FLEXI-CR-ASCII-FORMAT ...) ; processing (DEFCLASS FLEXI-CRLF-ASCII-FORMAT ...) ; processing (DEFCLASS FLEXI-LATIN-1-FORMAT ...) ; processing (DEFCLASS FLEXI-CR-LATIN-1-FORMAT ...) ; processing (DEFCLASS FLEXI-CRLF-LATIN-1-FORMAT ...) ; processing (DEFCLASS FLEXI-UTF-32-FORMAT ...) ; processing (DEFCLASS FLEXI-UTF-32-LE-FORMAT ...) ; processing (DEFCLASS FLEXI-CR-UTF-32-LE-FORMAT ...) ; processing (DEFCLASS FLEXI-CRLF-UTF-32-LE-FORMAT ...) ; processing (DEFCLASS FLEXI-UTF-32-BE-FORMAT ...) ; processing (DEFCLASS FLEXI-CR-UTF-32-BE-FORMAT ...) ; processing (DEFCLASS FLEXI-CRLF-UTF-32-BE-FORMAT ...) ; processing (DEFCLASS FLEXI-UTF-16-FORMAT ...) ; processing (DEFCLASS FLEXI-UTF-16-LE-FORMAT ...) ; processing (DEFCLASS FLEXI-CR-UTF-16-LE-FORMAT ...) ; processing (DEFCLASS FLEXI-CRLF-UTF-16-LE-FORMAT ...) ; processing (DEFCLASS FLEXI-UTF-16-BE-FORMAT ...) ; processing (DEFCLASS FLEXI-CR-UTF-16-BE-FORMAT ...) ; processing (DEFCLASS FLEXI-CRLF-UTF-16-BE-FORMAT ...) ; processing (DEFCLASS FLEXI-GBK-FORMAT ...) ; processing (DEFCLASS FLEXI-CR-GBK-FORMAT ...) ; processing (DEFCLASS FLEXI-CRLF-GBK-FORMAT ...) ; processing (DEFCLASS FLEXI-UTF-8-FORMAT ...) ; processing (DEFCLASS FLEXI-CR-UTF-8-FORMAT ...) ; processing (DEFCLASS FLEXI-CRLF-UTF-8-FORMAT ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFUN EXTERNAL-FORMAT-CLASS-NAME ...) ; processing (DEFUN MAKE-EXTERNAL-FORMAT% ...) ; processing (DEFUN MAKE-EXTERNAL-FORMAT ...) ; processing (DEFUN MAYBE-CONVERT-EXTERNAL-FORMAT ...) ; processing (DEFUN EXTERNAL-FORMAT-EQUAL ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/external-format.lisp ; in: DEFUN EXTERNAL-FORMAT-EQUAL ; (EQL (FLEXI-STREAMS:EXTERNAL-FORMAT-ID FLEXI-STREAMS::EF1) ; (FLEXI-STREAMS:EXTERNAL-FORMAT-ID FLEXI-STREAMS::EF2)) ; ; 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. ; processing (DEFUN NORMALIZE-EXTERNAL-FORMAT ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-flexi-streams/external-format-tmp8PYELRKX.fasl ; compilation finished in 0:00:00.687 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/length.lisp" (written 13 SEP 2020 06:48:03 AM): ; processing (IN-PACKAGE :FLEXI-STREAMS) ; processing (DEFGENERIC ENCODING-FACTOR ...) ; processing (DEFMETHOD ENCODING-FACTOR ...) ; processing (DEFMETHOD ENCODING-FACTOR ...) ; processing (DEFMETHOD ENCODING-FACTOR ...) ; processing (DEFMETHOD ENCODING-FACTOR ...) ; processing (DEFMETHOD ENCODING-FACTOR ...) ; processing (DEFMETHOD ENCODING-FACTOR ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: DEFMETHOD ENCODING-FACTOR (FLEXI-CRLF-MIXIN) ; (* 1.02d0 (CALL-NEXT-METHOD)) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline float arithmetic (cost 5) because: ; The first argument is a T, not a (COMPLEX DOUBLE-FLOAT). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (COMPLEX DOUBLE-FLOAT) ; &REST T). ; unable to do inline float arithmetic (cost 5) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; processing (DEFGENERIC CHECK-END ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: DEFGENERIC CHECK-END ; (- FLEXI-STREAMS::I FLEXI-STREAMS::END) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first result of inline (signed-byte 64) arithmetic ; processing (DEFGENERIC COMPUTE-NUMBER-OF-CHARS ...) ; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...) ; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-8-BIT-FORMAT T T T) ; (- FLEXI-STREAMS::END FLEXI-STREAMS::START) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first result of inline (signed-byte 64) arithmetic ; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-MIXIN T T T) ; (SEARCH #(13 10) SEQUENCE :START2 FLEXI-STREAMS::I :END2 FLEXI-STREAMS::END ; :TEST #'=) ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-ARRAY. ; ; note: forced to do GENERIC-= (cost 10) ; 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 (COMPLEX DOUBLE-FLOAT). ; unable to do inline float comparison (cost 3) because: ; The first argument is a T, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a T, not a (COMPLEX DOUBLE-FLOAT). ; etc. ; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-UTF-8-FORMAT T T T) ; (AREF SEQUENCE FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-UTF-8-FORMAT T T T) ; (AREF SEQUENCE FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: ; DEFMETHOD COMPUTE-NUMBER-OF-CHARS :BEFORE (FLEXI-UTF-16-FORMAT T T T) ; (- FLEXI-STREAMS::END FLEXI-STREAMS::START) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first result of inline (signed-byte 64) arithmetic ; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-UTF-16-LE-FORMAT T T T) ; (AREF SEQUENCE (1+ FLEXI-STREAMS::I)) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-UTF-16-BE-FORMAT T T T) ; (AREF SEQUENCE FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: ; DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-UTF-16-LE-FORMAT T T T) ; (AREF SEQUENCE (1+ FLEXI-STREAMS::I)) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (AREF SEQUENCE FLEXI-STREAMS::I) ; ; 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. ; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: ; DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-UTF-16-BE-FORMAT T T T) ; (AREF SEQUENCE FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (AREF SEQUENCE (1+ FLEXI-STREAMS::I)) ; ; 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. ; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-GBK-FORMAT T T T) ; (AREF SEQUENCE FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-GBK-FORMAT T T T) ; (AREF SEQUENCE FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: ; DEFMETHOD COMPUTE-NUMBER-OF-CHARS :BEFORE (FLEXI-UTF-32-FORMAT T T T) ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT "~A octet~:P cannot be decoded ~ ; using UTF-32 as ~:*~A is not a multiple-value of four." ; LENGTH) ; ; note: doing signed word to integer coercion (cost 20) ; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-UTF-32-FORMAT T T T) ; (CEILING (- FLEXI-STREAMS::END FLEXI-STREAMS::START) 4) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -9223372036854775804 9223372036854775810) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; 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 -9223372036854775804 9223372036854775810) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (INTEGER -9223372036854775804 9223372036854775810), not a FIXNUM. ; unable to do inline ASH (cost 3) because: ; The first argument is a (INTEGER -9223372036854775804 9223372036854775810), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER -2305843009213693951 2305843009213693952) ; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &REST T). ; etc. ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-+ ; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: ; DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-UTF-32-LE-FORMAT T T T) ; (AREF SEQUENCE FLEXI-STREAMS::J) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (= FLEXI-STREAMS:OCTET (AREF SEQUENCE FLEXI-STREAMS::J)) ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 T, 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 T, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a T, not a (COMPLEX DOUBLE-FLOAT). ; etc. ; (DECF LENGTH) ; --> SETQ THE ; ==> ; (SB-IMPL::XSUBTRACT 1 LENGTH) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a (INTEGER * 2305843009213693952), not a FIXNUM. ; The result is a (VALUES (INTEGER * 2305843009213693951) &OPTIONAL), not a (VALUES ; FIXNUM ; &REST ; T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER * 2305843009213693952), not a FIXNUM. ; The result is a (VALUES (INTEGER * 2305843009213693951) &OPTIONAL), not a (VALUES ; FIXNUM ; &REST ; T). ; etc. ; processing (DEFMETHOD COMPUTE-NUMBER-OF-CHARS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: ; DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-UTF-32-BE-FORMAT T T T) ; (AREF SEQUENCE FLEXI-STREAMS::J) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (= FLEXI-STREAMS:OCTET (AREF SEQUENCE FLEXI-STREAMS::J)) ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 T, 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 T, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a T, not a (COMPLEX DOUBLE-FLOAT). ; etc. ; (DECF LENGTH) ; --> SETQ THE ; ==> ; (SB-IMPL::XSUBTRACT 1 LENGTH) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a (INTEGER * 2305843009213693952), not a FIXNUM. ; The result is a (VALUES (INTEGER * 2305843009213693951) &OPTIONAL), not a (VALUES ; FIXNUM ; &REST ; T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER * 2305843009213693952), not a FIXNUM. ; The result is a (VALUES (INTEGER * 2305843009213693951) &OPTIONAL), not a (VALUES ; FIXNUM ; &REST ; T). ; etc. ; processing (DEFGENERIC COMPUTE-NUMBER-OF-OCTETS ...) ; processing (DEFMETHOD COMPUTE-NUMBER-OF-OCTETS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS :AROUND (T LIST T T) ; (COERCE LIST 'FLEXI-STREAMS::STRING*) ; ; note: unable to ; optimize ; because: ; STRING* specifies dimensions other than (*) in safe code. ; processing (DEFMETHOD COMPUTE-NUMBER-OF-OCTETS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-8-BIT-FORMAT T T T) ; (- FLEXI-STREAMS::END FLEXI-STREAMS::START) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first result of inline (signed-byte 64) arithmetic ; processing (DEFMETHOD COMPUTE-NUMBER-OF-OCTETS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-GBK-FORMAT T T T) ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; processing (DEFMETHOD COMPUTE-NUMBER-OF-OCTETS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-CRLF-GBK-FORMAT T T T) ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; processing (DEFMETHOD COMPUTE-NUMBER-OF-OCTETS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-UTF-8-FORMAT T T T) ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; processing (DEFMETHOD COMPUTE-NUMBER-OF-OCTETS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-CRLF-UTF-8-FORMAT T T T) ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; processing (DEFMETHOD COMPUTE-NUMBER-OF-OCTETS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-UTF-16-FORMAT T T T) ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; processing (DEFMETHOD COMPUTE-NUMBER-OF-OCTETS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: ; DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-CRLF-UTF-16-LE-FORMAT T T T) ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; processing (DEFMETHOD COMPUTE-NUMBER-OF-OCTETS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: ; DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-CRLF-UTF-16-BE-FORMAT T T T) ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; processing (DEFMETHOD COMPUTE-NUMBER-OF-OCTETS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-UTF-32-FORMAT T T T) ; (* 4 (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -36893488147419103228 36893488147419103228) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER -36893488147419103228 36893488147419103228) ; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &REST T). ; etc. ; (- FLEXI-STREAMS::END FLEXI-STREAMS::START) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first result of inline (signed-byte 64) arithmetic ; processing (DEFMETHOD COMPUTE-NUMBER-OF-OCTETS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-CRLF-MIXIN T T T) ; (+ (CALL-NEXT-METHOD) ; (* ; (CASE (FLEXI-STREAMS:EXTERNAL-FORMAT-NAME FORMAT) ; (:UTF-32 4) ; (OTHERWISE 1)) ; (COUNT #\Newline STRING :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :TEST #'CHAR=))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first 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 first argument is a T, not a FIXNUM. ; The second argument is a (MOD 18446744073709551601), 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 (MOD 18446744073709551601), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; etc. ; ; note: doing unsigned word to integer coercion (cost 20), for: ; the second argument of GENERIC-+ ; processing (DEFGENERIC CHARACTER-LENGTH ...) ; processing (DEFMETHOD CHARACTER-LENGTH ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: ; DEFMETHOD CHARACTER-LENGTH :AROUND (FLEXI-CRLF-MIXIN (EQL #\Newline)) ; (+ (CALL-NEXT-METHOD FORMAT FLEXI-STREAMS::+CR+) ; (CALL-NEXT-METHOD FORMAT FLEXI-STREAMS::+LF+)) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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. ; processing (DEFMETHOD CHARACTER-LENGTH ...) ; processing (DEFMETHOD CHARACTER-LENGTH ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-flexi-streams/length-tmpEHTOKYT0.fasl ; compilation finished in 0:00:01.571 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/encode.lisp" (written 13 SEP 2020 06:48:03 AM): ; processing (IN-PACKAGE :FLEXI-STREAMS) ; processing (DEFGENERIC CHAR-TO-OCTETS ...) ; processing (DEFGENERIC WRITE-SEQUENCE* ...) ; processing (DEFGENERIC STRING-TO-OCTETS* ...) ; processing (DEFMETHOD STRING-TO-OCTETS* ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/encode.lisp ; in: DEFMETHOD STRING-TO-OCTETS* :AROUND (T LIST T T) ; (COERCE LIST 'FLEXI-STREAMS::STRING*) ; ; note: unable to ; optimize ; because: ; STRING* specifies dimensions other than (*) in safe code. ; processing (DEFMACRO DEFINE-SEQUENCE-WRITERS ...) ; processing (DEFMACRO DEFINE-CHAR-ENCODERS ...) ; processing (DEFINE-CHAR-ENCODERS (FLEXI-LATIN-1-FORMAT FLEXI-CR-LATIN-1-FORMAT ...) ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/encode.lisp ; in: ; DEFINE-CHAR-ENCODERS (FLEXI-LATIN-1-FORMAT FLEXI-CR-LATIN-1-FORMAT ; FLEXI-CRLF-LATIN-1-FORMAT) ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT ; "~S (code ~A) is not a LATIN-1 character." ; FLEXI-STREAMS::CHAR-GETTER ; FLEXI-STREAMS:OCTET) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-LATIN-1-FORMAT ; FLEXI-STREAMS::FLEXI-CR-LATIN-1-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-LATIN-1-FORMAT) ; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER))) ; (WHEN (> FLEXI-STREAMS:OCTET 255) ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT ; "~S (code ~A) is not a LATIN-1 character." ; FLEXI-STREAMS::CHAR-GETTER ; FLEXI-STREAMS:OCTET)) ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER102 #:BUFFER-POS103) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT ; "~S (code ~A) is not a LATIN-1 character." ; FLEXI-STREAMS::CHAR-GETTER ; FLEXI-STREAMS:OCTET) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT ; "~S (code ~A) is not a LATIN-1 character." ; FLEXI-STREAMS::CHAR-GETTER ; FLEXI-STREAMS:OCTET) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-LATIN-1-FORMAT ; FLEXI-STREAMS::FLEXI-CR-LATIN-1-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-LATIN-1-FORMAT) ; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER))) ; (WHEN (> FLEXI-STREAMS:OCTET 255) ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT ; "~S (code ~A) is not a LATIN-1 character." ; FLEXI-STREAMS::CHAR-GETTER ; FLEXI-STREAMS:OCTET)) ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET ; --> SYMBOL-MACROLET PROGN LOCALLY LET CHAR-CODE LET ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET ; --> SYMBOL-MACROLET PROGN LOCALLY LET WHEN IF ; --> FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER270 #:BUFFER-POS271) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY LET WHEN IF FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY LET WHEN IF FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET ; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER442 #:BUFFER-POS443) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; processing (DEFINE-CHAR-ENCODERS (FLEXI-ASCII-FORMAT FLEXI-CR-ASCII-FORMAT ...) ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/encode.lisp ; in: ; DEFINE-CHAR-ENCODERS (FLEXI-ASCII-FORMAT FLEXI-CR-ASCII-FORMAT ; FLEXI-CRLF-ASCII-FORMAT) ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT ; "~S (code ~A) is not an ASCII character." ; FLEXI-STREAMS::CHAR-GETTER ; FLEXI-STREAMS:OCTET) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT ; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT) ; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER))) ; (WHEN (> FLEXI-STREAMS:OCTET 127) ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT ; "~S (code ~A) is not an ASCII character." ; FLEXI-STREAMS::CHAR-GETTER ; FLEXI-STREAMS:OCTET)) ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER102 #:BUFFER-POS103) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT ; "~S (code ~A) is not an ASCII character." ; FLEXI-STREAMS::CHAR-GETTER ; FLEXI-STREAMS:OCTET) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT ; "~S (code ~A) is not an ASCII character." ; FLEXI-STREAMS::CHAR-GETTER ; FLEXI-STREAMS:OCTET) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT ; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT) ; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER))) ; (WHEN (> FLEXI-STREAMS:OCTET 127) ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT ; "~S (code ~A) is not an ASCII character." ; FLEXI-STREAMS::CHAR-GETTER ; FLEXI-STREAMS:OCTET)) ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET ; --> SYMBOL-MACROLET PROGN LOCALLY LET CHAR-CODE LET ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET ; --> SYMBOL-MACROLET PROGN LOCALLY LET WHEN IF ; --> FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER270 #:BUFFER-POS271) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY LET WHEN IF FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY LET WHEN IF FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET ; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER442 #:BUFFER-POS443) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; processing (DEFINE-CHAR-ENCODERS (FLEXI-8-BIT-FORMAT FLEXI-CR-8-BIT-FORMAT ...) ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/encode.lisp ; in: ; DEFINE-CHAR-ENCODERS (FLEXI-8-BIT-FORMAT FLEXI-CR-8-BIT-FORMAT ; FLEXI-CRLF-8-BIT-FORMAT) ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT ; "~S (code ~A) is not in this encoding." ; FLEXI-STREAMS::CHAR-GETTER ; FLEXI-STREAMS:OCTET) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT ; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT) ; (WITH-ACCESSORS ((FLEXI-STREAMS::ENCODING-HASH ; FLEXI-STREAMS::EXTERNAL-FORMAT-ENCODING-HASH)) ; FORMAT ; (LET ((FLEXI-STREAMS:OCTET #)) ; (UNLESS FLEXI-STREAMS:OCTET ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT ; "~S (code ~A) is not in this encoding." ; FLEXI-STREAMS::CHAR-GETTER ; FLEXI-STREAMS:OCTET)) ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER109 #:BUFFER-POS110) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT ; "~S (code ~A) is not in this encoding." ; FLEXI-STREAMS::CHAR-GETTER ; FLEXI-STREAMS:OCTET) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT ; "~S (code ~A) is not in this encoding." ; FLEXI-STREAMS::CHAR-GETTER ; FLEXI-STREAMS:OCTET) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT ; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT) ; (WITH-ACCESSORS ((FLEXI-STREAMS::ENCODING-HASH ; FLEXI-STREAMS::EXTERNAL-FORMAT-ENCODING-HASH)) ; FORMAT ; (LET ((FLEXI-STREAMS:OCTET #)) ; (UNLESS FLEXI-STREAMS:OCTET ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT ; "~S (code ~A) is not in this encoding." ; FLEXI-STREAMS::CHAR-GETTER ; FLEXI-STREAMS:OCTET)) ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET ; --> SYMBOL-MACROLET PROGN LOCALLY WITH-ACCESSORS LET SYMBOL-MACROLET LET ; ==> ; (GETHASH ; (CHAR-CODE ; (LET ((#:CHAR0 FLEXI-STREAMS::CHAR-GETTER)) ; (DECLARE (CHARACTER #:CHAR0)) ; (IF (CHAR= #:CHAR0 #\Newline) ; #\Return ; #:CHAR0))) ; FLEXI-STREAMS::ENCODING-HASH) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET ; --> SYMBOL-MACROLET PROGN LOCALLY WITH-ACCESSORS LET SYMBOL-MACROLET LET ; --> UNLESS IF FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER285 #:BUFFER-POS286) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY WITH-ACCESSORS LET SYMBOL-MACROLET LET ; ==> ; (GETHASH ; (CHAR-CODE ; (LET ((#:CHAR0 FLEXI-STREAMS::CHAR-GETTER)) ; (DECLARE (CHARACTER #:CHAR0)) ; (IF (CHAR= #:CHAR0 #\Newline) ; #\Return ; #:CHAR0))) ; FLEXI-STREAMS::ENCODING-HASH) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY WITH-ACCESSORS LET SYMBOL-MACROLET LET UNLESS IF ; --> FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY WITH-ACCESSORS LET SYMBOL-MACROLET LET ; ==> ; (GETHASH ; (CHAR-CODE ; (LET ((#:CHAR0 FLEXI-STREAMS::CHAR-GETTER)) ; (DECLARE (CHARACTER #:CHAR0)) ; (IF (CHAR= #:CHAR0 #\Newline) ; #\Return ; #:CHAR0))) ; FLEXI-STREAMS::ENCODING-HASH) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY WITH-ACCESSORS LET SYMBOL-MACROLET LET UNLESS IF ; --> FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET ; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER465 #:BUFFER-POS466) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; processing (DEFINE-CHAR-ENCODERS (FLEXI-UTF-8-FORMAT FLEXI-CR-UTF-8-FORMAT ...) ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/encode.lisp ; in: ; DEFINE-CHAR-ENCODERS (FLEXI-UTF-8-FORMAT FLEXI-CR-UTF-8-FORMAT ; FLEXI-CRLF-UTF-8-FORMAT) ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT) ; (LET ((CHAR-CODE (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER))) ; (TAGBODY ; (COND (# # #) (# # #) (# # #) (T #)) ; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGIOR* 128 #)) ; FLEXI-STREAMS::TWO ; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGIOR* 128 #)) ; FLEXI-STREAMS::ONE ; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGIOR* 128 #)) ; FLEXI-STREAMS::ZERO))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER148 #:BUFFER-POS149) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT) ; (LET ((CHAR-CODE (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER))) ; (TAGBODY ; (COND (# # #) (# # #) (# # #) (T #)) ; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGIOR* 128 #)) ; FLEXI-STREAMS::TWO ; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGIOR* 128 #)) ; FLEXI-STREAMS::ONE ; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGIOR* 128 #)) ; FLEXI-STREAMS::ZERO))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET ; --> SYMBOL-MACROLET PROGN LOCALLY LET CHAR-CODE LET ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER356 #:BUFFER-POS357) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET ; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER578 #:BUFFER-POS579) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; processing (DEFINE-CHAR-ENCODERS (FLEXI-UTF-16-LE-FORMAT FLEXI-CR-UTF-16-LE-FORMAT ...) ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/encode.lisp ; in: ; DEFINE-CHAR-ENCODERS (FLEXI-UTF-16-LE-FORMAT FLEXI-CR-UTF-16-LE-FORMAT ; FLEXI-CRLF-UTF-16-LE-FORMAT) ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-16-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-16-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-16-LE-FORMAT) ; (FLET ((FLEXI-STREAMS::WRITE-WORD (FLEXI-STREAMS::WORD) ; (FLEXI-STREAMS::OCTET-WRITER #) ; (FLEXI-STREAMS::OCTET-WRITER #))) ; (DECLARE (INLINE FLEXI-STREAMS::WRITE-WORD)) ; (LET ((CHAR-CODE #)) ; (DECLARE (TYPE FLEXI-STREAMS::CHAR-CODE-INTEGER CHAR-CODE)) ; (COND (# #) (T # # #))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER129 #:BUFFER-POS130) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-16-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-16-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-16-LE-FORMAT) ; (FLET ((FLEXI-STREAMS::WRITE-WORD (FLEXI-STREAMS::WORD) ; (FLEXI-STREAMS::OCTET-WRITER #) ; (FLEXI-STREAMS::OCTET-WRITER #))) ; (DECLARE (INLINE FLEXI-STREAMS::WRITE-WORD)) ; (LET ((CHAR-CODE #)) ; (DECLARE (TYPE FLEXI-STREAMS::CHAR-CODE-INTEGER CHAR-CODE)) ; (COND (# #) (T # # #))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET ; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET CHAR-CODE LET ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER318 #:BUFFER-POS319) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY FLET LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY FLET LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET ; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER519 #:BUFFER-POS520) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; processing (DEFINE-CHAR-ENCODERS (FLEXI-UTF-16-BE-FORMAT FLEXI-CR-UTF-16-BE-FORMAT ...) ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/encode.lisp ; in: ; DEFINE-CHAR-ENCODERS (FLEXI-UTF-16-BE-FORMAT FLEXI-CR-UTF-16-BE-FORMAT ; FLEXI-CRLF-UTF-16-BE-FORMAT) ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-16-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-16-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-16-BE-FORMAT) ; (FLET ((FLEXI-STREAMS::WRITE-WORD (FLEXI-STREAMS::WORD) ; (FLEXI-STREAMS::OCTET-WRITER #) ; (FLEXI-STREAMS::OCTET-WRITER #))) ; (DECLARE (INLINE FLEXI-STREAMS::WRITE-WORD)) ; (LET ((CHAR-CODE #)) ; (DECLARE (TYPE FLEXI-STREAMS::CHAR-CODE-INTEGER CHAR-CODE)) ; (COND (# #) (T # # #))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER129 #:BUFFER-POS130) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-16-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-16-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-16-BE-FORMAT) ; (FLET ((FLEXI-STREAMS::WRITE-WORD (FLEXI-STREAMS::WORD) ; (FLEXI-STREAMS::OCTET-WRITER #) ; (FLEXI-STREAMS::OCTET-WRITER #))) ; (DECLARE (INLINE FLEXI-STREAMS::WRITE-WORD)) ; (LET ((CHAR-CODE #)) ; (DECLARE (TYPE FLEXI-STREAMS::CHAR-CODE-INTEGER CHAR-CODE)) ; (COND (# #) (T # # #))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET ; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET CHAR-CODE LET ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER318 #:BUFFER-POS319) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY FLET LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY FLET LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET ; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER519 #:BUFFER-POS520) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; processing (DEFINE-CHAR-ENCODERS (FLEXI-GBK-FORMAT FLEXI-CR-GBK-FORMAT ...) ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/encode.lisp ; in: ; DEFINE-CHAR-ENCODERS (FLEXI-GBK-FORMAT FLEXI-CR-GBK-FORMAT ; FLEXI-CRLF-GBK-FORMAT) ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT ; "~S (code ~A) is not in this encoding." ; FLEXI-STREAMS::CHAR-GETTER ; FLEXI-STREAMS:OCTET) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT ; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT) ; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER))) ; (IF (<= FLEXI-STREAMS:OCTET 127) ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET) ; (FLET (#) ; (DECLARE #) ; (DECLARE #) ; (COND # # #))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER138 #:BUFFER-POS139) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT ; "~S (code ~A) is not in this encoding." ; FLEXI-STREAMS::CHAR-GETTER ; FLEXI-STREAMS:OCTET) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT ; "~S (code ~A) is not in this encoding." ; FLEXI-STREAMS::CHAR-GETTER ; FLEXI-STREAMS:OCTET) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT ; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT) ; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER))) ; (IF (<= FLEXI-STREAMS:OCTET 127) ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET) ; (FLET (#) ; (DECLARE #) ; (DECLARE #) ; (COND # # #))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET ; --> SYMBOL-MACROLET PROGN LOCALLY LET CHAR-CODE LET ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET ; --> SYMBOL-MACROLET PROGN LOCALLY LET IF FLET COND IF IF THE LET IF ; --> FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER340 #:BUFFER-POS341) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY LET IF FLET COND IF IF THE LET IF ; --> FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY LET IF FLET COND IF IF THE LET IF ; --> FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET ; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET ; --> SYMBOL-MACROLET PROGN LOCALLY FLET ; ==> ; (#:WRITE-CHAR2 (#:CHAR1) ; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE #:CHAR1))) ; (IF (<= FLEXI-STREAMS:OCTET 127) ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET) ; (FLET (#) ; (DECLARE #) ; (DECLARE #) ; (COND # # #))))) ; ; note: Return type not fixed values, so can't use known return convention: ; * ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER554 #:BUFFER-POS555) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OBJECT BLOCK ETYPECASE LET COND IF ; --> IF PROGN SYMBOL-MACROLET LOCALLY FLET ; ==> ; (#:WRITE-CHAR2 (#:CHAR1) ; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE #:CHAR1))) ; (IF (<= FLEXI-STREAMS:OCTET 127) ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET) ; (FLET (#) ; (DECLARE #) ; (DECLARE #) ; (COND # # #))))) ; ; note: Return type not fixed values, so can't use known return convention: ; * ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; processing (DEFINE-CHAR-ENCODERS (FLEXI-UTF-32-LE-FORMAT FLEXI-CR-UTF-32-LE-FORMAT ...) ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/encode.lisp ; in: ; DEFINE-CHAR-ENCODERS (FLEXI-UTF-32-LE-FORMAT FLEXI-CR-UTF-32-LE-FORMAT ; FLEXI-CRLF-UTF-32-LE-FORMAT) ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT) ; (LET ((CHAR-CODE (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER))) ; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGAND* 255 CHAR-CODE)) ; (FLEXI-STREAMS::OCTET-WRITER ; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -8))) ; (FLEXI-STREAMS::OCTET-WRITER ; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -16))) ; (FLEXI-STREAMS::OCTET-WRITER ; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -24))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER121 #:BUFFER-POS122) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT) ; (LET ((CHAR-CODE (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER))) ; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGAND* 255 CHAR-CODE)) ; (FLEXI-STREAMS::OCTET-WRITER ; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -8))) ; (FLEXI-STREAMS::OCTET-WRITER ; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -16))) ; (FLEXI-STREAMS::OCTET-WRITER ; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -24))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET ; --> SYMBOL-MACROLET PROGN LOCALLY LET CHAR-CODE LET ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER302 #:BUFFER-POS303) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET ; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER491 #:BUFFER-POS492) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; processing (DEFINE-CHAR-ENCODERS (FLEXI-UTF-32-BE-FORMAT FLEXI-CR-UTF-32-BE-FORMAT ...) ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/encode.lisp ; in: ; DEFINE-CHAR-ENCODERS (FLEXI-UTF-32-BE-FORMAT FLEXI-CR-UTF-32-BE-FORMAT ; FLEXI-CRLF-UTF-32-BE-FORMAT) ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT) ; (LET ((CHAR-CODE (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER))) ; (FLEXI-STREAMS::OCTET-WRITER ; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -24))) ; (FLEXI-STREAMS::OCTET-WRITER ; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -16))) ; (FLEXI-STREAMS::OCTET-WRITER ; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -8))) ; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGAND* 255 CHAR-CODE)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER121 #:BUFFER-POS122) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER) ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT) ; (LET ((CHAR-CODE (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER))) ; (FLEXI-STREAMS::OCTET-WRITER ; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -24))) ; (FLEXI-STREAMS::OCTET-WRITER ; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -16))) ; (FLEXI-STREAMS::OCTET-WRITER ; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -8))) ; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGAND* 255 CHAR-CODE)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET ; --> SYMBOL-MACROLET PROGN LOCALLY LET CHAR-CODE LET ; --> FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER302 #:BUFFER-POS303) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY LET CHAR-CODE LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET ; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR STRING FLEXI-STREAMS::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER491 #:BUFFER-POS492) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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 ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (CHAR SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF PROGN ; --> FLEXI-STREAMS::ITERATE LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET ; --> LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET ; ==> ; (POSITION #\Newline SEQUENCE :TEST #'CHAR= :START FLEXI-STREAMS::START :END ; FLEXI-STREAMS::END :FROM-END T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; 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 (INTEGER -9223372036854775807 ; 9223372036854775807), 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. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT SINGLE-FLOAT) ; &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 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. ; ; note: forced to do GENERIC-< (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF ; ==> ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The 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. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; ==> ; (MIN FLEXI-STREAMS::+BUFFER-SIZE+ ; (CEILING ; (* FLEXI-STREAMS::FACTOR (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-* ; processing (DEFMETHOD CHAR-TO-OCTETS ...) ; processing (DEFMETHOD CHAR-TO-OCTETS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-flexi-streams/encode-tmpS6U1VHI9.fasl ; compilation finished in 0:00:14.775 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/decode.lisp" (written 13 SEP 2020 06:48:03 AM): ; processing (IN-PACKAGE :FLEXI-STREAMS) ; processing (DEFUN RECOVER-FROM-ENCODING-ERROR ...) ; processing (DEFGENERIC OCTETS-TO-CHAR-CODE ...) ; processing (DEFGENERIC OCTETS-TO-STRING* ...) ; processing (DEFMETHOD OCTETS-TO-STRING* ...) ; processing (DEFMACRO DEFINE-SEQUENCE-READERS ...) ; processing (DEFMACRO DEFINE-CHAR-DECODERS ...) ; processing (DEFINE-CHAR-DECODERS (FLEXI-LATIN-1-FORMAT FLEXI-CR-LATIN-1-FORMAT ...) ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/decode.lisp ; in: ; DEFINE-CHAR-DECODERS (FLEXI-LATIN-1-FORMAT FLEXI-CR-LATIN-1-FORMAT ; FLEXI-CRLF-LATIN-1-FORMAT) ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-LATIN-1-FORMAT ; FLEXI-STREAMS::FLEXI-CR-LATIN-1-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-LATIN-1-FORMAT) ; FLEXI-STREAMS::OCTET-GETTER) ; --> PROGN DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET ; --> IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY LET PROGN FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN LET PROGN FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN LET PROGN FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY LET PROGN LET PROGN FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> FLET #:GET-CHAR-CODE4 BLOCK LET PROGN FLEXI-STREAMS::OCTET-GETTER BLOCK ; --> PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> FLET #:GET-CHAR-CODE4 BLOCK LET PROGN FLEXI-STREAMS::OCTET-GETTER BLOCK ; --> PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY FLET #:GET-CHAR-CODE4 BLOCK LET PROGN FLEXI-STREAMS::OCTET-GETTER ; --> BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-(COMPLEX FLOAT) numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ; 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. ; processing (DEFINE-CHAR-DECODERS (FLEXI-ASCII-FORMAT FLEXI-CR-ASCII-FORMAT ...) ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/decode.lisp ; in: ; DEFINE-CHAR-DECODERS (FLEXI-ASCII-FORMAT FLEXI-CR-ASCII-FORMAT ; FLEXI-CRLF-ASCII-FORMAT) ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT ; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT) ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET) ; FLEXI-STREAMS:OCTET))) ; --> PROGN DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET ; --> IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET) ; FLEXI-STREAMS:OCTET)) ; --> LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT ; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT) ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET) ; FLEXI-STREAMS:OCTET))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET) ; FLEXI-STREAMS:OCTET)) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT ; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT) ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET) ; FLEXI-STREAMS:OCTET))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-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 INTEGER, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; etc. ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET) ; FLEXI-STREAMS:OCTET)) ; --> LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT ; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT) ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET) ; FLEXI-STREAMS:OCTET))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY LET PROGN LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY LET PROGN LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET) ; FLEXI-STREAMS:OCTET)) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT ; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT) ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET) ; FLEXI-STREAMS:OCTET))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-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 INTEGER, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; etc. ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET) ; FLEXI-STREAMS:OCTET)) ; --> LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT ; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT) ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET) ; FLEXI-STREAMS:OCTET))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-(COMPLEX FLOAT) numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET) ; FLEXI-STREAMS:OCTET)) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT ; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT) ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET) ; FLEXI-STREAMS:OCTET))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-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 INTEGER, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; etc. ; ; 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. ; processing (DEFINE-CHAR-DECODERS (FLEXI-8-BIT-FORMAT FLEXI-CR-8-BIT-FORMAT ...) ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/decode.lisp ; in: ; DEFINE-CHAR-DECODERS (FLEXI-8-BIT-FORMAT FLEXI-CR-8-BIT-FORMAT ; FLEXI-CRLF-8-BIT-FORMAT) ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT ; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT) ; (WITH-ACCESSORS ((FLEXI-STREAMS::DECODING-TABLE ; FLEXI-STREAMS::EXTERNAL-FORMAT-DECODING-TABLE)) ; FORMAT ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (LET (#) ; (IF # ; # ; CHAR-CODE))))) ; --> PROGN DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET ; --> IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (LET ((CHAR-CODE (AREF # #))) ; (IF (OR (NULL CHAR-CODE) (= # 65533)) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET) ; CHAR-CODE))) ; --> LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT ; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT) ; (WITH-ACCESSORS ((FLEXI-STREAMS::DECODING-TABLE ; FLEXI-STREAMS::EXTERNAL-FORMAT-DECODING-TABLE)) ; FORMAT ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (LET (#) ; (IF # ; # ; CHAR-CODE))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (LET ((CHAR-CODE (AREF # #))) ; (IF (OR (NULL CHAR-CODE) (= # 65533)) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET) ; CHAR-CODE))) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT ; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT) ; (WITH-ACCESSORS ((FLEXI-STREAMS::DECODING-TABLE ; FLEXI-STREAMS::EXTERNAL-FORMAT-DECODING-TABLE)) ; FORMAT ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (LET (#) ; (IF # ; # ; CHAR-CODE))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-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 INTEGER, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; etc. ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (LET ((CHAR-CODE (AREF # #))) ; (IF (OR (NULL CHAR-CODE) (= # 65533)) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET) ; CHAR-CODE))) ; --> LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT ; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT) ; (WITH-ACCESSORS ((FLEXI-STREAMS::DECODING-TABLE ; FLEXI-STREAMS::EXTERNAL-FORMAT-DECODING-TABLE)) ; FORMAT ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (LET (#) ; (IF # ; # ; CHAR-CODE))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY LET PROGN LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY LET PROGN LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (LET ((CHAR-CODE (AREF # #))) ; (IF (OR (NULL CHAR-CODE) (= # 65533)) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET) ; CHAR-CODE))) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT ; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT) ; (WITH-ACCESSORS ((FLEXI-STREAMS::DECODING-TABLE ; FLEXI-STREAMS::EXTERNAL-FORMAT-DECODING-TABLE)) ; FORMAT ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (LET (#) ; (IF # ; # ; CHAR-CODE))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-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 INTEGER, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; etc. ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (LET ((CHAR-CODE (AREF # #))) ; (IF (OR (NULL CHAR-CODE) (= # 65533)) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET) ; CHAR-CODE))) ; --> LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT ; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT) ; (WITH-ACCESSORS ((FLEXI-STREAMS::DECODING-TABLE ; FLEXI-STREAMS::EXTERNAL-FORMAT-DECODING-TABLE)) ; FORMAT ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (LET (#) ; (IF # ; # ; CHAR-CODE))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-(COMPLEX FLOAT) numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (LET ((CHAR-CODE (AREF # #))) ; (IF (OR (NULL CHAR-CODE) (= # 65533)) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET) ; CHAR-CODE))) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT ; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT) ; (WITH-ACCESSORS ((FLEXI-STREAMS::DECODING-TABLE ; FLEXI-STREAMS::EXTERNAL-FORMAT-DECODING-TABLE)) ; FORMAT ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (LET (#) ; (IF # ; # ; CHAR-CODE))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-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 INTEGER, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; etc. ; ; 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. ; processing (DEFINE-CHAR-DECODERS (FLEXI-UTF-8-FORMAT FLEXI-CR-UTF-8-FORMAT ...) ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/decode.lisp ; in: ; DEFINE-CHAR-DECODERS (FLEXI-UTF-8-FORMAT FLEXI-CR-UTF-8-FORMAT ; FLEXI-CRLF-UTF-8-FORMAT) ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (FLET (#) ; (LET # ; # ; #))))) ; --> PROGN DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET ; --> IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> PROG1 LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (FLET (#) ; (LET # ; # ; #))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; ; caught STYLE-WARNING: ; This is not a (MOD 1114112): ; NIL ; See also: ; The SBCL Manual, Node "Handling of Types" ; ; 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. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (FLET (#) ; (LET # ; # ; #))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-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 INTEGER, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; etc. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> PROG1 LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (FLET (#) ; (LET # ; # ; #))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY LET PROGN LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY LET PROGN LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; ; caught STYLE-WARNING: ; This is not a (MOD 1114112): ; NIL ; See also: ; The SBCL Manual, Node "Handling of Types" ; ; 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. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (FLET (#) ; (LET # ; # ; #))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-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 INTEGER, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; etc. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> PROG1 LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (FLET (#) ; (LET # ; # ; #))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET ; ==> ; (BLOCK FLEXI-STREAMS::CHAR-DECODER ; (LOCALLY ; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; (FLET ((#:GET-CHAR-CODE4 # ; #)) ; (LET (#) ; (CASE #:CHAR-CODE2 # #))))) ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare ; the exit function DYNAMIC-EXTENT to avoid. ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER ; (RECOVER-FROM-ENCODING-ERROR FORMAT ; "Unexpected value #x~X at start of UTF-8 sequence." OCTET)). ; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT ; to avoid. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET ; ==> ; (BLOCK FLEXI-STREAMS::CHAR-DECODER ; (LOCALLY ; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; (FLET ((#:GET-CHAR-CODE4 # ; #)) ; (LET (#) ; (CASE #:CHAR-CODE2 # #))))) ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare ; the exit function DYNAMIC-EXTENT to avoid. ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER ; (RECOVER-FROM-ENCODING-ERROR FORMAT ; "Unexpected value #x~X at start of UTF-8 sequence." OCTET)). ; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT ; to avoid. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET ; ==> ; (BLOCK FLEXI-STREAMS::CHAR-DECODER ; (LOCALLY ; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; (FLET ((#:GET-CHAR-CODE4 # ; #)) ; (LET (#) ; (CASE #:CHAR-CODE2 # #))))) ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare ; the exit function DYNAMIC-EXTENT to avoid. ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER ; (RECOVER-FROM-ENCODING-ERROR FORMAT ; "Unexpected value #x~X at start of UTF-8 sequence." OCTET)). ; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT ; to avoid. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; ; caught STYLE-WARNING: ; Result is a (VALUES NULL &OPTIONAL), not a (MOD 1114112). ; See also: ; The SBCL Manual, Node "Handling of Types" ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (FLET (#) ; (LET # ; # ; #))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-(COMPLEX FLOAT) numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; ; 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. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (FLET (#) ; (LET # ; # ; #))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare ; the exit function DYNAMIC-EXTENT to avoid. ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-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 INTEGER, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; etc. ; ; 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. ; processing (DEFINE-CHAR-DECODERS (FLEXI-UTF-16-LE-FORMAT FLEXI-CR-UTF-16-LE-FORMAT ...) ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/decode.lisp ; in: ; DEFINE-CHAR-DECODERS (FLEXI-UTF-16-LE-FORMAT FLEXI-CR-UTF-16-LE-FORMAT ; FLEXI-CRLF-UTF-16-LE-FORMAT) ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> PROG1 LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROG1 LET OR LET IF COND IF THE RETURN-FROM ; ==> ; NIL ; ; caught STYLE-WARNING: ; This is not a (MOD 1114112): ; NIL ; See also: ; The SBCL Manual, Node "Handling of Types" ; ; 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. ; --> PROG1 LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::I) ; ; 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. ; --> PROG1 LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROG1 LET OR LET IF COND IF THE RETURN-FROM ; ==> ; NIL ; ; caught STYLE-WARNING: ; This is not a (MOD 1114112): ; NIL ; See also: ; The SBCL Manual, Node "Handling of Types" ; ; 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. ; --> PROG1 LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::I) ; ; 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. ; --> PROG1 LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-16-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-16-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-16-LE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (FLET (#) ; (DECLARE #) ; (LET # ; # ; #))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET ; ==> ; (BLOCK FLEXI-STREAMS::CHAR-DECODER ; (LOCALLY ; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; (FLET ((#:GET-CHAR-CODE4 # ; #)) ; (LET (#) ; (CASE #:CHAR-CODE2 # #))))) ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER ; (RECOVER-FROM-ENCODING-ERROR FORMAT ; "End of data while in UTF-16 sequence.")). ; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT ; to avoid. ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare ; the exit function DYNAMIC-EXTENT to avoid. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET ; ==> ; (BLOCK FLEXI-STREAMS::CHAR-DECODER ; (LOCALLY ; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; (FLET ((#:GET-CHAR-CODE4 # ; #)) ; (LET (#) ; (CASE #:CHAR-CODE2 # #))))) ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER ; (RECOVER-FROM-ENCODING-ERROR FORMAT ; "End of data while in UTF-16 sequence.")). ; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT ; to avoid. ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare ; the exit function DYNAMIC-EXTENT to avoid. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET ; ==> ; (BLOCK FLEXI-STREAMS::CHAR-DECODER ; (LOCALLY ; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; (FLET ((#:GET-CHAR-CODE4 # ; #)) ; (LET (#) ; (CASE #:CHAR-CODE2 # #))))) ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER ; (RECOVER-FROM-ENCODING-ERROR FORMAT ; "End of data while in UTF-16 sequence.")). ; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT ; to avoid. ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare ; the exit function DYNAMIC-EXTENT to avoid. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> PROG1 LET OR LET IF COND IF THE ; ==> ; (RETURN-FROM FLEXI-STREAMS::CHAR-DECODER NIL) ; ; caught STYLE-WARNING: ; Result is a (VALUES NULL &OPTIONAL), not a (MOD 1114112). ; See also: ; The SBCL Manual, Node "Handling of Types" ; ; 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. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-16-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-16-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-16-LE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (FLET (#) ; (DECLARE #) ; (LET # ; # ; #))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-(COMPLEX FLOAT) numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> PROG1 LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::I) ; ; 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. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-16-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-16-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-16-LE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (FLET (#) ; (DECLARE #) ; (LET # ; # ; #))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER ; (RECOVER-FROM-ENCODING-ERROR FORMAT ; "End of data while in UTF-16 sequence.")). ; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT ; to avoid. ; ; 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. ; processing (DEFINE-CHAR-DECODERS (FLEXI-UTF-16-BE-FORMAT FLEXI-CR-UTF-16-BE-FORMAT ...) ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/decode.lisp ; in: ; DEFINE-CHAR-DECODERS (FLEXI-UTF-16-BE-FORMAT FLEXI-CR-UTF-16-BE-FORMAT ; FLEXI-CRLF-UTF-16-BE-FORMAT) ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> PROG1 LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROG1 LET OR LET IF COND IF THE RETURN-FROM ; ==> ; NIL ; ; caught STYLE-WARNING: ; This is not a (MOD 1114112): ; NIL ; See also: ; The SBCL Manual, Node "Handling of Types" ; ; 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. ; --> PROG1 LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::I) ; ; 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. ; --> PROG1 LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> PROG1 LET OR LET IF COND IF THE RETURN-FROM ; ==> ; NIL ; ; caught STYLE-WARNING: ; This is not a (MOD 1114112): ; NIL ; See also: ; The SBCL Manual, Node "Handling of Types" ; ; 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. ; --> PROG1 LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::I) ; ; 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. ; --> PROG1 LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-16-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-16-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-16-BE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (FLET (#) ; (DECLARE #) ; (LET # ; # ; #))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET ; ==> ; (BLOCK FLEXI-STREAMS::CHAR-DECODER ; (LOCALLY ; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; (FLET ((#:GET-CHAR-CODE4 # ; #)) ; (LET (#) ; (CASE #:CHAR-CODE2 # #))))) ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER ; (RECOVER-FROM-ENCODING-ERROR FORMAT ; "End of data while in UTF-16 sequence.")). ; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT ; to avoid. ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare ; the exit function DYNAMIC-EXTENT to avoid. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET ; ==> ; (BLOCK FLEXI-STREAMS::CHAR-DECODER ; (LOCALLY ; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; (FLET ((#:GET-CHAR-CODE4 # ; #)) ; (LET (#) ; (CASE #:CHAR-CODE2 # #))))) ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER ; (RECOVER-FROM-ENCODING-ERROR FORMAT ; "End of data while in UTF-16 sequence.")). ; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT ; to avoid. ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare ; the exit function DYNAMIC-EXTENT to avoid. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET ; ==> ; (BLOCK FLEXI-STREAMS::CHAR-DECODER ; (LOCALLY ; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; (FLET ((#:GET-CHAR-CODE4 # ; #)) ; (LET (#) ; (CASE #:CHAR-CODE2 # #))))) ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER ; (RECOVER-FROM-ENCODING-ERROR FORMAT ; "End of data while in UTF-16 sequence.")). ; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT ; to avoid. ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare ; the exit function DYNAMIC-EXTENT to avoid. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> PROG1 LET OR LET IF COND IF THE ; ==> ; (RETURN-FROM FLEXI-STREAMS::CHAR-DECODER NIL) ; ; caught STYLE-WARNING: ; Result is a (VALUES NULL &OPTIONAL), not a (MOD 1114112). ; See also: ; The SBCL Manual, Node "Handling of Types" ; ; 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. ; --> PROG1 LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE ; ==> ; (AREF SEQUENCE FLEXI-STREAMS::I) ; ; 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. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-16-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-16-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-16-BE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (FLET (#) ; (DECLARE #) ; (LET # ; # ; #))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-(COMPLEX FLOAT) numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER ; (RECOVER-FROM-ENCODING-ERROR FORMAT ; "End of data while in UTF-16 sequence.")). ; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT ; to avoid. ; ; 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. ; processing (DEFINE-CHAR-DECODERS (FLEXI-GBK-FORMAT FLEXI-CR-GBK-FORMAT ...) ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/decode.lisp ; in: ; DEFINE-CHAR-DECODERS (FLEXI-GBK-FORMAT FLEXI-CR-GBK-FORMAT ; FLEXI-CRLF-GBK-FORMAT) ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT ; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT) ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (COND ((<= # 127) FLEXI-STREAMS:OCTET) ((= # 128) 8364) ((= # 255) 63733) ; (T ; (LET # ; #))))) ; --> PROGN DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET ; --> IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (COND ; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127) ; FLEXI-STREAMS:OCTET) ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364) ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733) ; (T ; (LET (#) ; (IF # ; # ; #))))) ; --> LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (LET ((FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)) ; (IF (NULL FLEXI-STREAMS::NEXT-BYTE) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "End of data while in GBK sequence.") ; (LET ((FLEXI-STREAMS::WORD #)) ; (DECLARE (TYPE # FLEXI-STREAMS::WORD)) ; (LET (#) ; (IF FLEXI-STREAMS:OCTET ; FLEXI-STREAMS:OCTET ; #))))) ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (COND ; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127) ; FLEXI-STREAMS:OCTET) ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364) ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733) ; (T ; (LET (#) ; (IF # ; # ; #))))) ; --> LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (LET ((FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)) ; (IF (NULL FLEXI-STREAMS::NEXT-BYTE) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "End of data while in GBK sequence.") ; (LET ((FLEXI-STREAMS::WORD #)) ; (DECLARE (TYPE # FLEXI-STREAMS::WORD)) ; (LET (#) ; (IF FLEXI-STREAMS:OCTET ; FLEXI-STREAMS:OCTET ; #))))) ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (COND ; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127) ; FLEXI-STREAMS:OCTET) ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364) ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733) ; (T ; (LET (#) ; (IF # ; # ; #))))) ; --> LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (LET ((FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)) ; (IF (NULL FLEXI-STREAMS::NEXT-BYTE) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "End of data while in GBK sequence.") ; (LET ((FLEXI-STREAMS::WORD #)) ; (DECLARE (TYPE # FLEXI-STREAMS::WORD)) ; (LET (#) ; (IF FLEXI-STREAMS:OCTET ; FLEXI-STREAMS:OCTET ; #))))) ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT ; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT) ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (COND ((<= # 127) FLEXI-STREAMS:OCTET) ((= # 128) 8364) ((= # 255) 63733) ; (T ; (LET # ; #))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (COND ; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127) ; FLEXI-STREAMS:OCTET) ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364) ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733) ; (T ; (LET (#) ; (IF # ; # ; #))))) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (LET ((FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)) ; (IF (NULL FLEXI-STREAMS::NEXT-BYTE) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "End of data while in GBK sequence.") ; (LET ((FLEXI-STREAMS::WORD #)) ; (DECLARE (TYPE # FLEXI-STREAMS::WORD)) ; (LET (#) ; (IF FLEXI-STREAMS:OCTET ; FLEXI-STREAMS:OCTET ; #))))) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT ; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT) ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (COND ((<= # 127) FLEXI-STREAMS:OCTET) ((= # 128) 8364) ((= # 255) 63733) ; (T ; (LET # ; #))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-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 INTEGER, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; etc. ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (COND ; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127) ; FLEXI-STREAMS:OCTET) ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364) ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733) ; (T ; (LET (#) ; (IF # ; # ; #))))) ; --> LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (LET ((FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)) ; (IF (NULL FLEXI-STREAMS::NEXT-BYTE) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "End of data while in GBK sequence.") ; (LET ((FLEXI-STREAMS::WORD #)) ; (DECLARE (TYPE # FLEXI-STREAMS::WORD)) ; (LET (#) ; (IF FLEXI-STREAMS:OCTET ; FLEXI-STREAMS:OCTET ; #))))) ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (COND ; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127) ; FLEXI-STREAMS:OCTET) ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364) ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733) ; (T ; (LET (#) ; (IF # ; # ; #))))) ; --> LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (LET ((FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)) ; (IF (NULL FLEXI-STREAMS::NEXT-BYTE) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "End of data while in GBK sequence.") ; (LET ((FLEXI-STREAMS::WORD #)) ; (DECLARE (TYPE # FLEXI-STREAMS::WORD)) ; (LET (#) ; (IF FLEXI-STREAMS:OCTET ; FLEXI-STREAMS:OCTET ; #))))) ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (COND ; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127) ; FLEXI-STREAMS:OCTET) ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364) ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733) ; (T ; (LET (#) ; (IF # ; # ; #))))) ; --> LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (LET ((FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)) ; (IF (NULL FLEXI-STREAMS::NEXT-BYTE) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "End of data while in GBK sequence.") ; (LET ((FLEXI-STREAMS::WORD #)) ; (DECLARE (TYPE # FLEXI-STREAMS::WORD)) ; (LET (#) ; (IF FLEXI-STREAMS:OCTET ; FLEXI-STREAMS:OCTET ; #))))) ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT ; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT) ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (COND ((<= # 127) FLEXI-STREAMS:OCTET) ((= # 128) 8364) ((= # 255) 63733) ; (T ; (LET # ; #))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY LET PROGN LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY LET PROGN LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (COND ; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127) ; FLEXI-STREAMS:OCTET) ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364) ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733) ; (T ; (LET (#) ; (IF # ; # ; #))))) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (LET ((FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)) ; (IF (NULL FLEXI-STREAMS::NEXT-BYTE) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "End of data while in GBK sequence.") ; (LET ((FLEXI-STREAMS::WORD #)) ; (DECLARE (TYPE # FLEXI-STREAMS::WORD)) ; (LET (#) ; (IF FLEXI-STREAMS:OCTET ; FLEXI-STREAMS:OCTET ; #))))) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT ; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT) ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (COND ((<= # 127) FLEXI-STREAMS:OCTET) ((= # 128) 8364) ((= # 255) 63733) ; (T ; (LET # ; #))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-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 INTEGER, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; etc. ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (COND ; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127) ; FLEXI-STREAMS:OCTET) ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364) ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733) ; (T ; (LET (#) ; (IF # ; # ; #))))) ; --> LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (LET ((FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)) ; (IF (NULL FLEXI-STREAMS::NEXT-BYTE) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "End of data while in GBK sequence.") ; (LET ((FLEXI-STREAMS::WORD #)) ; (DECLARE (TYPE # FLEXI-STREAMS::WORD)) ; (LET (#) ; (IF FLEXI-STREAMS:OCTET ; FLEXI-STREAMS:OCTET ; #))))) ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (COND ; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127) ; FLEXI-STREAMS:OCTET) ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364) ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733) ; (T ; (LET (#) ; (IF # ; # ; #))))) ; --> LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (LET ((FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)) ; (IF (NULL FLEXI-STREAMS::NEXT-BYTE) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "End of data while in GBK sequence.") ; (LET ((FLEXI-STREAMS::WORD #)) ; (DECLARE (TYPE # FLEXI-STREAMS::WORD)) ; (LET (#) ; (IF FLEXI-STREAMS:OCTET ; FLEXI-STREAMS:OCTET ; #))))) ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (COND ; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127) ; FLEXI-STREAMS:OCTET) ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364) ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733) ; (T ; (LET (#) ; (IF # ; # ; #))))) ; --> LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (LET ((FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)) ; (IF (NULL FLEXI-STREAMS::NEXT-BYTE) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "End of data while in GBK sequence.") ; (LET ((FLEXI-STREAMS::WORD #)) ; (DECLARE (TYPE # FLEXI-STREAMS::WORD)) ; (LET (#) ; (IF FLEXI-STREAMS:OCTET ; FLEXI-STREAMS:OCTET ; #))))) ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT ; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT) ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (COND ((<= # 127) FLEXI-STREAMS:OCTET) ((= # 128) 8364) ((= # 255) 63733) ; (T ; (LET # ; #))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; 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. ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-(COMPLEX FLOAT) numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (COND ; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127) ; FLEXI-STREAMS:OCTET) ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364) ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733) ; (T ; (LET (#) ; (IF # ; # ; #))))) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (LET ((FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)) ; (IF (NULL FLEXI-STREAMS::NEXT-BYTE) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "End of data while in GBK sequence.") ; (LET ((FLEXI-STREAMS::WORD #)) ; (DECLARE (TYPE # FLEXI-STREAMS::WORD)) ; (LET (#) ; (IF FLEXI-STREAMS:OCTET ; FLEXI-STREAMS:OCTET ; #))))) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT ; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT) ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER) ; (COND ((<= # 127) FLEXI-STREAMS:OCTET) ((= # 128) 8364) ((= # 255) 63733) ; (T ; (LET # ; #))))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-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 INTEGER, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; etc. ; ; 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. ; processing (DEFINE-CHAR-DECODERS (FLEXI-UTF-32-LE-FORMAT FLEXI-CR-UTF-32-LE-FORMAT ...) ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/decode.lisp ; in: ; DEFINE-CHAR-DECODERS (FLEXI-UTF-32-LE-FORMAT FLEXI-CR-UTF-32-LE-FORMAT ; FLEXI-CRLF-UTF-32-LE-FORMAT) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...) ; --> BLOCK LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-16 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; &REST T). ; etc. ; --> PROGN DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET ; --> IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> PROG1 LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...) ; --> BLOCK LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-124 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...) ; --> BLOCK LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-139 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...) ; --> BLOCK LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-107 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; ; caught STYLE-WARNING: ; This is not a (MOD 1114112): ; NIL ; See also: ; The SBCL Manual, Node "Handling of Types" ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-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 UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> PROG1 LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...) ; --> BLOCK LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-464 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY LET PROGN LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY LET PROGN LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...) ; --> BLOCK LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-480 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...) ; --> BLOCK LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-446 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; ; caught STYLE-WARNING: ; This is not a (MOD 1114112): ; NIL ; See also: ; The SBCL Manual, Node "Handling of Types" ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-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 UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> PROG1 LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET ; ==> ; (BLOCK FLEXI-STREAMS::CHAR-DECODER ; (LOCALLY ; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; (FLET ((#:GET-CHAR-CODE4 # ; #)) ; (LET (#) ; (CASE #:CHAR-CODE2 # #))))) ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare ; the exit function DYNAMIC-EXTENT to avoid. ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER ; (RECOVER-FROM-ENCODING-ERROR FORMAT ; "End of data while in UTF-32 sequence.")). ; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT ; to avoid. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET ; ==> ; (BLOCK FLEXI-STREAMS::CHAR-DECODER ; (LOCALLY ; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; (FLET ((#:GET-CHAR-CODE4 # ; #)) ; (LET (#) ; (CASE #:CHAR-CODE2 # #))))) ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare ; the exit function DYNAMIC-EXTENT to avoid. ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER ; (RECOVER-FROM-ENCODING-ERROR FORMAT ; "End of data while in UTF-32 sequence.")). ; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT ; to avoid. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET ; ==> ; (BLOCK FLEXI-STREAMS::CHAR-DECODER ; (LOCALLY ; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; (FLET ((#:GET-CHAR-CODE4 # ; #)) ; (LET (#) ; (CASE #:CHAR-CODE2 # #))))) ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare ; the exit function DYNAMIC-EXTENT to avoid. ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER ; (RECOVER-FROM-ENCODING-ERROR FORMAT ; "End of data while in UTF-32 sequence.")). ; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT ; to avoid. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...) ; --> BLOCK LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-791 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...) ; --> BLOCK LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-827 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...) ; --> BLOCK LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-810 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; ; caught STYLE-WARNING: ; Result is a (VALUES NULL &OPTIONAL), not a (MOD 1114112). ; See also: ; The SBCL Manual, Node "Handling of Types" ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-(COMPLEX FLOAT) numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare ; the exit function DYNAMIC-EXTENT to avoid. ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-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 UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; ; 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. ; processing (DEFINE-CHAR-DECODERS (FLEXI-UTF-32-BE-FORMAT FLEXI-CR-UTF-32-BE-FORMAT ...) ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/decode.lisp ; in: ; DEFINE-CHAR-DECODERS (FLEXI-UTF-32-BE-FORMAT FLEXI-CR-UTF-32-BE-FORMAT ; FLEXI-CRLF-UTF-32-BE-FORMAT) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...) ; --> BLOCK LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-16 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; &REST T). ; etc. ; --> PROGN DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET ; --> IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> PROG1 LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...) ; --> BLOCK LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-124 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...) ; --> BLOCK LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-139 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...) ; --> BLOCK LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-107 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; ; caught STYLE-WARNING: ; This is not a (MOD 1114112): ; NIL ; See also: ; The SBCL Manual, Node "Handling of Types" ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-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 UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> PROG1 LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...) ; --> BLOCK LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-464 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY LET PROGN LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY LET PROGN LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...) ; --> BLOCK LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-480 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> LET PROGN LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...) ; --> BLOCK LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-446 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; ; caught STYLE-WARNING: ; This is not a (MOD 1114112): ; NIL ; See also: ; The SBCL Manual, Node "Handling of Types" ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-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 UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> PROG1 LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET ; ==> ; (AREF (THE (ARRAY FLEXI-STREAMS:OCTET *) FLEXI-STREAMS::BUFFER) ; FLEXI-STREAMS::BUFFER-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET ; ==> ; (BLOCK FLEXI-STREAMS::CHAR-DECODER ; (LOCALLY ; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; (FLET ((#:GET-CHAR-CODE4 # ; #)) ; (LET (#) ; (CASE #:CHAR-CODE2 # #))))) ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare ; the exit function DYNAMIC-EXTENT to avoid. ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER ; (RECOVER-FROM-ENCODING-ERROR FORMAT ; "End of data while in UTF-32 sequence.")). ; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT ; to avoid. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET ; ==> ; (BLOCK FLEXI-STREAMS::CHAR-DECODER ; (LOCALLY ; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; (FLET ((#:GET-CHAR-CODE4 # ; #)) ; (LET (#) ; (CASE #:CHAR-CODE2 # #))))) ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare ; the exit function DYNAMIC-EXTENT to avoid. ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER ; (RECOVER-FROM-ENCODING-ERROR FORMAT ; "End of data while in UTF-32 sequence.")). ; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT ; to avoid. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET ; ==> ; (BLOCK FLEXI-STREAMS::CHAR-DECODER ; (LOCALLY ; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; (FLET ((#:GET-CHAR-CODE4 # ; #)) ; (LET (#) ; (CASE #:CHAR-CODE2 # #))))) ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare ; the exit function DYNAMIC-EXTENT to avoid. ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER ; (RECOVER-FROM-ENCODING-ERROR FORMAT ; "End of data while in UTF-32 sequence.")). ; Use GO/RETURN-FROM with SAFETY 0, or declare the exit function DYNAMIC-EXTENT ; to avoid. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...) ; --> BLOCK LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-810 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF IF IF PROGN FLEXI-STREAMS::ITERATE ; --> FLET LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK ; --> LOCALLY FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...) ; --> BLOCK LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-827 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET ; ==> ; (<= 216 (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* #:CHAR-CODE0 -8)) ; 223) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; &REST T). ; etc. ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* ; --> FLET MACROLET ETYPECASE LET COND IF PROGN FLEXI-STREAMS::ITERATE FLET ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF > IF ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...) ; --> BLOCK LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-791 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; ; caught STYLE-WARNING: ; Result is a (VALUES NULL &OPTIONAL), not a (MOD 1114112). ; See also: ; The SBCL Manual, Node "Handling of Types" ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-(COMPLEX FLOAT) numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM CHAR-DECODER NIL). Use GO/RETURN-FROM with SAFETY 0, or declare ; the exit function DYNAMIC-EXTENT to avoid. ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT) ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN) ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN)) ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE # ; '#)) ; (LOOP FLEXI-STREAMS::FOR ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8 ; FLEXI-STREAMS::FOR ...)))) ; --> PROGN FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF ; ==> ; (SB-KERNEL:%SCHARSET STRING FLEXI-STREAMS::J ; (CODE-CHAR ; (MACROLET ((FLEXI-STREAMS::UNGET # ; `#)) ; (SYMBOL-MACROLET (#) ; (BLOCK FLEXI-STREAMS::CHAR-DECODER #))))) ; ; note: forced to do full call ; unable to do inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline ASH (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-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 UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; ; 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. ; processing (DEFMETHOD OCTETS-TO-CHAR-CODE ...) ; processing (DEFMETHOD OCTETS-TO-CHAR-CODE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-flexi-streams/decode-tmpVTFK6ZJW.fasl ; compilation finished in 0:00:30.514 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/in-memory.lisp" (written 13 SEP 2020 06:48:03 AM): ; processing (IN-PACKAGE :FLEXI-STREAMS) ; processing (DEFCLASS IN-MEMORY-STREAM ...) ; processing (DEFCLASS IN-MEMORY-INPUT-STREAM ...) ; processing (DEFCLASS IN-MEMORY-OUTPUT-STREAM ...) ; processing (DEFCLASS LIST-STREAM ...) ; processing (DEFCLASS VECTOR-STREAM ...) ; processing (DEFCLASS LIST-INPUT-STREAM ...) ; processing (DEFCLASS VECTOR-INPUT-STREAM ...) ; processing (DEFCLASS VECTOR-OUTPUT-STREAM ...) ; processing (DEFMETHOD CHECK-IF-OPEN ...) ; processing (DEFMETHOD STREAM-ELEMENT-TYPE ...) ; processing (DEFGENERIC PEEK-BYTE ...) ; processing (DEFMETHOD PEEK-BYTE ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/in-memory.lisp ; in: DEFMETHOD PEEK-BYTE (VECTOR-INPUT-STREAM) ; (= BYTE FLEXI-STREAMS::PEEK-TYPE) ; ; note: unable to open code because: The operands might not be the same type. ; (LOOP :FOR BYTE = (READ-BYTE STREAM FLEXI-STREAMS::EOF-ERROR-P :EOF) ; :FOR FLEXI-STREAMS::NEW-INDEX :FROM FLEXI-STREAMS::INDEX ; :UNTIL (COND ((EQ BYTE :EOF) (RETURN FLEXI-STREAMS::EOF-VALUE)) ; ((NULL FLEXI-STREAMS::PEEK-TYPE)) ; ((EQ FLEXI-STREAMS::PEEK-TYPE 'T) (PLUSP BYTE)) ; ((= BYTE FLEXI-STREAMS::PEEK-TYPE))) ; :FINALLY ...) ; --> BLOCK LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE ; ==> ; (1+ FLEXI-STREAMS::NEW-INDEX) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; (PLUSP BYTE) ; ; note: forced to do FAST-IF->-ZERO (cost 8) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a INTEGER, not a FIXNUM. ; (LOOP :FOR BYTE = (READ-BYTE STREAM FLEXI-STREAMS::EOF-ERROR-P :EOF) ; :FOR FLEXI-STREAMS::NEW-INDEX :FROM FLEXI-STREAMS::INDEX ; :UNTIL (COND ((EQ BYTE :EOF) (RETURN FLEXI-STREAMS::EOF-VALUE)) ; ((NULL FLEXI-STREAMS::PEEK-TYPE)) ; ((EQ FLEXI-STREAMS::PEEK-TYPE 'T) (PLUSP BYTE)) ; ((= BYTE FLEXI-STREAMS::PEEK-TYPE))) ; :FINALLY ...) ; --> BLOCK LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE ; ==> ; (1+ FLEXI-STREAMS::NEW-INDEX) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &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. ; processing (DEFMETHOD PEEK-BYTE ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/in-memory.lisp ; in: DEFMETHOD PEEK-BYTE (LIST-INPUT-STREAM) ; (= BYTE FLEXI-STREAMS::PEEK-TYPE) ; ; note: unable to open code because: The operands might not be the same type. ; (PLUSP BYTE) ; ; note: forced to do FAST-IF->-ZERO (cost 8) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a INTEGER, not a FIXNUM. ; processing (DEFMETHOD TRANSFORM-OCTET ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/in-memory.lisp ; in: DEFMETHOD TRANSFORM-OCTET (IN-MEMORY-STREAM T) ; (FUNCALL (OR (FLEXI-STREAMS::IN-MEMORY-STREAM-TRANSFORMER STREAM) #'IDENTITY) ; FLEXI-STREAMS:OCTET) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; processing (DEFMETHOD STREAM-READ-BYTE ...) ; processing (DEFMETHOD STREAM-LISTEN ...) ; processing (DEFMETHOD STREAM-READ-SEQUENCE ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/in-memory.lisp ; in: DEFMETHOD STREAM-READ-SEQUENCE (LIST-INPUT-STREAM T T T) ; (FUNCALL FLEXI-STREAMS::TRANSFORMER ELT) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TRANSFORMER is not known to be a function ; (SETF (ELT SEQUENCE FLEXI-STREAMS::INDEX) ; (IF FLEXI-STREAMS::TRANSFORMER ; (FUNCALL FLEXI-STREAMS::TRANSFORMER ELT) ; ELT)) ; ==> ; (SB-KERNEL:%SETELT SEQUENCE FLEXI-STREAMS::INDEX ; (IF FLEXI-STREAMS::TRANSFORMER ; (FUNCALL FLEXI-STREAMS::TRANSFORMER ELT) ; ELT)) ; ; 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. ; processing (DEFMETHOD STREAM-READ-BYTE ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/in-memory.lisp ; in: DEFMETHOD STREAM-READ-BYTE (VECTOR-INPUT-STREAM) ; (AREF VECTOR FLEXI-STREAMS::CURRENT-INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; processing (DEFMETHOD STREAM-LISTEN ...) ; processing (DEFMETHOD STREAM-READ-SEQUENCE ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/in-memory.lisp ; in: DEFMETHOD STREAM-READ-SEQUENCE (VECTOR-INPUT-STREAM T T T) ; (AREF VECTOR FLEXI-STREAMS::VECTOR-INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (FUNCALL FLEXI-STREAMS::TRANSFORMER ELT) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TRANSFORMER is not known to be a function ; (SETF (ELT SEQUENCE FLEXI-STREAMS::INDEX) ; (IF FLEXI-STREAMS::TRANSFORMER ; (FUNCALL FLEXI-STREAMS::TRANSFORMER ELT) ; ELT)) ; ==> ; (SB-KERNEL:%SETELT SEQUENCE FLEXI-STREAMS::INDEX ; (IF FLEXI-STREAMS::TRANSFORMER ; (FUNCALL FLEXI-STREAMS::TRANSFORMER ELT) ; ELT)) ; ; 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. ; processing (DEFMETHOD STREAM-WRITE-BYTE ...) ; processing (DEFMETHOD STREAM-WRITE-SEQUENCE ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/in-memory.lisp ; in: DEFMETHOD STREAM-WRITE-SEQUENCE (VECTOR-OUTPUT-STREAM T T T) ; (ELT SEQUENCE FLEXI-STREAMS::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. ; processing (DEFMETHOD STREAM-FILE-POSITION ...) ; processing (DEFMETHOD (SETF STREAM-FILE-POSITION) ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/in-memory.lisp ; in: DEFMETHOD (SETF STREAM-FILE-POSITION) (T VECTOR-INPUT-STREAM) ; (<= 0 FLEXI-STREAMS::POSITION-SPEC FLEXI-STREAMS::END) ; ; note: unable to open code because: The operands might not be the same type. ; ; 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. ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; processing (DEFMETHOD STREAM-FILE-POSITION ...) ; processing (DEFMETHOD (SETF STREAM-FILE-POSITION) ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/in-memory.lisp ; in: DEFMETHOD (SETF STREAM-FILE-POSITION) (T VECTOR-OUTPUT-STREAM) ; (ARRAY-TOTAL-SIZE VECTOR) ; ; note: unable to optimize because: can't tell the rank at compile time ; (<= 0 FLEXI-STREAMS::POSITION-SPEC ARRAY-TOTAL-SIZE-LIMIT) ; ; 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. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; processing (DEFMETHOD MAKE-IN-MEMORY-INPUT-STREAM ...) ; processing (DEFMETHOD MAKE-IN-MEMORY-INPUT-STREAM ...) ; processing (DEFUN MAKE-OUTPUT-VECTOR ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/in-memory.lisp ; in: DEFUN MAKE-OUTPUT-VECTOR ; (MAKE-ARRAY 0 :ADJUSTABLE T :FILL-POINTER 0 :ELEMENT-TYPE ; FLEXI-STREAMS::ELEMENT-TYPE) ; ; note: unable to optimize because: ELEMENT-TYPE is not constant. ; processing (DEFUN MAKE-IN-MEMORY-OUTPUT-STREAM ...) ; processing (DEFMETHOD GET-OUTPUT-STREAM-SEQUENCE ...) ; processing (DEFMETHOD OUTPUT-STREAM-SEQUENCE-LENGTH ...) ; processing (DEFMACRO WITH-INPUT-FROM-SEQUENCE ...) ; processing (DEFMACRO WITH-OUTPUT-TO-SEQUENCE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-flexi-streams/in-memory-tmp75WVSJEW.fasl ; compilation finished in 0:00:00.855 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/stream.lisp" (written 13 SEP 2020 06:48:03 AM): ; processing (IN-PACKAGE :FLEXI-STREAMS) ; processing (DEFCLASS FLEXI-STREAM ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD (SETF FLEXI-STREAM-EXTERNAL-FORMAT) ...) ; processing (DEFMETHOD (SETF FLEXI-STREAM-ELEMENT-TYPE) ...) ; processing (DEFMETHOD STREAM-ELEMENT-TYPE ...) ; processing (DEFMETHOD CLOSE ...) ; processing (DEFMETHOD OPEN-STREAM-P ...) ; processing (DEFMETHOD STREAM-FILE-POSITION ...) ; processing (DEFMETHOD (SETF STREAM-FILE-POSITION) ...) ; processing (DEFCLASS FLEXI-OUTPUT-STREAM ...) ; processing (DEFCLASS FLEXI-INPUT-STREAM ...) ; processing (DEFCLASS FLEXI-IO-STREAM ...) ; processing (DEFUN MAKE-FLEXI-STREAM ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-flexi-streams/stream-tmpBU5UM3S4.fasl ; compilation finished in 0:00:00.255 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/output.lisp" (written 13 SEP 2020 06:48:03 AM): ; processing (IN-PACKAGE :FLEXI-STREAMS) ; processing (DEFGENERIC WRITE-BYTE* ...) ; processing (DEFMETHOD WRITE-BYTE* ...) ; processing (DEFMETHOD STREAM-WRITE-CHAR ...) ; processing (DEFMETHOD STREAM-WRITE-CHAR ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/output.lisp ; in: DEFMETHOD STREAM-WRITE-CHAR :AFTER (FLEXI-OUTPUT-STREAM T) ; (INCF (THE INTEGER FLEXI-STREAMS::COLUMN)) ; --> LET* ; ==> ; (+ 1 (THE INTEGER (FLEXI-STREAMS:FLEXI-STREAM-COLUMN #:G68))) ; ; 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. ; processing (DEFMETHOD STREAM-CLEAR-OUTPUT ...) ; processing (DEFMETHOD STREAM-FINISH-OUTPUT ...) ; processing (DEFMETHOD STREAM-FORCE-OUTPUT ...) ; processing (DEFMETHOD STREAM-LINE-COLUMN ...) ; processing (DEFMETHOD STREAM-WRITE-BYTE ...) ; processing (DEFMETHOD STREAM-WRITE-SEQUENCE ...) ; processing (DEFMETHOD STREAM-WRITE-STRING ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/output.lisp ; in: DEFMETHOD STREAM-WRITE-STRING (FLEXI-OUTPUT-STREAM T) ; (LENGTH STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-flexi-streams/output-tmpOBHVA3CD.fasl ; compilation finished in 0:00:00.203 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/input.lisp" (written 13 SEP 2020 06:48:03 AM): ; processing (IN-PACKAGE :FLEXI-STREAMS) ; processing (DEFMETHOD READ-BYTE* ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/input.lisp ; in: DEFMETHOD READ-BYTE* (FLEXI-INPUT-STREAM) ; (AND FLEXI-STREAMS::BOUND (>= POSITION FLEXI-STREAMS::BOUND)) ; --> IF ; ==> ; (>= (THE INTEGER POSITION) (THE (OR NULL INTEGER) FLEXI-STREAMS::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. ; The second argument is a INTEGER, not a FIXNUM. ; (INCF POSITION) ; --> LET* ; ==> ; (+ 1 (THE INTEGER (FLEXI-STREAMS:FLEXI-STREAM-POSITION #:G08))) ; ; 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. ; (DECF POSITION) ; --> LET* ; ==> ; (SB-IMPL::XSUBTRACT 1 ; (THE INTEGER ; (FLEXI-STREAMS:FLEXI-STREAM-POSITION #:G012))) ; ; 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. ; processing (DEFMETHOD STREAM-CLEAR-INPUT ...) ; processing (DEFMETHOD STREAM-LISTEN ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/input.lisp ; in: DEFMETHOD STREAM-LISTEN (FLEXI-INPUT-STREAM) ; (AND FLEXI-STREAMS::BOUND (>= POSITION FLEXI-STREAMS::BOUND)) ; --> IF ; ==> ; (>= (THE INTEGER POSITION) (THE (OR NULL INTEGER) FLEXI-STREAMS::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. ; The second argument is a INTEGER, not a FIXNUM. ; processing (DEFMETHOD STREAM-READ-BYTE ...) ; processing (DEFUN UNREAD-CHAR% ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/input.lisp ; in: DEFUN UNREAD-CHAR% ; (DECF POSITION FLEXI-STREAMS::COUNTER) ; --> LET* ; ==> ; (SB-IMPL::XSUBTRACT FLEXI-STREAMS::COUNTER ; (FLEXI-STREAMS:FLEXI-STREAM-POSITION #:G01)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first 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 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. ; processing (DEFMETHOD STREAM-READ-CHAR ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/input.lisp ; in: DEFMETHOD STREAM-READ-CHAR (FLEXI-INPUT-STREAM) ; (OR (CODE-CHAR CHAR-CODE) CHAR-CODE) ; --> LET IF ; ==> ; CHAR-CODE ; ; note: deleting unreachable code ; processing (DEFMETHOD STREAM-READ-CHAR-NO-HANG ...) ; processing (DEFMETHOD STREAM-READ-SEQUENCE ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/input.lisp ; in: DEFMETHOD STREAM-READ-SEQUENCE (FLEXI-INPUT-STREAM T T T) ; (- FLEXI-STREAMS::BOUND POSITION) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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. ; (+ FLEXI-STREAMS::START (- FLEXI-STREAMS::BOUND POSITION)) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-(COMPLEX FLOAT) numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; (REPLACE SEQUENCE FLEXI-STREAMS::OCTET-STACK :START1 FLEXI-STREAMS::START ; :END1 FLEXI-STREAMS::END) ; ; 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-BASE-STRING. ; 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-ARRAY CHARACTER (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY CHARACTER ; (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY SINGLE-FLOAT (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY SINGLE-FLOAT (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; SINGLE-FLOAT (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY DOUBLE-FLOAT (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY DOUBLE-FLOAT (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; DOUBLE-FLOAT (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SIMPLE-BIT-VECTOR. ; The second argument is a SEQUENCE, not a SIMPLE-BIT-VECTOR. ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-BIT-VECTOR ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 2) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 4) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 7) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 8) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 15) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 15) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 16) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 16) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 31) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 31) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 32) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 32) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 62) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 62) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 63) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 63) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 64) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 64) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 8) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 16) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 32) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY FIXNUM (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY FIXNUM (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY FIXNUM (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 64) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) ; (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (COMPLEX SINGLE-FLOAT) ; (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (COMPLEX DOUBLE-FLOAT) ; (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SIMPLE-VECTOR. ; The second argument is a SEQUENCE, not a SIMPLE-VECTOR. ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-VECTOR ; &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). ; (LENGTH FLEXI-STREAMS::OCTET-STACK) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (ELT SEQUENCE (1- FLEXI-STREAMS::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 POSITION (- FLEXI-STREAMS::INDEX FLEXI-STREAMS::START)) ; --> LET* ; ==> ; (+ (- FLEXI-STREAMS::INDEX FLEXI-STREAMS::START) ; (FLEXI-STREAMS:FLEXI-STREAM-POSITION #:G1130)) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-(COMPLEX FLOAT) numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; (MIN FLEXI-STREAMS::END ; (+ FLEXI-STREAMS::START (- FLEXI-STREAMS::BOUND POSITION))) ; ; note: unable to open code because: The operands might not be the same type. ; (- FLEXI-STREAMS::BOUND POSITION) ; ; 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. ; (+ FLEXI-STREAMS::START (- FLEXI-STREAMS::BOUND POSITION)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a NUMBER, 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 NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; etc. ; (MIN FLEXI-STREAMS::END ; (+ FLEXI-STREAMS::START (- FLEXI-STREAMS::BOUND POSITION))) ; ; 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. ; (INCF POSITION (- FLEXI-STREAMS::INDEX FLEXI-STREAMS::START)) ; --> LET* ; ==> ; (+ (- FLEXI-STREAMS::INDEX FLEXI-STREAMS::START) ; (FLEXI-STREAMS:FLEXI-STREAM-POSITION #:G1130)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -4611686018427387902 9223372036854775804), 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 (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. ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-+ ; processing (DEFMETHOD STREAM-UNREAD-CHAR ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/input.lisp ; in: DEFMETHOD STREAM-UNREAD-CHAR (FLEXI-INPUT-STREAM T) ; (= (CHAR-CODE CHAR) FLEXI-STREAMS::LAST-CHAR-CODE) ; ; note: unable to open code because: The operands might not be the same type. ; processing (DEFMETHOD UNREAD-BYTE ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/input.lisp ; in: DEFMETHOD UNREAD-BYTE (T FLEXI-INPUT-STREAM) ; (= BYTE FLEXI-STREAMS::LAST-OCTET) ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 T, 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 T, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a T, not a (COMPLEX DOUBLE-FLOAT). ; etc. ; (DECF (THE INTEGER POSITION)) ; --> LET* ; ==> ; (SB-IMPL::XSUBTRACT 1 ; (THE INTEGER (FLEXI-STREAMS:FLEXI-STREAM-POSITION #:G79))) ; ; 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. ; processing (DEFMETHOD PEEK-BYTE ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/input.lisp ; in: DEFMETHOD PEEK-BYTE (FLEXI-INPUT-STREAM) ; (= FLEXI-STREAMS:OCTET FLEXI-STREAMS::PEEK-TYPE) ; ; note: unable to open code because: The operands might not be the same type. ; (PLUSP FLEXI-STREAMS:OCTET) ; ; note: forced to do FAST-IF->-ZERO (cost 8) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a INTEGER, not a FIXNUM. ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-flexi-streams/input-tmpJ6ELVFLF.fasl ; compilation finished in 0:00:00.415 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/io.lisp" (written 13 SEP 2020 06:48:03 AM): ; processing (IN-PACKAGE :FLEXI-STREAMS) ; processing (DEFMETHOD RESET-INPUT-STATE ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/io.lisp ; in: DEFMETHOD RESET-INPUT-STATE (FLEXI-IO-STREAM) ; (LENGTH FLEXI-STREAMS::OCTET-STACK) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; processing (DEFMETHOD STREAM-WRITE-BYTE ...) ; processing (DEFMETHOD STREAM-WRITE-CHAR ...) ; processing (DEFMETHOD STREAM-WRITE-SEQUENCE ...) ; processing (DEFMETHOD STREAM-CLEAR-OUTPUT ...) ; processing (DEFMETHOD RESET-OUTPUT-STATE ...) ; processing (DEFMETHOD STREAM-READ-BYTE ...) ; processing (DEFMETHOD STREAM-READ-CHAR ...) ; processing (DEFMETHOD STREAM-READ-SEQUENCE ...) ; processing (DEFMETHOD STREAM-UNREAD-CHAR ...) ; processing (DEFMETHOD UNREAD-BYTE ...) ; processing (DEFMETHOD STREAM-CLEAR-INPUT ...) ; processing (DEFMETHOD WRITE-BYTE* ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/io.lisp ; in: DEFMETHOD WRITE-BYTE* :AFTER (T FLEXI-IO-STREAM) ; (INCF POSITION) ; --> LET* ; ==> ; (+ 1 (FLEXI-STREAMS:FLEXI-STREAM-POSITION #:G56)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-flexi-streams/io-tmpULDB0RG.fasl ; compilation finished in 0:00:00.199 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/strings.lisp" (written 13 SEP 2020 06:48:03 AM): ; processing (IN-PACKAGE :FLEXI-STREAMS) ; processing (DEFUN STRING-TO-OCTETS ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/strings.lisp ; in: DEFUN STRING-TO-OCTETS ; (LENGTH STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; processing (DEFUN OCTETS-TO-STRING ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/strings.lisp ; in: DEFUN OCTETS-TO-STRING ; (LENGTH SEQUENCE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; processing (DEFUN OCTET-LENGTH ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/strings.lisp ; in: DEFUN OCTET-LENGTH ; (LENGTH STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; processing (DEFUN CHAR-LENGTH ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/strings.lisp ; in: DEFUN CHAR-LENGTH ; (LENGTH SEQUENCE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-flexi-streams/strings-tmpUTZ0UUTE.fasl ; compilation finished in 0:00:00.115 ; compiling file "/usr/share/common-lisp/source/bordeaux-threads/src/pkgdcl.lisp" (written 07 JUN 2020 09:11:43 AM): ; processing (DEFPACKAGE :BORDEAUX-THREADS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/bordeaux-threads/src/pkgdcl-tmpOOSRA8PZ.fasl ; compilation finished in 0:00:00.007 ; compiling file "/usr/share/common-lisp/source/bordeaux-threads/src/bordeaux-threads.lisp" (written 07 JUN 2020 09:11:43 AM): ; processing (IN-PACKAGE #:BORDEAUX-THREADS) ; processing (DEFVAR *SUPPORTS-THREADS-P* ...) ; processing (DEFUN MARK-SUPPORTED ...) ; processing (DEFINE-CONDITION BORDEAUX-MP-CONDITION ...) ; processing (DEFGENERIC MAKE-THREADING-SUPPORT-ERROR ...) ; processing (DEFSTRUCT %SEMAPHORE ...) ; processing (DEFVAR *DEFAULT-SPECIAL-BINDINGS* ...) ; processing (DEFMACRO DEFBINDINGS ...) ; processing (DEFBINDINGS *STANDARD-IO-BINDINGS* ...) ; processing (DEFUN BINDING-DEFAULT-SPECIALS ...) ; processing (DEFUN SIGNAL-ERROR-IF-CURRENT-THREAD ...) ; processing (DEFPARAMETER *NO-CONDITION-WAIT-TIMEOUT-MESSAGE* ...) ; processing (DEFUN SIGNAL-ERROR-IF-CONDITION-WAIT-TIMEOUT ...) ; processing (DEFMACRO DEFINE-CONDITION-WAIT-COMPILER-MACRO ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/bordeaux-threads/src/bordeaux-threads-tmpDMIL0RVK.fasl ; compilation finished in 0:00:01.483 ; compiling file "/usr/share/common-lisp/source/bordeaux-threads/src/impl-sbcl.lisp" (written 07 JUN 2020 09:11:43 AM): ; processing (IN-PACKAGE #:BORDEAUX-THREADS) ; processing (DEFTYPE THREAD ...) ; processing (DEFUN %MAKE-THREAD ...) ; processing (DEFUN CURRENT-THREAD ...) ; processing (DEFUN THREADP ...) ; processing (DEFUN THREAD-NAME ...) ; processing (DEFTYPE LOCK ...) ; processing (DEFTYPE RECURSIVE-LOCK ...) ; processing (DEFUN LOCK-P ...) ; processing (DEFUN RECURSIVE-LOCK-P ...) ; processing (DEFUN MAKE-LOCK ...) ; processing (DEFUN ACQUIRE-LOCK ...) ; processing (DEFUN RELEASE-LOCK ...) ; processing (DEFMACRO WITH-LOCK-HELD ...) ; processing (DEFUN MAKE-RECURSIVE-LOCK ...) ; processing (DEFMACRO WITH-RECURSIVE-LOCK-HELD ...) ; processing (DEFUN MAKE-CONDITION-VARIABLE ...) ; processing (DEFUN CONDITION-WAIT ...) ; processing (DEFUN CONDITION-NOTIFY ...) ; processing (DEFUN THREAD-YIELD ...) ; processing (DEFTYPE TIMEOUT ...) ; processing (DEFMACRO WITH-TIMEOUT ...) ; processing (DEFTYPE SEMAPHORE ...) ; processing (DEFUN MAKE-SEMAPHORE ...) ; processing (DEFUN SIGNAL-SEMAPHORE ...) ; processing (DEFUN WAIT-ON-SEMAPHORE ...) ; processing (DEFUN ALL-THREADS ...) ; processing (DEFUN INTERRUPT-THREAD ...) ; processing (DEFUN DESTROY-THREAD ...) ; processing (DEFUN THREAD-ALIVE-P ...) ; processing (DEFUN JOIN-THREAD ...) ; processing (MARK-SUPPORTED) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/bordeaux-threads/src/impl-sbcl-tmp8MR9IMIO.fasl ; compilation finished in 0:00:00.243 ; compiling file "/usr/share/common-lisp/source/bordeaux-threads/src/default-implementations.lisp" (written 07 JUN 2020 09:11:43 AM): ; processing (IN-PACKAGE #:BORDEAUX-THREADS) ; processing (DEFMACRO DEFDFUN ...) ; processing (DEFMACRO DEFDMACRO ...) ; processing (DEFDFUN START-MULTIPROCESSING ...) ; processing (DEFDFUN MAKE-THREAD ...) ; processing (DEFDFUN %MAKE-THREAD ...) ; processing (DEFDFUN CURRENT-THREAD ...) ; processing (DEFDFUN THREADP ...) ; processing (DEFDFUN THREAD-NAME ...) ; processing (DEFDFUN LOCK-P ...) ; processing (DEFDFUN RECURSIVE-LOCK-P ...) ; processing (DEFDFUN MAKE-LOCK ...) ; processing (DEFDFUN ACQUIRE-LOCK ...) ; processing (DEFDFUN RELEASE-LOCK ...) ; processing (DEFDMACRO WITH-LOCK-HELD ...) ; processing (DEFDFUN MAKE-RECURSIVE-LOCK ...) ; processing (DEFDFUN ACQUIRE-RECURSIVE-LOCK ...) ; processing (DEFDFUN RELEASE-RECURSIVE-LOCK ...) ; processing (DEFDMACRO WITH-RECURSIVE-LOCK-HELD ...) ; processing (DEFDFUN THREAD-YIELD ...) ; processing (DEFDFUN MAKE-CONDITION-VARIABLE ...) ; processing (DEFDFUN CONDITION-WAIT ...) ; processing (DEFDFUN CONDITION-NOTIFY ...) ; processing (DEFDFUN MAKE-SEMAPHORE ...) ; processing (DEFDFUN SIGNAL-SEMAPHORE ...) ; processing (DEFDFUN WAIT-ON-SEMAPHORE ...) ; processing (DEFDFUN SEMAPHORE-P ...) ; processing (DEFDFUN ALL-THREADS ...) ; processing (DEFDFUN INTERRUPT-THREAD ...) ; processing (DEFDFUN DESTROY-THREAD ...) ; processing (DEFDFUN THREAD-ALIVE-P ...) ; processing (DEFDFUN JOIN-THREAD ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/bordeaux-threads/src/default-implementations-tmpJQDKAVAY.fasl ; compilation finished in 0:00:00.567 ; compiling file "/usr/share/common-lisp/source/trivial-garbage/trivial-garbage.lisp" (written 31 JUL 2020 12:06:58 PM): ; processing (DEFPACKAGE #:TRIVIAL-GARBAGE ...) ; processing (IN-PACKAGE #:TRIVIAL-GARBAGE) ; processing (DEFUN GC ...) ; processing (DEFUN MAKE-WEAK-POINTER ...) ; processing (DEFUN WEAK-POINTER-P ...) ; processing (DEFUN WEAK-POINTER-VALUE ...) ; processing (DEFUN WEAKNESS-KEYWORD-ARG ...) ; processing (DEFVAR *WEAKNESS-WARNINGS* ...) ; processing (DEFUN WEAKNESS-MISSING ...) ; processing (DEFUN WEAKNESS-KEYWORD-OPT ...) ; processing (DEFUN MAKE-WEAK-HASH-TABLE ...) ; processing (DEFUN MAKE-HASH-TABLE ...) ; processing (DEFUN HASH-TABLE-WEAKNESS ...) ; processing (DEFUN FINALIZE ...) ; processing (DEFUN CANCEL-FINALIZATION ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/trivial-garbage/trivial-garbage-tmp3I8CEEQY.fasl ; compilation finished in 0:00:00.183 ; compiling file "/usr/share/common-lisp/source/cl+ssl/src/package.lisp" (written 09 JUN 2020 04:49:50 AM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE :CL+SSL ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl+ssl/src/package-tmpA3RHFLWZ.fasl ; compilation finished in 0:00:00.007 ; compiling file "/usr/share/common-lisp/source/cl+ssl/src/reload.lisp" (written 09 JUN 2020 04:49:50 AM): ; processing (IN-PACKAGE :CL+SSL) ; processing (CFFI:DEFINE-FOREIGN-LIBRARY LIBCRYPTO ...) ; processing (CFFI:DEFINE-FOREIGN-LIBRARY LIBSSL ...) ; processing (UNLESS (MEMBER :CL+SSL-FOREIGN-LIBS-ALREADY-LOADED ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl+ssl/src/reload-tmpYZIB7VXO.fasl ; compilation finished in 0:00:00.007 ; compiling file "/usr/share/common-lisp/source/cl+ssl/src/conditions.lisp" (written 09 JUN 2020 04:49:50 AM): ; processing (IN-PACKAGE :CL+SSL) ; processing (DEFCONSTANT +SSL-ERROR-NONE+ ...) ; processing (DEFCONSTANT +SSL-ERROR-SSL+ ...) ; processing (DEFCONSTANT +SSL-ERROR-WANT-READ+ ...) ; processing (DEFCONSTANT +SSL-ERROR-WANT-WRITE+ ...) ; processing (DEFCONSTANT +SSL-ERROR-WANT-X509-LOOKUP+ ...) ; processing (DEFCONSTANT +SSL-ERROR-SYSCALL+ ...) ; processing (DEFCONSTANT +SSL-ERROR-ZERO-RETURN+ ...) ; processing (DEFCONSTANT +SSL-ERROR-WANT-CONNECT+ ...) ; processing (DEFUN READ-SSL-ERROR-QUEUE ...) ; processing (DEFUN FORMAT-SSL-ERROR-QUEUE ...) ; processing (DEFINE-CONDITION CL+SSL-ERROR ...) ; processing (DEFINE-CONDITION SSL-ERROR ...) ; processing (DEFINE-CONDITION SSL-ERROR/HANDLE ...) ; processing (DEFINE-CONDITION SSL-ERROR-INITIALIZE ...) ; processing (DEFINE-CONDITION SSL-ERROR-WANT-SOMETHING ...) ; processing (DEFINE-CONDITION SSL-ERROR-NONE ...) ; processing (DEFINE-CONDITION SSL-ERROR-ZERO-RETURN ...) ; processing (DEFINE-CONDITION SSL-ERROR-WANT-READ ...) ; processing (DEFINE-CONDITION SSL-ERROR-WANT-WRITE ...) ; processing (DEFINE-CONDITION SSL-ERROR-WANT-CONNECT ...) ; processing (DEFINE-CONDITION SSL-ERROR-WANT-X509-LOOKUP ...) ; processing (DEFINE-CONDITION SSL-ERROR-SYSCALL ...) ; processing (DEFINE-CONDITION SSL-ERROR-SSL ...) ; processing (DEFUN SSL-SIGNAL-ERROR ...) ; processing (DEFPARAMETER *SSL-VERIFY-ERROR-ALIST* ...) ; processing (DEFUN SSL-VERIFY-ERROR-KEYWORD ...) ; processing (DEFUN SSL-VERIFY-ERROR-CODE ...) ; processing (DEFINE-CONDITION SSL-ERROR-VERIFY ...) ; processing (DEFINE-CONDITION SSL-ERROR-CALL ...) ; processing (DEFINE-CONDITION ASN1-ERROR ...) ; processing (DEFINE-CONDITION INVALID-ASN1-STRING ...) ; processing (DEFINE-CONDITION SERVER-CERTIFICATE-MISSING ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl+ssl/src/conditions-tmpR8PK79V8.fasl ; compilation finished in 0:00:00.379 ; compiling file "/usr/share/common-lisp/source/cl+ssl/src/ffi.lisp" (written 09 JUN 2020 04:49:50 AM): ; processing (IN-PACKAGE :CL+SSL) ; processing (DEFPARAMETER *LATE-BOUND-FOREIGN-FUNCTION-POINTERS* ...) ; processing (DEFMACRO DEFCFUN-LATE-BOUND ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFMACRO DEFCFUN-LATE-BOUND ; (LENGTH CL+SSL::NAME-AND-OPTIONS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; processing (DEFMACRO DEFCFUN-VERSIONED ...) ; processing (DEFVAR *CL+SSL-SSL-FOREIGN-FUNCTION-NAMES* ...) ; processing (DEFVAR *CL+SSL-CRYPTO-FOREIGN-FUNCTION-NAMES* ...) ; processing (DEFMACRO DEFINE-SSL-FUNCTION-EX ...) ; processing (DEFMACRO DEFINE-SSL-FUNCTION ...) ; processing (DEFMACRO DEFINE-CRYPTO-FUNCTION-EX ...) ; processing (DEFMACRO DEFINE-CRYPTO-FUNCTION ...) ; processing (DEFVAR *SSL-GLOBAL-CONTEXT* ...) ; processing (DEFVAR *SSL-GLOBAL-METHOD* ...) ; processing (DEFVAR *BIO-LISP-METHOD* ...) ; processing (DEFPARAMETER *BLOCKP* ...) ; processing (DEFPARAMETER *PARTIAL-READ-P* ...) ; processing (DEFUN SSL-INITIALIZED-P ...) ; processing (DEFCONSTANT +SSL-FILETYPE-PEM+ ...) ; processing (DEFCONSTANT +SSL-FILETYPE-ASN1+ ...) ; processing (DEFCONSTANT +SSL-FILETYPE-DEFAULT+ ...) ; processing (DEFCONSTANT +SSL-CTRL-OPTIONS+ ...) ; processing (DEFCONSTANT +SSL_CTRL_SET_SESS_CACHE_MODE+ ...) ; processing (DEFCONSTANT +SSL_CTRL_MODE+ ...) ; processing (DEFCONSTANT +SSL_MODE_ACCEPT_MOVING_WRITE_BUFFER+ ...) ; processing (DEFCONSTANT +RSA_F4+ ...) ; processing (DEFCONSTANT +SSL-SESS-CACHE-OFF+ ...) ; processing (DEFCONSTANT +SSL-SESS-CACHE-CLIENT+ ...) ; processing (DEFCONSTANT +SSL-SESS-CACHE-SERVER+ ...) ; processing (DEFCONSTANT +SSL-SESS-CACHE-BOTH+ ...) ; processing (DEFCONSTANT +SSL-SESS-CACHE-NO-AUTO-CLEAR+ ...) ; processing (DEFCONSTANT +SSL-SESS-CACHE-NO-INTERNAL-LOOKUP+ ...) ; processing (DEFCONSTANT +SSL-SESS-CACHE-NO-INTERNAL-STORE+ ...) ; processing (DEFCONSTANT +SSL-SESS-CACHE-NO-INTERNAL+ ...) ; processing (DEFCONSTANT +SSL-VERIFY-NONE+ ...) ; processing (DEFCONSTANT +SSL-VERIFY-PEER+ ...) ; processing (DEFCONSTANT +SSL-VERIFY-FAIL-IF-NO-PEER-CERT+ ...) ; processing (DEFCONSTANT +SSL-VERIFY-CLIENT-ONCE+ ...) ; processing (DEFCONSTANT +SSL-OP-ALL+ ...) ; processing (DEFCONSTANT +SSL-OP-NO-SSLV2+ ...) ; processing (DEFCONSTANT +SSL-OP-NO-SSLV3+ ...) ; processing (DEFCONSTANT +SSL-OP-NO-TLSV1+ ...) ; processing (DEFCONSTANT +SSL-OP-NO-TLSV1-2+ ...) ; processing (DEFCONSTANT +SSL-OP-NO-TLSV1-1+ ...) ; processing (DEFVAR *TMP-RSA-KEY-512* ...) ; processing (DEFVAR *TMP-RSA-KEY-1024* ...) ; processing (DEFVAR *TMP-RSA-KEY-2048* ...) ; processing (DEFMACRO WHILE ...) ; processing (CFFI:DEFCFUN ("close" CLOSE-SOCKET) ...) ; processing (DECLAIM (INLINE SSL-WRITE ...)) ; processing (CFFI:DEFCTYPE SSL-METHOD ...) ; processing (CFFI:DEFCTYPE SSL-CTX ...) ; processing (CFFI:DEFCTYPE SSL-POINTER ...) ; processing (DEFINE-CRYPTO-FUNCTION-EX (:VANISHED "1.1.0") ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-CRYPTO-FUNCTION-EX (:VANISHED "1.1.0") ; (CL+SSL::DEFINE-CRYPTO-FUNCTION-EX (:VANISHED "1.1.0") ; ("SSLeay" CL+SSL::SSL-EAY) :LONG) ; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-EAY ; NIL ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SSL-EAY ; (CFFI-SYS:%FOREIGN-FUNCALL "SSLeay" (:LONG) :CONVENTION :CDECL :LIBRARY ; :DEFAULT))) ; ; note: doing signed word to integer coercion (cost 20) to "" ; processing (DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0") ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0") ; (CL+SSL::DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0") ; ("OpenSSL_version_num" ; CL+SSL::OPENSSL-VERSION-NUM) ; :LONG) ; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::OPENSSL-VERSION-NUM ; NIL ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::OPENSSL-VERSION-NUM ; (CFFI-SYS:%FOREIGN-FUNCALL "OpenSSL_version_num" (:LONG) :CONVENTION ; :CDECL :LIBRARY :DEFAULT))) ; ; note: doing signed word to integer coercion (cost 20) to "" ; processing (DEFUN COMPAT-OPENSSL-VERSION ...) ; processing (DEFUN ENCODE-OPENSSL-VERSION ...) ; processing (DEFUN OPENSSL-IS-AT-LEAST ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFUN OPENSSL-IS-AT-LEAST ; (>= (CL+SSL::COMPAT-OPENSSL-VERSION) ; (CL+SSL::ENCODE-OPENSSL-VERSION CL+SSL::MAJOR CL+SSL::MINOR CL+SSL::PATCH ; CL+SSL::PRERELEASE)) ; ; 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 * 8.15792463d8) ; (SINGLE-FLOAT * 8.1579245e8) ; (RATIONAL * 815792463)), not a FLOAT. ; ; 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 first argument is a REAL, not a FIXNUM. ; processing (DEFUN OPENSSL-IS-NOT-EVEN ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFUN OPENSSL-IS-NOT-EVEN ; (< (CL+SSL::COMPAT-OPENSSL-VERSION) ; (CL+SSL::ENCODE-OPENSSL-VERSION CL+SSL::MAJOR CL+SSL::MINOR CL+SSL::PATCH ; CL+SSL::PRERELEASE)) ; ; 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 4) because: ; The first argument is a REAL, not a FIXNUM. ; processing (DEFUN LIBRESSLP ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFUN LIBRESSLP ; (= 536870912 (CL+SSL::COMPAT-OPENSSL-VERSION)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a 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. ; processing (DEFINE-SSL-FUNCTION ("SSL_get_version" SSL-GET-VERSION) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-SSL-FUNCTION ("SSL_get_version" SSL-GET-VERSION) ; (CL+SSL::DEFINE-SSL-FUNCTION ("SSL_get_version" CL+SSL::SSL-GET-VERSION) ; :STRING (CL+SSL::SSL CL+SSL::SSL-POINTER)) ; --> CL+SSL::DEFINE-SSL-FUNCTION-EX PROGN CL+SSL::DEFCFUN-VERSIONED ; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN ; --> SB-INT:NAMED-LAMBDA FUNCTION BLOCK LET ; ==> ; (CFFI:TRANSLATE-FROM-FOREIGN ; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_get_version" (:POINTER #:G0 :POINTER) ; :CONVENTION :CDECL :LIBRARY CL+SSL::LIBSSL) ; #) ; ; note: doing SAP to pointer coercion (cost 20) ; processing (DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ...) ; processing (DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ...) ; processing (DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ; (CL+SSL::DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ; ("SSLv23_client_method" ; CL+SSL::SSL-V23-CLIENT-METHOD) ; CL+SSL::SSL-METHOD) ; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-V23-CLIENT-METHOD ; NIL ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SSL-V23-CLIENT-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "SSLv23_client_method" (:POINTER) ; :CONVENTION :CDECL :LIBRARY CL+SSL::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ; (CL+SSL::DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ; ("SSLv23_server_method" ; CL+SSL::SSL-V23-SERVER-METHOD) ; CL+SSL::SSL-METHOD) ; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-V23-SERVER-METHOD ; NIL ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SSL-V23-SERVER-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "SSLv23_server_method" (:POINTER) ; :CONVENTION :CDECL :LIBRARY CL+SSL::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ; (CL+SSL::DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ; ("SSLv23_method" CL+SSL::SSL-V23-METHOD) ; CL+SSL::SSL-METHOD) ; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-V23-METHOD ; NIL ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SSL-V23-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "SSLv23_method" (:POINTER) :CONVENTION ; :CDECL :LIBRARY CL+SSL::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ; (CL+SSL::DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ; ("SSLv3_client_method" ; CL+SSL::SSL-V3-CLIENT-METHOD) ; CL+SSL::SSL-METHOD) ; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-V3-CLIENT-METHOD ; NIL ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SSL-V3-CLIENT-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "SSLv3_client_method" (:POINTER) :CONVENTION ; :CDECL :LIBRARY CL+SSL::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ; (CL+SSL::DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ; ("SSLv3_server_method" ; CL+SSL::SSL-V3-SERVER-METHOD) ; CL+SSL::SSL-METHOD) ; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-V3-SERVER-METHOD ; NIL ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SSL-V3-SERVER-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "SSLv3_server_method" (:POINTER) :CONVENTION ; :CDECL :LIBRARY CL+SSL::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ; (CL+SSL::DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ; ("SSLv3_method" CL+SSL::SSL-V3-METHOD) ; CL+SSL::SSL-METHOD) ; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-V3-METHOD ; NIL ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SSL-V3-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "SSLv3_method" (:POINTER) :CONVENTION :CDECL ; :LIBRARY CL+SSL::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-SSL-FUNCTION ("TLSv1_client_method" SSL-TLSV1-CLIENT-METHOD) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-SSL-FUNCTION ("TLSv1_client_method" SSL-TLSV1-CLIENT-METHOD) ; (CL+SSL::DEFINE-SSL-FUNCTION ; ("TLSv1_client_method" CL+SSL::SSL-TLSV1-CLIENT-METHOD) CL+SSL::SSL-METHOD) ; --> CL+SSL::DEFINE-SSL-FUNCTION-EX PROGN CL+SSL::DEFCFUN-VERSIONED ; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN ; --> SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-CLIENT-METHOD ; NIL ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SSL-TLSV1-CLIENT-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_client_method" (:POINTER) :CONVENTION ; :CDECL :LIBRARY CL+SSL::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-SSL-FUNCTION ("TLSv1_server_method" SSL-TLSV1-SERVER-METHOD) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-SSL-FUNCTION ("TLSv1_server_method" SSL-TLSV1-SERVER-METHOD) ; (CL+SSL::DEFINE-SSL-FUNCTION ; ("TLSv1_server_method" CL+SSL::SSL-TLSV1-SERVER-METHOD) CL+SSL::SSL-METHOD) ; --> CL+SSL::DEFINE-SSL-FUNCTION-EX PROGN CL+SSL::DEFCFUN-VERSIONED ; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN ; --> SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-SERVER-METHOD ; NIL ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SSL-TLSV1-SERVER-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_server_method" (:POINTER) :CONVENTION ; :CDECL :LIBRARY CL+SSL::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-SSL-FUNCTION ("TLSv1_method" SSL-TLSV1-METHOD) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-SSL-FUNCTION ("TLSv1_method" SSL-TLSV1-METHOD) ; (CL+SSL::DEFINE-SSL-FUNCTION ("TLSv1_method" CL+SSL::SSL-TLSV1-METHOD) ; CL+SSL::SSL-METHOD) ; --> CL+SSL::DEFINE-SSL-FUNCTION-EX PROGN CL+SSL::DEFCFUN-VERSIONED ; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN ; --> SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-METHOD ; NIL ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SSL-TLSV1-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_method" (:POINTER) :CONVENTION :CDECL ; :LIBRARY CL+SSL::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2") ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2") ; (CL+SSL::DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2") ; ("TLSv1_1_client_method" ; CL+SSL::SSL-TLSV1-1-CLIENT-METHOD) ; CL+SSL::SSL-METHOD) ; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-1-CLIENT-METHOD ; NIL ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SSL-TLSV1-1-CLIENT-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_1_client_method" (:POINTER) ; :CONVENTION :CDECL :LIBRARY CL+SSL::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2") ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2") ; (CL+SSL::DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2") ; ("TLSv1_1_server_method" ; CL+SSL::SSL-TLSV1-1-SERVER-METHOD) ; CL+SSL::SSL-METHOD) ; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-1-SERVER-METHOD ; NIL ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SSL-TLSV1-1-SERVER-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_1_server_method" (:POINTER) ; :CONVENTION :CDECL :LIBRARY CL+SSL::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2") ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2") ; (CL+SSL::DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2") ; ("TLSv1_1_method" CL+SSL::SSL-TLSV1-1-METHOD) ; CL+SSL::SSL-METHOD) ; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-1-METHOD ; NIL ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SSL-TLSV1-1-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_1_method" (:POINTER) :CONVENTION ; :CDECL :LIBRARY CL+SSL::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2") ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2") ; (CL+SSL::DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2") ; ("TLSv1_2_client_method" ; CL+SSL::SSL-TLSV1-2-CLIENT-METHOD) ; CL+SSL::SSL-METHOD) ; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-2-CLIENT-METHOD ; NIL ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SSL-TLSV1-2-CLIENT-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_2_client_method" (:POINTER) ; :CONVENTION :CDECL :LIBRARY CL+SSL::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2") ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2") ; (CL+SSL::DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2") ; ("TLSv1_2_server_method" ; CL+SSL::SSL-TLSV1-2-SERVER-METHOD) ; CL+SSL::SSL-METHOD) ; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-2-SERVER-METHOD ; NIL ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SSL-TLSV1-2-SERVER-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_2_server_method" (:POINTER) ; :CONVENTION :CDECL :LIBRARY CL+SSL::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2") ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2") ; (CL+SSL::DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2") ; ("TLSv1_2_method" CL+SSL::SSL-TLSV1-2-METHOD) ; CL+SSL::SSL-METHOD) ; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-2-METHOD ; NIL ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SSL-TLSV1-2-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_2_method" (:POINTER) :CONVENTION ; :CDECL :LIBRARY CL+SSL::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-SSL-FUNCTION-EX (:SINCE "1.1.0") ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-SSL-FUNCTION-EX (:SINCE "1.1.0") ; (CL+SSL::DEFINE-SSL-FUNCTION-EX (:SINCE "1.1.0") ; ("TLS_method" CL+SSL::TLS-METHOD) ; CL+SSL::SSL-METHOD) ; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::TLS-METHOD ; NIL ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::TLS-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "TLS_method" (:POINTER) :CONVENTION :CDECL ; :LIBRARY CL+SSL::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_new" SSL-CTX-NEW) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-SSL-FUNCTION ("SSL_CTX_new" SSL-CTX-NEW) ; (CL+SSL::DEFINE-SSL-FUNCTION ("SSL_CTX_new" CL+SSL::SSL-CTX-NEW) ; CL+SSL::SSL-CTX (METHOD CL+SSL::SSL-METHOD)) ; --> CL+SSL::DEFINE-SSL-FUNCTION-EX PROGN CL+SSL::DEFCFUN-VERSIONED ; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN ; --> SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-CTX-NEW ; (METHOD) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SSL-CTX-NEW ; (LET ((#:G0 METHOD)) ; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_CTX_new" (:POINTER #:G0 :POINTER) ; :CONVENTION :CDECL :LIBRARY ; CL+SSL::LIBSSL)))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-SSL-FUNCTION ("SSL_new" SSL-NEW) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-SSL-FUNCTION ("SSL_new" SSL-NEW) ; (CL+SSL::DEFINE-SSL-FUNCTION ("SSL_new" CL+SSL::SSL-NEW) CL+SSL::SSL-POINTER ; (CL+SSL::CTX CL+SSL::SSL-CTX)) ; --> CL+SSL::DEFINE-SSL-FUNCTION-EX PROGN CL+SSL::DEFCFUN-VERSIONED ; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN ; --> SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-NEW ; (CL+SSL::CTX) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SSL-NEW ; (LET ((#:G0 CL+SSL::CTX)) ; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_new" (:POINTER #:G0 :POINTER) ; :CONVENTION :CDECL :LIBRARY ; CL+SSL::LIBSSL)))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-SSL-FUNCTION ("SSL_get_fd" SSL-GET-FD) ...) ; processing (DEFINE-SSL-FUNCTION ("SSL_set_fd" SSL-SET-FD) ...) ; processing (DEFINE-SSL-FUNCTION ("SSL_set_bio" SSL-SET-BIO) ...) ; processing (DEFINE-SSL-FUNCTION ("SSL_get_error" SSL-GET-ERROR) ...) ; processing (DEFINE-SSL-FUNCTION ("SSL_set_connect_state" SSL-SET-CONNECT-STATE) ...) ; processing (DEFINE-SSL-FUNCTION ("SSL_set_accept_state" SSL-SET-ACCEPT-STATE) ...) ; processing (DEFINE-SSL-FUNCTION ("SSL_connect" SSL-CONNECT) ...) ; processing (DEFINE-SSL-FUNCTION ("SSL_accept" SSL-ACCEPT) ...) ; processing (DEFINE-SSL-FUNCTION ("SSL_write" SSL-WRITE) ...) ; processing (DEFINE-SSL-FUNCTION ("SSL_read" SSL-READ) ...) ; processing (DEFINE-SSL-FUNCTION ("SSL_shutdown" SSL-SHUTDOWN) ...) ; processing (DEFINE-SSL-FUNCTION ("SSL_free" SSL-FREE) ...) ; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_free" SSL-CTX-FREE) ...) ; processing (DEFINE-CRYPTO-FUNCTION ("BIO_ctrl" BIO-SET-FD) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-CRYPTO-FUNCTION ("BIO_ctrl" BIO-SET-FD) ; (CL+SSL::DEFINE-CRYPTO-FUNCTION ("BIO_ctrl" CL+SSL::BIO-SET-FD) :LONG ; (CL+SSL::BIO :POINTER) (CL+SSL::CMD :INT) ; (CL+SSL::LARG :LONG) (CL+SSL::PARG :POINTER)) ; --> CL+SSL::DEFINE-CRYPTO-FUNCTION-EX PROGN CL+SSL::DEFCFUN-VERSIONED ; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN ; --> SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::BIO-SET-FD ; (CL+SSL::BIO CL+SSL::CMD CL+SSL::LARG CL+SSL::PARG) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::BIO-SET-FD ; (LET ((#:G0 CL+SSL::BIO)) ; (LET (#) ; (LET # ; #))))) ; ; note: doing signed word to integer coercion (cost 20) to "" ; processing (DEFINE-CRYPTO-FUNCTION ("BIO_new_socket" BIO-NEW-SOCKET) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-CRYPTO-FUNCTION ("BIO_new_socket" BIO-NEW-SOCKET) ; (CL+SSL::DEFINE-CRYPTO-FUNCTION ("BIO_new_socket" CL+SSL::BIO-NEW-SOCKET) ; :POINTER (CL+SSL::FD :INT) ; (CL+SSL::CLOSE-FLAG :INT)) ; --> CL+SSL::DEFINE-CRYPTO-FUNCTION-EX PROGN CL+SSL::DEFCFUN-VERSIONED ; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN ; --> SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::BIO-NEW-SOCKET ; (CL+SSL::FD CL+SSL::CLOSE-FLAG) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::BIO-NEW-SOCKET ; (LET ((#:G0 CL+SSL::FD)) ; (LET (#) ; (CFFI-SYS:%FOREIGN-FUNCALL "BIO_new_socket" # :CONVENTION :CDECL ; :LIBRARY :DEFAULT))))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-CRYPTO-FUNCTION ("BIO_new" BIO-NEW) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-CRYPTO-FUNCTION ("BIO_new" BIO-NEW) ; (CL+SSL::DEFINE-CRYPTO-FUNCTION ("BIO_new" CL+SSL::BIO-NEW) :POINTER ; (METHOD :POINTER)) ; --> CL+SSL::DEFINE-CRYPTO-FUNCTION-EX PROGN CL+SSL::DEFCFUN-VERSIONED ; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN ; --> SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::BIO-NEW ; (METHOD) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::BIO-NEW ; (LET ((#:G0 METHOD)) ; (CFFI-SYS:%FOREIGN-FUNCALL "BIO_new" (:POINTER #:G0 :POINTER) ; :CONVENTION :CDECL :LIBRARY :DEFAULT)))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-CRYPTO-FUNCTION ("ERR_get_error" ERR-GET-ERROR) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-CRYPTO-FUNCTION ("ERR_get_error" ERR-GET-ERROR) ; (CL+SSL::DEFINE-CRYPTO-FUNCTION ("ERR_get_error" CL+SSL::ERR-GET-ERROR) ; :UNSIGNED-LONG) ; --> CL+SSL::DEFINE-CRYPTO-FUNCTION-EX PROGN CL+SSL::DEFCFUN-VERSIONED ; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN ; --> SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::ERR-GET-ERROR ; NIL ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::ERR-GET-ERROR ; (CFFI-SYS:%FOREIGN-FUNCALL "ERR_get_error" (:UNSIGNED-LONG) :CONVENTION ; :CDECL :LIBRARY :DEFAULT))) ; ; note: doing unsigned word to integer coercion (cost 20) to "" ; processing (DEFINE-CRYPTO-FUNCTION ("ERR_error_string" ERR-ERROR-STRING) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-CRYPTO-FUNCTION ("ERR_error_string" ERR-ERROR-STRING) ; (CL+SSL::DEFINE-CRYPTO-FUNCTION ("ERR_error_string" CL+SSL::ERR-ERROR-STRING) ; :STRING (CL+SSL::E :UNSIGNED-LONG) ; (CL+SSL::BUF :POINTER)) ; --> CL+SSL::DEFINE-CRYPTO-FUNCTION-EX PROGN CL+SSL::DEFCFUN-VERSIONED ; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN ; --> SB-INT:NAMED-LAMBDA FUNCTION BLOCK LET LET ; ==> ; (CFFI:TRANSLATE-FROM-FOREIGN ; (CFFI-SYS:%FOREIGN-FUNCALL "ERR_error_string" ; (:UNSIGNED-LONG #:G0 :POINTER #:G1 :POINTER) ; :CONVENTION :CDECL :LIBRARY :DEFAULT) ; #) ; ; note: doing SAP to pointer coercion (cost 20) ; processing (DEFINE-SSL-FUNCTION ("SSL_set_cipher_list" SSL-SET-CIPHER-LIST) ...) ; processing (DEFINE-SSL-FUNCTION ("SSL_use_RSAPrivateKey_file" SSL-USE-RSA-PRIVATEKEY-FILE) ...) ; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_use_RSAPrivateKey_file" SSL-CTX-USE-RSA-PRIVATEKEY-FILE) ...) ; processing (DEFINE-SSL-FUNCTION ("SSL_use_PrivateKey_file" SSL-USE-PRIVATEKEY-FILE) ...) ; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_use_PrivateKey_file" SSL-CTX-USE-PRIVATEKEY-FILE) ...) ; processing (DEFINE-SSL-FUNCTION ("SSL_use_certificate_file" SSL-USE-CERTIFICATE-FILE) ...) ; processing (DEFUN SSL-CTX-SET-OPTIONS ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFUN SSL-CTX-SET-OPTIONS ; (CL+SSL::SSL-CTX-CTRL CL+SSL::CTX CL+SSL::+SSL-CTRL-OPTIONS+ CL+SSL::OPTIONS ; (CFFI-SYS:NULL-POINTER)) ; ; note: doing SAP to pointer coercion (cost 20) ; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_set_cipher_list" SSL-CTX-SET-CIPHER-LIST%) ...) ; processing (DEFUN SSL-CTX-SET-CIPHER-LIST ...) ; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_use_certificate_chain_file" SSL-CTX-USE-CERTIFICATE-CHAIN-FILE) ...) ; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_load_verify_locations" SSL-CTX-LOAD-VERIFY-LOCATIONS) ...) ; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_set_client_CA_list" SSL-CTX-SET-CLIENT-CA-LIST) ...) ; processing (DEFINE-SSL-FUNCTION ("SSL_load_client_CA_file" SSL-LOAD-CLIENT-CA-FILE) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: ; DEFINE-SSL-FUNCTION ("SSL_load_client_CA_file" SSL-LOAD-CLIENT-CA-FILE) ; (CL+SSL::DEFINE-SSL-FUNCTION ; ("SSL_load_client_CA_file" CL+SSL::SSL-LOAD-CLIENT-CA-FILE) ; CL+SSL::SSL-POINTER (CL+SSL::FILE :STRING)) ; --> CL+SSL::DEFINE-SSL-FUNCTION-EX PROGN CL+SSL::DEFCFUN-VERSIONED ; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN ; --> SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-LOAD-CLIENT-CA-FILE ; (CL+SSL::FILE) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SSL-LOAD-CLIENT-CA-FILE ; (MULTIPLE-VALUE-BIND (#:G0 #:PARAM1) ; (CFFI:TRANSLATE-TO-FOREIGN CL+SSL::FILE ; #) ; (UNWIND-PROTECT (PROGN #) ; (CFFI:FREE-TRANSLATED-OBJECT #:G0 # #:PARAM1))))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_ctrl" SSL-CTX-CTRL) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-SSL-FUNCTION ("SSL_CTX_ctrl" SSL-CTX-CTRL) ; (CL+SSL::DEFINE-SSL-FUNCTION ("SSL_CTX_ctrl" CL+SSL::SSL-CTX-CTRL) :LONG ; (CL+SSL::CTX CL+SSL::SSL-CTX) (CL+SSL::CMD :INT) ; (CL+SSL::LARG :UNSIGNED-LONG) ; (CL+SSL::PARG :POINTER)) ; --> CL+SSL::DEFINE-SSL-FUNCTION-EX PROGN CL+SSL::DEFCFUN-VERSIONED ; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN ; --> SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-CTX-CTRL ; (CL+SSL::CTX CL+SSL::CMD CL+SSL::LARG CL+SSL::PARG) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SSL-CTX-CTRL ; (LET ((#:G0 CL+SSL::CTX)) ; (LET (#) ; (LET # ; #))))) ; ; note: doing signed word to integer coercion (cost 20) to "" ; processing (DEFINE-SSL-FUNCTION ("SSL_ctrl" SSL-CTRL) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-SSL-FUNCTION ("SSL_ctrl" SSL-CTRL) ; (CL+SSL::DEFINE-SSL-FUNCTION ("SSL_ctrl" CL+SSL::SSL-CTRL) :LONG ; (CL+SSL::SSL :POINTER) (CL+SSL::CMD :INT) ; (CL+SSL::LARG :LONG) (CL+SSL::PARG :POINTER)) ; --> CL+SSL::DEFINE-SSL-FUNCTION-EX PROGN CL+SSL::DEFCFUN-VERSIONED ; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN ; --> SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-CTRL ; (CL+SSL::SSL CL+SSL::CMD CL+SSL::LARG CL+SSL::PARG) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SSL-CTRL ; (LET ((#:G0 CL+SSL::SSL)) ; (LET (#) ; (LET # ; #))))) ; ; note: doing signed word to integer coercion (cost 20) to "" ; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_set_default_passwd_cb" SSL-CTX-SET-DEFAULT-PASSWD-CB) ...) ; processing (DEFINE-CRYPTO-FUNCTION-EX (:VANISHED "1.1.0") ...) ; processing (DEFINE-CRYPTO-FUNCTION-EX (:VANISHED "1.1.0") ...) ; processing (DEFINE-CRYPTO-FUNCTION-EX (:VANISHED "1.1.0") ...) ; processing (DEFINE-CRYPTO-FUNCTION ("RAND_seed" RAND-SEED) ...) ; processing (DEFINE-CRYPTO-FUNCTION ("RAND_bytes" RAND-BYTES) ...) ; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_set_verify_depth" SSL-CTX-SET-VERIFY-DEPTH) ...) ; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_set_verify" SSL-CTX-SET-VERIFY) ...) ; processing (DEFINE-SSL-FUNCTION ("SSL_get_verify_result" SSL-GET-VERIFY-RESULT) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-SSL-FUNCTION ("SSL_get_verify_result" SSL-GET-VERIFY-RESULT) ; (CL+SSL::DEFINE-SSL-FUNCTION ; ("SSL_get_verify_result" CL+SSL::SSL-GET-VERIFY-RESULT) :LONG ; (CL+SSL::SSL CL+SSL::SSL-POINTER)) ; --> CL+SSL::DEFINE-SSL-FUNCTION-EX PROGN CL+SSL::DEFCFUN-VERSIONED ; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN ; --> SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-GET-VERIFY-RESULT ; (CL+SSL::SSL) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SSL-GET-VERIFY-RESULT ; (LET ((#:G0 CL+SSL::SSL)) ; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_get_verify_result" ; (:POINTER #:G0 :LONG) :CONVENTION :CDECL ; :LIBRARY CL+SSL::LIBSSL)))) ; ; note: doing signed word to integer coercion (cost 20) to "" ; processing (DEFINE-SSL-FUNCTION ("SSL_get_peer_certificate" SSL-GET-PEER-CERTIFICATE) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: ; DEFINE-SSL-FUNCTION ("SSL_get_peer_certificate" SSL-GET-PEER-CERTIFICATE) ; (CL+SSL::DEFINE-SSL-FUNCTION ; ("SSL_get_peer_certificate" CL+SSL::SSL-GET-PEER-CERTIFICATE) :POINTER ; (CL+SSL::SSL CL+SSL::SSL-POINTER)) ; --> CL+SSL::DEFINE-SSL-FUNCTION-EX PROGN CL+SSL::DEFCFUN-VERSIONED ; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN ; --> SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-GET-PEER-CERTIFICATE ; (CL+SSL::SSL) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SSL-GET-PEER-CERTIFICATE ; (LET ((#:G0 CL+SSL::SSL)) ; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_get_peer_certificate" ; (:POINTER #:G0 :POINTER) :CONVENTION ; :CDECL :LIBRARY CL+SSL::LIBSSL)))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-CRYPTO-FUNCTION ("X509_free" X509-FREE) ...) ; processing (DEFINE-CRYPTO-FUNCTION ("X509_NAME_oneline" X509-NAME-ONELINE) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-CRYPTO-FUNCTION ("X509_NAME_oneline" X509-NAME-ONELINE) ; (CL+SSL::DEFINE-CRYPTO-FUNCTION ; ("X509_NAME_oneline" CL+SSL::X509-NAME-ONELINE) :POINTER ; (CL+SSL::X509-NAME :POINTER) (CL+SSL::BUF :POINTER) (CL+SSL::SIZE :INT)) ; --> CL+SSL::DEFINE-CRYPTO-FUNCTION-EX PROGN CL+SSL::DEFCFUN-VERSIONED ; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN ; --> SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::X509-NAME-ONELINE ; (CL+SSL::X509-NAME CL+SSL::BUF CL+SSL::SIZE) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::X509-NAME-ONELINE ; (LET ((#:G0 CL+SSL::X509-NAME)) ; (LET (#) ; (LET # ; #))))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-CRYPTO-FUNCTION ("X509_NAME_get_index_by_NID" X509-NAME-GET-INDEX-BY-NID) ...) ; processing (DEFINE-CRYPTO-FUNCTION ("X509_NAME_get_entry" X509-NAME-GET-ENTRY) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-CRYPTO-FUNCTION ("X509_NAME_get_entry" X509-NAME-GET-ENTRY) ; (CL+SSL::DEFINE-CRYPTO-FUNCTION ; ("X509_NAME_get_entry" CL+SSL::X509-NAME-GET-ENTRY) :POINTER ; (CL+SSL::NAME :POINTER) (LOG :INT)) ; --> CL+SSL::DEFINE-CRYPTO-FUNCTION-EX PROGN CL+SSL::DEFCFUN-VERSIONED ; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN ; --> SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::X509-NAME-GET-ENTRY ; (CL+SSL::NAME LOG) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::X509-NAME-GET-ENTRY ; (LET ((#:G0 CL+SSL::NAME)) ; (LET (#) ; (CFFI-SYS:%FOREIGN-FUNCALL "X509_NAME_get_entry" # :CONVENTION ; :CDECL :LIBRARY :DEFAULT))))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-CRYPTO-FUNCTION ("X509_NAME_ENTRY_get_data" X509-NAME-ENTRY-GET-DATA) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: ; DEFINE-CRYPTO-FUNCTION ("X509_NAME_ENTRY_get_data" X509-NAME-ENTRY-GET-DATA) ; (CL+SSL::DEFINE-CRYPTO-FUNCTION ; ("X509_NAME_ENTRY_get_data" CL+SSL::X509-NAME-ENTRY-GET-DATA) :POINTER ; (CL+SSL::NAME-ENTRY :POINTER)) ; --> CL+SSL::DEFINE-CRYPTO-FUNCTION-EX PROGN CL+SSL::DEFCFUN-VERSIONED ; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN ; --> SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::X509-NAME-ENTRY-GET-DATA ; (CL+SSL::NAME-ENTRY) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::X509-NAME-ENTRY-GET-DATA ; (LET ((#:G0 CL+SSL::NAME-ENTRY)) ; (CFFI-SYS:%FOREIGN-FUNCALL "X509_NAME_ENTRY_get_data" ; (:POINTER #:G0 :POINTER) :CONVENTION ; :CDECL :LIBRARY :DEFAULT)))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-CRYPTO-FUNCTION ("X509_get_issuer_name" X509-GET-ISSUER-NAME) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: ; DEFINE-CRYPTO-FUNCTION ("X509_get_issuer_name" X509-GET-ISSUER-NAME) ; (CL+SSL::DEFINE-CRYPTO-FUNCTION ; ("X509_get_issuer_name" CL+SSL::X509-GET-ISSUER-NAME) :POINTER ; (CL+SSL::X509 :POINTER)) ; --> CL+SSL::DEFINE-CRYPTO-FUNCTION-EX PROGN CL+SSL::DEFCFUN-VERSIONED ; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN ; --> SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::X509-GET-ISSUER-NAME ; (CL+SSL::X509) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::X509-GET-ISSUER-NAME ; (LET ((#:G0 CL+SSL::X509)) ; (CFFI-SYS:%FOREIGN-FUNCALL "X509_get_issuer_name" ; (:POINTER #:G0 :POINTER) :CONVENTION ; :CDECL :LIBRARY :DEFAULT)))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-CRYPTO-FUNCTION ("X509_get_subject_name" X509-GET-SUBJECT-NAME) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: ; DEFINE-CRYPTO-FUNCTION ("X509_get_subject_name" X509-GET-SUBJECT-NAME) ; (CL+SSL::DEFINE-CRYPTO-FUNCTION ; ("X509_get_subject_name" CL+SSL::X509-GET-SUBJECT-NAME) :POINTER ; (CL+SSL::X509 :POINTER)) ; --> CL+SSL::DEFINE-CRYPTO-FUNCTION-EX PROGN CL+SSL::DEFCFUN-VERSIONED ; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN ; --> SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::X509-GET-SUBJECT-NAME ; (CL+SSL::X509) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::X509-GET-SUBJECT-NAME ; (LET ((#:G0 CL+SSL::X509)) ; (CFFI-SYS:%FOREIGN-FUNCALL "X509_get_subject_name" ; (:POINTER #:G0 :POINTER) :CONVENTION ; :CDECL :LIBRARY :DEFAULT)))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-CRYPTO-FUNCTION ("X509_get_ext_d2i" X509-GET-EXT-D2I) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-CRYPTO-FUNCTION ("X509_get_ext_d2i" X509-GET-EXT-D2I) ; (CL+SSL::DEFINE-CRYPTO-FUNCTION ("X509_get_ext_d2i" CL+SSL::X509-GET-EXT-D2I) ; :POINTER (CL+SSL::CERT :POINTER) ; (CL+SSL::NID :INT) (CL+SSL::CRIT :POINTER) ; (CL+SSL::IDX :POINTER)) ; --> CL+SSL::DEFINE-CRYPTO-FUNCTION-EX PROGN CL+SSL::DEFCFUN-VERSIONED ; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN ; --> SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::X509-GET-EXT-D2I ; (CL+SSL::CERT CL+SSL::NID CL+SSL::CRIT CL+SSL::IDX) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::X509-GET-EXT-D2I ; (LET ((#:G0 CL+SSL::CERT)) ; (LET (#) ; (LET # ; #))))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-CRYPTO-FUNCTION ("X509_STORE_CTX_get_error" X509-STORE-CTX-GET-ERROR) ...) ; processing (DEFINE-CRYPTO-FUNCTION ("d2i_X509" D2I-X509) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-CRYPTO-FUNCTION ("d2i_X509" D2I-X509) ; (CL+SSL::DEFINE-CRYPTO-FUNCTION ("d2i_X509" CL+SSL::D2I-X509) :POINTER ; (CL+SSL::*PX :POINTER) (CL+SSL::IN :POINTER) ; (CL+SSL::LEN :INT)) ; --> CL+SSL::DEFINE-CRYPTO-FUNCTION-EX PROGN CL+SSL::DEFCFUN-VERSIONED ; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN ; --> SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::D2I-X509 ; (CL+SSL::*PX CL+SSL::IN CL+SSL::LEN) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::D2I-X509 ; (LET ((#:G0 CL+SSL::*PX)) ; (LET (#) ; (LET # ; #))))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFCONSTANT +GEN-OTHERNAME+ ...) ; processing (DEFCONSTANT +GEN-EMAIL+ ...) ; processing (DEFCONSTANT +GEN-DNS+ ...) ; processing (DEFCONSTANT +GEN-X400+ ...) ; processing (DEFCONSTANT +GEN-DIRNAME+ ...) ; processing (DEFCONSTANT +GEN-EDIPARTY+ ...) ; processing (DEFCONSTANT +GEN-URI+ ...) ; processing (DEFCONSTANT +GEN-IPADD+ ...) ; processing (DEFCONSTANT +GEN-RID+ ...) ; processing (DEFCONSTANT +V-ASN1-OCTET-STRING+ ...) ; processing (DEFCONSTANT +V-ASN1-UTF8STRING+ ...) ; processing (DEFCONSTANT +V-ASN1-PRINTABLESTRING+ ...) ; processing (DEFCONSTANT +V-ASN1-TELETEXSTRING+ ...) ; processing (DEFCONSTANT +V-ASN1-IASTRING+ ...) ; processing (DEFCONSTANT +V-ASN1-UNIVERSALSTRING+ ...) ; processing (DEFCONSTANT +V-ASN1-BMPSTRING+ ...) ; processing (DEFCONSTANT +NID-SUBJECT-ALT-NAME+ ...) ; processing (DEFCONSTANT +NID-COMMONNAME+ ...) ; processing (CFFI:DEFCSTRUCT GENERAL-NAME ...) ; processing (DEFINE-CRYPTO-FUNCTION-EX (:VANISHED "1.1.0") ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-CRYPTO-FUNCTION-EX (:VANISHED "1.1.0") ; (CL+SSL::DEFINE-CRYPTO-FUNCTION-EX (:VANISHED "1.1.0") ; ("sk_value" CL+SSL::SK-VALUE) :POINTER ; (CL+SSL::STACK :POINTER) ; (CL+SSL::INDEX :INT)) ; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SK-VALUE ; (CL+SSL::STACK CL+SSL::INDEX) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SK-VALUE ; (LET ((#:G0 CL+SSL::STACK)) ; (LET (#) ; (CFFI-SYS:%FOREIGN-FUNCALL "sk_value" # :CONVENTION :CDECL :LIBRARY ; :DEFAULT))))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-CRYPTO-FUNCTION-EX (:VANISHED "1.1.0") ...) ; processing (DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0") ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0") ; (CL+SSL::DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0") ; ("OPENSSL_sk_value" ; CL+SSL::OPENSSL-SK-VALUE) ; :POINTER (CL+SSL::STACK :POINTER) ; (CL+SSL::INDEX :INT)) ; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::OPENSSL-SK-VALUE ; (CL+SSL::STACK CL+SSL::INDEX) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::OPENSSL-SK-VALUE ; (LET ((#:G0 CL+SSL::STACK)) ; (LET (#) ; (CFFI-SYS:%FOREIGN-FUNCALL "OPENSSL_sk_value" # :CONVENTION :CDECL ; :LIBRARY :DEFAULT))))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0") ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN SK-GENERAL-NAME-VALUE ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFUN SK-GENERAL-NAME-VALUE ; (DEFUN CL+SSL::SK-GENERAL-NAME-VALUE (CL+SSL::NAMES CL+SSL::INDEX) ; (IF (AND (NOT (CL+SSL::LIBRESSLP)) (CL+SSL::OPENSSL-IS-AT-LEAST 1 1)) ; (CL+SSL::OPENSSL-SK-VALUE CL+SSL::NAMES CL+SSL::INDEX) ; (CL+SSL::SK-VALUE CL+SSL::NAMES CL+SSL::INDEX))) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SK-GENERAL-NAME-VALUE ; (CL+SSL::NAMES CL+SSL::INDEX) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SK-GENERAL-NAME-VALUE ; (IF (AND (NOT #) (CL+SSL::OPENSSL-IS-AT-LEAST 1 1)) ; (CL+SSL::OPENSSL-SK-VALUE CL+SSL::NAMES CL+SSL::INDEX) ; (CL+SSL::SK-VALUE CL+SSL::NAMES CL+SSL::INDEX)))) ; ; note: Type assertion too complex to check: ; (VALUES SB-SYS:SYSTEM-AREA-POINTER &REST T). ; It allows an unknown number of values, consider using ; (VALUES SB-SYS:SYSTEM-AREA-POINTER &OPTIONAL). ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN SK-GENERAL-NAME-NUM ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFUN SK-GENERAL-NAME-NUM ; (DEFUN CL+SSL::SK-GENERAL-NAME-NUM (CL+SSL::NAMES) ; (IF (AND (NOT (CL+SSL::LIBRESSLP)) (CL+SSL::OPENSSL-IS-AT-LEAST 1 1)) ; (CL+SSL::OPENSSL-SK-NUM CL+SSL::NAMES) ; (CL+SSL::SK-NUM CL+SSL::NAMES))) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SK-GENERAL-NAME-NUM ; (CL+SSL::NAMES) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SK-GENERAL-NAME-NUM ; (IF (AND (NOT #) (CL+SSL::OPENSSL-IS-AT-LEAST 1 1)) ; (CL+SSL::OPENSSL-SK-NUM CL+SSL::NAMES) ; (CL+SSL::SK-NUM CL+SSL::NAMES)))) ; ; note: Type assertion too complex to check: ; (VALUES FIXNUM &REST T). ; It allows an unknown number of values, consider using ; (VALUES FIXNUM &OPTIONAL). ; processing (DEFINE-CRYPTO-FUNCTION ("GENERAL_NAMES_free" GENERAL-NAMES-FREE) ...) ; processing (DEFINE-CRYPTO-FUNCTION ("ASN1_STRING_data" ASN1-STRING-DATA) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-CRYPTO-FUNCTION ("ASN1_STRING_data" ASN1-STRING-DATA) ; (CL+SSL::DEFINE-CRYPTO-FUNCTION ("ASN1_STRING_data" CL+SSL::ASN1-STRING-DATA) ; :POINTER (CL+SSL::ASN1-STRING :POINTER)) ; --> CL+SSL::DEFINE-CRYPTO-FUNCTION-EX PROGN CL+SSL::DEFCFUN-VERSIONED ; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN ; --> SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::ASN1-STRING-DATA ; (CL+SSL::ASN1-STRING) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::ASN1-STRING-DATA ; (LET ((#:G0 CL+SSL::ASN1-STRING)) ; (CFFI-SYS:%FOREIGN-FUNCALL "ASN1_STRING_data" ; (:POINTER #:G0 :POINTER) :CONVENTION ; :CDECL :LIBRARY :DEFAULT)))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-CRYPTO-FUNCTION ("ASN1_STRING_length" ASN1-STRING-LENGTH) ...) ; processing (DEFINE-CRYPTO-FUNCTION ("ASN1_STRING_type" ASN1-STRING-TYPE) ...) ; processing (CFFI:DEFCSTRUCT ASN1_STRING_ST ...) ; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_set_default_verify_paths" SSL-CTX-SET-DEFAULT-VERIFY-PATHS) ...) ; processing (DEFINE-SSL-FUNCTION-EX (:SINCE "1.1.0") ...) ; processing (DEFINE-SSL-FUNCTION-EX (:SINCE "1.1.0") ...) ; processing (DEFINE-CRYPTO-FUNCTION ("RSA_generate_key" RSA-GENERATE-KEY) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-CRYPTO-FUNCTION ("RSA_generate_key" RSA-GENERATE-KEY) ; (CL+SSL::DEFINE-CRYPTO-FUNCTION ("RSA_generate_key" CL+SSL::RSA-GENERATE-KEY) ; :POINTER (CL+SSL::NUM :INT) ; (CL+SSL::E :UNSIGNED-LONG) ; (CL+SSL::CALLBACK :POINTER) ; (CL+SSL::OPT :POINTER)) ; --> CL+SSL::DEFINE-CRYPTO-FUNCTION-EX PROGN CL+SSL::DEFCFUN-VERSIONED ; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN ; --> SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::RSA-GENERATE-KEY ; (CL+SSL::NUM CL+SSL::E CL+SSL::CALLBACK CL+SSL::OPT) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::RSA-GENERATE-KEY ; (LET ((#:G0 CL+SSL::NUM)) ; (LET (#) ; (LET # ; #))))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-CRYPTO-FUNCTION ("RSA_free" RSA-FREE) ...) ; processing (DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ; (CL+SSL::DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0") ; ("SSL_CTX_set_tmp_rsa_callback" ; CL+SSL::SSL-CTX-SET-TMP-RSA-CALLBACK) ; :POINTER (CL+SSL::CTX :POINTER) ; (CL+SSL::CALLBACK :POINTER)) ; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-CTX-SET-TMP-RSA-CALLBACK ; (CL+SSL::CTX CL+SSL::CALLBACK) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL+SSL::SSL-CTX-SET-TMP-RSA-CALLBACK ; (LET ((#:G0 CL+SSL::CTX)) ; (LET (#) ; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_CTX_set_tmp_rsa_callback" # ; :CONVENTION :CDECL :LIBRARY ; CL+SSL::LIBSSL))))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (CFFI:DEFCALLBACK TMP-RSA-CALLBACK ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: CFFI:DEFCALLBACK TMP-RSA-CALLBACK ; (= CL+SSL::KEY-LENGTH 512) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a 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. ; (= CL+SSL::KEY-LENGTH 1024) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a 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. ; (CL+SSL::RSA-GENERATE-KEY LENGTH CL+SSL::+RSA_F4+ (CFFI-SYS:NULL-POINTER) ; (CFFI-SYS:NULL-POINTER)) ; ; note: doing SAP to pointer coercion (cost 20) ; ; note: doing SAP to pointer coercion (cost 20) ; processing (DEFVAR *SOCKET*) ; processing (DECLAIM (INLINE ENSURE-SSL-FUNCALL)) ; processing (DEFUN ENSURE-SSL-FUNCALL ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFUN ENSURE-SSL-FUNCALL ; (APPLY CL+SSL::FUNC CL+SSL::ARGS) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; FUNC is not known to be a function ; (PLUSP CL+SSL::NBYTES) ; ; 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. ; processing (DECLAIM (INLINE NONBLOCKING-SSL-FUNCALL)) ; processing (DEFUN NONBLOCKING-SSL-FUNCALL ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFUN NONBLOCKING-SSL-FUNCALL ; (APPLY CL+SSL::FUNC CL+SSL::ARGS) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; FUNC is not known to be a function ; (PLUSP CL+SSL::NBYTES) ; ; 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. ; processing (DEFUN OUTPUT-WAIT ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFUN OUTPUT-WAIT ; (- CL+SSL::DEADLINE (GET-INTERNAL-REAL-TIME)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; (/ (- CL+SSL::DEADLINE (GET-INTERNAL-REAL-TIME)) ; INTERNAL-TIME-UNITS-PER-SECOND) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; convert x/2^k to shift ; due to type uncertainty: ; The first argument is a NUMBER, not a INTEGER. ; (- CL+SSL::DEADLINE (GET-INTERNAL-REAL-TIME)) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (NOT NULL), 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 (NOT NULL), not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; etc. ; processing (DEFUN INPUT-WAIT ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFUN INPUT-WAIT ; (- CL+SSL::DEADLINE (GET-INTERNAL-REAL-TIME)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; (/ (- CL+SSL::DEADLINE (GET-INTERNAL-REAL-TIME)) ; INTERNAL-TIME-UNITS-PER-SECOND) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; convert x/2^k to shift ; due to type uncertainty: ; The first argument is a NUMBER, not a INTEGER. ; (- CL+SSL::DEADLINE (GET-INTERNAL-REAL-TIME)) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (NOT NULL), 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 (NOT NULL), not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; etc. ; processing (DEFVAR *PEM-PASSWORD* ...) ; processing (CFFI:DEFCALLBACK PEM-PASSWORD-CALLBACK ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: CFFI:DEFCALLBACK PEM-PASSWORD-CALLBACK ; (COERCE CL+SSL::*PEM-PASSWORD* 'BASE-STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS NULL (AND (NOT BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR CONS NULL (AND (NOT BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; CHARACTER ; (*)). ; processing (DEFMACRO WITH-PEM-PASSWORD ...) ; processing (DEFUN INIT-PRNG ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFUN INIT-PRNG ; (LENGTH CL+SSL::SEED-BYTE-SEQUENCE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (ELT CL+SSL::SEED-BYTE-SEQUENCE CL+SSL::I) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; (CL+SSL::RAND-SEED CL+SSL::PTR LENGTH) ; ; note: doing SAP to pointer coercion (cost 20) ; processing (DEFUN SSL-CTX-SET-SESSION-CACHE-MODE ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFUN SSL-CTX-SET-SESSION-CACHE-MODE ; (CL+SSL::SSL-CTX-CTRL CL+SSL::CTX CL+SSL::+SSL_CTRL_SET_SESS_CACHE_MODE+ ; CL+SSL::MODE (CFFI-SYS:NULL-POINTER)) ; ; note: doing SAP to pointer coercion (cost 20) ; processing (DEFUN SSL-SET-TLSEXT-HOST-NAME ...) ; processing (DEFVAR *LOCKS*) ; processing (DEFCONSTANT +CRYPTO-LOCK+ ...) ; processing (DEFCONSTANT +CRYPTO-UNLOCK+ ...) ; processing (DEFCONSTANT +CRYPTO-READ+ ...) ; processing (DEFCONSTANT +CRYPTO-WRITE+ ...) ; processing (CFFI:DEFCALLBACK LOCKING-CALLBACK ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: CFFI:DEFCALLBACK LOCKING-CALLBACK ; (ELT CL+SSL::*LOCKS* CL+SSL::N) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; processing (DEFVAR *THREADS* ...) ; processing (DEFVAR *THREAD-COUNTER* ...) ; processing (DEFPARAMETER *GLOBAL-LOCK* ...) ; processing (CFFI:DEFCALLBACK THREADID-CALLBACK ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: CFFI:DEFCALLBACK THREADID-CALLBACK ; (INCF CL+SSL::*THREAD-COUNTER*) ; --> SETQ THE ; ==> ; (+ 1 CL+SSL::*THREAD-COUNTER*) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; processing (DEFVAR *SSL-CHECK-VERIFY-P* ...) ; processing (DEFUN DEFAULT-SSL-METHOD ...) ; processing (DEFUN INITIALIZE ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFUN INITIALIZE ; (FUNCALL (OR METHOD (CL+SSL::DEFAULT-SSL-METHOD))) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; processing (DEFUN ENSURE-INITIALIZED ...) ; processing (DEFUN USE-CERTIFICATE-CHAIN-FILE ...) ; processing (DEFUN RELOAD ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl+ssl/src/ffi-tmpN1ZVB1HZ.fasl ; compilation finished in 0:00:02.839 ; compiling file "/usr/share/common-lisp/source/cl+ssl/src/x509.lisp" (written 09 JUN 2020 04:49:50 AM): ; processing (IN-PACKAGE :CL+SSL) ; processing (DEFGENERIC DECODE-ASN1-STRING ...) ; processing (DEFUN COPY-BYTES-TO-LISP-VECTOR ...) ; processing (DEFUN ASN1-STRING-BYTES-VECTOR ...) ; processing (DEFUN ASN1-IASTRING-CHAR-P ...) ; processing (DEFUN ASN1-IASTRING-P ...) ; processing (DEFMETHOD DECODE-ASN1-STRING ...) ; processing (DEFUN ASN1-PRINTABLE-CHAR-P ...) ; processing (DEFUN ASN1-PRINTABLE-STRING-P ...) ; processing (DEFMETHOD DECODE-ASN1-STRING ...) ; processing (DEFMETHOD DECODE-ASN1-STRING ...) ; processing (DEFMETHOD DECODE-ASN1-STRING ...) ; processing (DEFUN ASN1-TELETEX-CHAR-P ...) ; processing (DEFUN ASN1-TELETEX-STRING-P ...) ; processing (DEFMETHOD DECODE-ASN1-STRING ...) ; processing (DEFMETHOD DECODE-ASN1-STRING ...) ; processing (DEFUN TRY-GET-ASN1-STRING-DATA ...) ; processing (DEFUN SLURP-STREAM ...) ; processing (DEFGENERIC DECODE-CERTIFICATE ...) ; processing (DEFMETHOD DECODE-CERTIFICATE ...) ; processing (DEFUN CERT-FORMAT-FROM-PATH ...) ; processing (DEFUN DECODE-CERTIFICATE-FROM-FILE ...) ; processing (DEFUN CERTIFICATE-ALT-NAMES ...) ; processing (DEFUN CERTIFICATE-DNS-ALT-NAMES ...) ; processing (DEFUN CERTIFICATE-SUBJECT-COMMON-NAMES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl+ssl/src/x509-tmpZGRRPISB.fasl ; compilation finished in 0:00:00.551 ; compiling file "/usr/share/common-lisp/source/cl+ssl/src/ffi-buffer-all.lisp" (written 09 JUN 2020 04:49:50 AM): ; processing (IN-PACKAGE :CL+SSL) ; processing (DEFCONSTANT +INITIAL-BUFFER-SIZE+ ...) ; processing (DECLAIM (INLINE MAKE-BUFFER ...)) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl+ssl/src/ffi-buffer-all-tmpFNKDE5XP.fasl ; compilation finished in 0:00:00.008 ; compiling file "/usr/share/common-lisp/source/cl+ssl/src/ffi-buffer.lisp" (written 09 JUN 2020 04:49:50 AM): ; processing (IN-PACKAGE :CL+SSL) ; processing (DEFUN MAKE-BUFFER ...) ; processing (DEFUN BUFFER-LENGTH ...) ; processing (DEFUN BUFFER-ELT ...) ; processing (DEFUN SET-BUFFER-ELT ...) ; processing (DEFSETF BUFFER-ELT ...) ; processing (DEFUN S/B-REPLACE ...) ; processing (DEFUN B/S-REPLACE ...) ; processing (DEFMACRO WITH-POINTER-TO-VECTOR-DATA ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl+ssl/src/ffi-buffer-tmpRJTU435C.fasl ; compilation finished in 0:00:00.099 ; compiling file "/usr/share/common-lisp/source/cl+ssl/src/streams.lisp" (written 09 JUN 2020 04:49:50 AM): ; processing (IN-PACKAGE :CL+SSL) ; processing (DEFVAR *DEFAULT-CIPHER-LIST* ...) ; processing (DEFCLASS SSL-STREAM ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp ; in: DEFMETHOD PRINT-OBJECT (SSL-STREAM T) ; (FORMAT STREAM "for ~A" (CL+SSL::SSL-STREAM-SOCKET CL+SSL::OBJECT)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) ; BASE-STRING), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) ; BASE-STRING), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) ; BASE-STRING), not a NULL. ; processing (DEFCLASS SSL-SERVER-STREAM ...) ; processing (DEFMETHOD STREAM-ELEMENT-TYPE ...) ; processing (DEFMETHOD CLOSE ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp ; in: DEFMETHOD CLOSE (SSL-STREAM) ; (FUNCALL (CL+SSL::SSL-CLOSE-CALLBACK STREAM)) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; processing (DEFMETHOD OPEN-STREAM-P ...) ; processing (DEFMETHOD STREAM-LISTEN ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp ; in: DEFMETHOD STREAM-LISTEN (SSL-STREAM) ; (CL+SSL::BUFFER-ELT CL+SSL::BUF 0) ; --> BLOCK ; ==> ; (ELT CL+SSL::BUF CL+SSL::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; processing (DEFMETHOD STREAM-READ-BYTE ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp ; in: DEFMETHOD STREAM-READ-BYTE (SSL-STREAM) ; (CL+SSL::BUFFER-ELT CL+SSL::BUF 0) ; --> BLOCK ; ==> ; (ELT CL+SSL::BUF CL+SSL::INDEX) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; processing (DEFMETHOD STREAM-READ-SEQUENCE ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp ; in: DEFMETHOD STREAM-READ-SEQUENCE (SSL-STREAM T T T) ; (- CL+SSL::END CL+SSL::START) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-(COMPLEX FLOAT) numeric operation ; due to type uncertainty: ; The first argument is a REAL, 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (PLUSP LENGTH) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (+ CL+SSL::START CL+SSL::READ-BYTES) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; (< CL+SSL::START CL+SSL::END) ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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. ; (SETF (ELT CL+SSL::SEQ CL+SSL::START) (CL+SSL::SSL-STREAM-PEEKED-BYTE STREAM)) ; ==> ; (SB-KERNEL:%SETELT CL+SSL::SEQ CL+SSL::START ; (CL+SSL::SSL-STREAM-PEEKED-BYTE STREAM)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; (CL+SSL::S/B-REPLACE CL+SSL::SEQ CL+SSL::BUF :START1 CL+SSL::START :END1 ; (+ CL+SSL::START CL+SSL::READ-BYTES)) ; --> BLOCK ; ==> ; (REPLACE CL+SSL::SEQ CL+SSL::BUF :START1 CL+SSL::START1 :END1 CL+SSL::END1 ; :START2 CL+SSL::START2 :END2 CL+SSL::END2) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; The second argument is a (OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a SIMPLE-BASE-STRING. ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-BASE-STRING ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; The second argument is a (OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a (SIMPLE-ARRAY CHARACTER (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY CHARACTER ; (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY SINGLE-FLOAT (*)). ; The second argument is a (OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a (SIMPLE-ARRAY SINGLE-FLOAT (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; SINGLE-FLOAT (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY DOUBLE-FLOAT (*)). ; The second argument is a (OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a (SIMPLE-ARRAY DOUBLE-FLOAT (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; DOUBLE-FLOAT (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SIMPLE-BIT-VECTOR. ; The second argument is a (OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a SIMPLE-BIT-VECTOR. ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-BIT-VECTOR ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)). ; The second argument is a (OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a (SIMPLE-ARRAY (UNSIGNED-BYTE 2) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 2) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)). ; The second argument is a (OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a (SIMPLE-ARRAY (UNSIGNED-BYTE 4) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 4) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)). ; The second argument is a (OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a (SIMPLE-ARRAY (UNSIGNED-BYTE 7) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 7) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)). ; The second argument is a (OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 8) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)). ; The second argument is a (OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a (SIMPLE-ARRAY (UNSIGNED-BYTE 15) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 15) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)). ; The second argument is a (OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a (SIMPLE-ARRAY (UNSIGNED-BYTE 16) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 16) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)). ; The second argument is a (OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a (SIMPLE-ARRAY (UNSIGNED-BYTE 31) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 31) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)). ; The second argument is a (OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a (SIMPLE-ARRAY (UNSIGNED-BYTE 32) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 32) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)). ; The second argument is a (OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a (SIMPLE-ARRAY (UNSIGNED-BYTE 62) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 62) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)). ; The second argument is a (OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a (SIMPLE-ARRAY (UNSIGNED-BYTE 63) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 63) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)). ; The second argument is a (OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a (SIMPLE-ARRAY (UNSIGNED-BYTE 64) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 64) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)). ; The second argument is a (OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 8) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)). ; The second argument is a (OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a (SIMPLE-ARRAY (SIGNED-BYTE 16) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 16) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)). ; The second argument is a (OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a (SIMPLE-ARRAY (SIGNED-BYTE 32) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 32) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY FIXNUM (*)). ; The second argument is a (OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a (SIMPLE-ARRAY FIXNUM (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY FIXNUM (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)). ; The second argument is a (OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a (SIMPLE-ARRAY (SIGNED-BYTE 64) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 64) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) ; (*)). ; The second argument is a (OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a (SIMPLE-ARRAY ; (COMPLEX SINGLE-FLOAT) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (COMPLEX SINGLE-FLOAT) ; (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*)). ; The second argument is a (OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a (SIMPLE-ARRAY ; (COMPLEX DOUBLE-FLOAT) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (COMPLEX DOUBLE-FLOAT) ; (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; The second argument is a (OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a (SIMPLE-ARRAY CHARACTER (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-BASE-STRING ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; The second argument is a (OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a SIMPLE-BASE-STRING. ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY CHARACTER ; (*)) ; &REST T). ; (CL+SSL::BUFFER-LENGTH CL+SSL::BUF) ; --> BLOCK ; ==> ; (LENGTH CL+SSL::BUF) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (MIN (- CL+SSL::END CL+SSL::START) (CL+SSL::BUFFER-LENGTH CL+SSL::BUF)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0) ; (RATIONAL 0)), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (< CL+SSL::START CL+SSL::END) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; etc. ; (- CL+SSL::END CL+SSL::START) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a REAL, 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 REAL, 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. ; (MIN (- CL+SSL::END CL+SSL::START) (CL+SSL::BUFFER-LENGTH CL+SSL::BUF)) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; (PLUSP LENGTH) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; (+ CL+SSL::START CL+SSL::READ-BYTES) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, 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 NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; etc. ; (INCF CL+SSL::START CL+SSL::READ-BYTES) ; ==> ; (SETQ CL+SSL::START (+ CL+SSL::READ-BYTES CL+SSL::START)) ; ; note: doing signed word to integer coercion (cost 20) to START ; processing (DEFMETHOD STREAM-WRITE-BYTE ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp ; in: DEFMETHOD STREAM-WRITE-BYTE (SSL-STREAM T) ; (INCF (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM)) ; --> LET* ; ==> ; (+ 1 (CL+SSL::SSL-STREAM-OUTPUT-POINTER #:STREAM4)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; (SETF (CL+SSL::BUFFER-ELT CL+SSL::BUF ; (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM)) ; CL+SSL::B) ; --> CL+SSL::SET-BUFFER-ELT BLOCK SETF ; ==> ; (SB-KERNEL:%SETELT CL+SSL::BUF CL+SSL::INDEX CL+SSL::VAL) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; (CL+SSL::BUFFER-LENGTH CL+SSL::BUF) ; --> BLOCK ; ==> ; (LENGTH CL+SSL::BUF) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (INCF (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM)) ; --> LET* ; ==> ; (+ 1 (CL+SSL::SSL-STREAM-OUTPUT-POINTER #:STREAM4)) ; ; 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. ; processing (DEFMETHOD STREAM-WRITE-SEQUENCE ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp ; in: DEFMETHOD STREAM-WRITE-SEQUENCE (SSL-STREAM T T T) ; (- CL+SSL::END CL+SSL::START) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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+SSL::END CL+SSL::START) (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM)) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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+SSL::END CL+SSL::START) (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM)) ; (CL+SSL::BUFFER-LENGTH CL+SSL::BUF)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (- CL+SSL::END CL+SSL::START) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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+SSL::BUFFER-LENGTH CL+SSL::BUF) ; --> BLOCK ; ==> ; (LENGTH CL+SSL::BUF) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (> (- CL+SSL::END CL+SSL::START) (CL+SSL::BUFFER-LENGTH CL+SSL::BUF)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (CL+SSL::BUFFER-LENGTH CL+SSL::BUF) ; --> BLOCK ; ==> ; (LENGTH CL+SSL::BUF) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (CL+SSL::B/S-REPLACE CL+SSL::BUF CL+SSL::SEQ :START1 ; (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM) :START2 ; CL+SSL::START :END2 CL+SSL::END) ; --> BLOCK ; ==> ; (REPLACE CL+SSL::BUF CL+SSL::SEQ :START1 CL+SSL::START1 :END1 CL+SSL::END1 ; :START2 CL+SSL::START2 :END2 CL+SSL::END2) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; 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-ARRAY CHARACTER (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY CHARACTER ; (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY SINGLE-FLOAT (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY SINGLE-FLOAT (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; SINGLE-FLOAT (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY DOUBLE-FLOAT (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY DOUBLE-FLOAT (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; DOUBLE-FLOAT (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SIMPLE-BIT-VECTOR. ; The second argument is a SEQUENCE, not a SIMPLE-BIT-VECTOR. ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-BIT-VECTOR ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 2) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 4) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 7) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 8) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 15) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 15) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 16) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 16) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 31) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 31) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 32) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 32) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 62) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 62) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 63) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 63) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 64) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 64) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 8) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 16) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 32) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY FIXNUM (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY FIXNUM (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY FIXNUM (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 64) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) ; (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (COMPLEX SINGLE-FLOAT) ; (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (COMPLEX DOUBLE-FLOAT) ; (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SIMPLE-VECTOR. ; The second argument is a SEQUENCE, not a SIMPLE-VECTOR. ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-VECTOR ; &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). ; (INCF (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM) ; (- CL+SSL::END CL+SSL::START)) ; --> LET* ; ==> ; (+ (- CL+SSL::END CL+SSL::START) ; (CL+SSL::SSL-STREAM-OUTPUT-POINTER #:STREAM28)) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-(COMPLEX FLOAT) numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; (CL+SSL::BUFFER-LENGTH CL+SSL::BUF) ; --> BLOCK ; ==> ; (LENGTH CL+SSL::BUF) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (CL+SSL::B/S-REPLACE CL+SSL::BUF CL+SSL::SEQ :START2 CL+SSL::START) ; --> BLOCK ; ==> ; (REPLACE CL+SSL::BUF CL+SSL::SEQ :START1 CL+SSL::START1 :END1 CL+SSL::END1 ; :START2 CL+SSL::START2 :END2 CL+SSL::END2) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; 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-ARRAY CHARACTER (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY CHARACTER ; (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY SINGLE-FLOAT (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY SINGLE-FLOAT (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; SINGLE-FLOAT (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY DOUBLE-FLOAT (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY DOUBLE-FLOAT (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; DOUBLE-FLOAT (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SIMPLE-BIT-VECTOR. ; The second argument is a SEQUENCE, not a SIMPLE-BIT-VECTOR. ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-BIT-VECTOR ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 2) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 4) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 7) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 8) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 15) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 15) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 16) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 16) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 31) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 31) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 32) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 32) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 62) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 62) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 63) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 63) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 64) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 64) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 8) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 16) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 32) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY FIXNUM (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY FIXNUM (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY FIXNUM (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 64) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) ; (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (COMPLEX SINGLE-FLOAT) ; (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (COMPLEX DOUBLE-FLOAT) ; (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SIMPLE-VECTOR. ; The second argument is a SEQUENCE, not a SIMPLE-VECTOR. ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-VECTOR ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-BASE-STRING ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY CHARACTER ; (*)) ; &REST T). ; (- CL+SSL::END CL+SSL::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+SSL::END CL+SSL::START) (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM)) ; ; 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. ; (> ; (+ (- CL+SSL::END CL+SSL::START) (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM)) ; (CL+SSL::BUFFER-LENGTH CL+SSL::BUF)) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a NUMBER, not a FIXNUM. ; (- CL+SSL::END CL+SSL::START) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES 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 NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; (> (- CL+SSL::END CL+SSL::START) (CL+SSL::BUFFER-LENGTH CL+SSL::BUF)) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a NUMBER, not a FIXNUM. ; (INCF (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM) ; (- CL+SSL::END CL+SSL::START)) ; --> LET* ; ==> ; (+ (- CL+SSL::END CL+SSL::START) ; (CL+SSL::SSL-STREAM-OUTPUT-POINTER #:STREAM28)) ; ; 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. ; (INCF CL+SSL::START (CL+SSL::BUFFER-LENGTH CL+SSL::BUF)) ; ==> ; (SETQ CL+SSL::START (+ (CL+SSL::BUFFER-LENGTH CL+SSL::BUF) CL+SSL::START)) ; ; note: doing signed word to integer coercion (cost 20) to START ; processing (DEFMETHOD STREAM-FINISH-OUTPUT ...) ; processing (DEFMETHOD STREAM-FORCE-OUTPUT ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp ; in: DEFMETHOD STREAM-FORCE-OUTPUT (SSL-STREAM) ; (PLUSP CL+SSL::FILL-PTR) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a 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. ; processing (DEFUN INSTALL-NONBLOCK-FLAG ...) ; processing (DEFUN INSTALL-HANDLE-AND-BIO ...) ; processing (DEFUN INSTALL-KEY-AND-CERT ...) ; processing (DEFUN X509-CERTIFICATE-NAMES ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp ; in: DEFUN X509-CERTIFICATE-NAMES ; (CFFI-SYS:WITH-FOREIGN-POINTER (CL+SSL::BUF 1024) ; (LET ((CL+SSL::ISSUER-NAME ; (CL+SSL::X509-GET-ISSUER-NAME CL+SSL::X509-CERTIFICATE)) ; (CL+SSL::SUBJECT-NAME ; (CL+SSL::X509-GET-SUBJECT-NAME CL+SSL::X509-CERTIFICATE))) ; (VALUES ; (UNLESS (CFFI-SYS:NULL-POINTER-P CL+SSL::ISSUER-NAME) ; (CL+SSL::X509-NAME-ONELINE CL+SSL::ISSUER-NAME CL+SSL::BUF 1024) ; (CFFI:FOREIGN-STRING-TO-LISP CL+SSL::BUF)) ; (UNLESS (CFFI-SYS:NULL-POINTER-P CL+SSL::SUBJECT-NAME) ; (CL+SSL::X509-NAME-ONELINE CL+SSL::SUBJECT-NAME CL+SSL::BUF 1024) ; (CFFI:FOREIGN-STRING-TO-LISP CL+SSL::BUF))))) ; --> WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET LET LET ; ==> ; (SB-ALIEN-INTERNALS:MAKE-LOCAL-ALIEN ; '#) ; ; note: doing SAP to pointer coercion (cost 20), for: ; the first result of ALLOC-ALIEN-STACK-SPACE ; processing (DEFMETHOD SSL-STREAM-HANDLE ...) ; processing (DEFUN SSL-STREAM-X509-CERTIFICATE ...) ; processing (DEFUN SSL-LOAD-GLOBAL-VERIFY-LOCATIONS ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp ; in: DEFUN SSL-LOAD-GLOBAL-VERIFY-LOCATIONS ; (CL+SSL::SSL-CTX-LOAD-VERIFY-LOCATIONS CL+SSL::*SSL-GLOBAL-CONTEXT* ; CL+SSL::CAFILE (CFFI-SYS:NULL-POINTER)) ; ; note: doing SAP to pointer coercion (cost 20) ; processing (DEFUN SSL-SET-GLOBAL-DEFAULT-VERIFY-PATHS ...) ; processing (DEFUN SSL-CHECK-VERIFY-P ...) ; processing (DEFUN (SETF SSL-CHECK-VERIFY-P) ...) ; processing (DEFUN SSL-VERIFY-INIT ...) ; processing (DEFUN MAYBE-VERIFY-CLIENT-STREAM ...) ; processing (DEFUN HANDLE-EXTERNAL-FORMAT ...) ; processing (DEFMACRO WITH-NEW-SSL ...) ; processing (DEFVAR *MAKE-SSL-CLIENT-STREAM-VERIFY-DEFAULT* ...) ; processing (DEFUN MAKE-SSL-CLIENT-STREAM ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp ; in: DEFUN MAKE-SSL-CLIENT-STREAM ; (ZEROP (CL+SSL::SSL-SET-CIPHER-LIST CL+SSL::HANDLE CL+SSL::CIPHER-LIST)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a 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. ; processing (DEFUN MAKE-SSL-SERVER-STREAM ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp ; in: DEFUN MAKE-SSL-SERVER-STREAM ; (ZEROP (CL+SSL::SSL-SET-CIPHER-LIST CL+SSL::HANDLE CL+SSL::CIPHER-LIST)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a 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. ; processing (DEFGENERIC STREAM-FD ...) ; processing (DEFMETHOD STREAM-FD ...) ; processing (DEFMETHOD STREAM-FD ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl+ssl/src/streams-tmpI9WG87JK.fasl ; compilation finished in 0:00:02.327 ; compiling file "/usr/share/common-lisp/source/cl+ssl/src/bio.lisp" (written 09 JUN 2020 04:49:50 AM): ; processing (IN-PACKAGE CL+SSL) ; processing (DEFCONSTANT +BIO-TYPE-SOCKET+ ...) ; processing (DEFCONSTANT +BIO_FLAGS_READ+ ...) ; processing (DEFCONSTANT +BIO_FLAGS_WRITE+ ...) ; processing (DEFCONSTANT +BIO_FLAGS_SHOULD_RETRY+ ...) ; processing (DEFCONSTANT +BIO_CTRL_FLUSH+ ...) ; processing (CFFI:DEFCSTRUCT BIO-METHOD ...) ; processing (CFFI:DEFCSTRUCT BIO ...) ; processing (DEFUN MAKE-BIO-LISP-METHOD ...) ; processing (DEFUN BIO-NEW-LISP ...) ; processing (CFFI:DEFCALLBACK LISP-WRITE ...) ; processing (DEFUN CLEAR-RETRY-FLAGS ...) ; processing (DEFUN SET-RETRY-READ ...) ; processing (CFFI:DEFCALLBACK LISP-READ ...) ; processing (CFFI:DEFCALLBACK LISP-PUTS ...) ; processing (CFFI:DEFCALLBACK LISP-CTRL ...) ; processing (CFFI:DEFCALLBACK LISP-CREATE ...) ; processing (CFFI:DEFCALLBACK LISP-DESTROY ...) ; processing (SETF *BIO-LISP-METHOD* ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl+ssl/src/bio-tmpYDE6I9E6.fasl ; compilation finished in 0:00:00.559 ; compiling file "/usr/share/common-lisp/source/cl+ssl/src/random.lisp" (written 09 JUN 2020 04:49:50 AM): ; processing (IN-PACKAGE :CL+SSL) ; processing (DEFUN RANDOM-BYTES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl+ssl/src/random-tmp319UV2V8.fasl ; compilation finished in 0:00:00.123 ; compiling file "/usr/share/common-lisp/source/cl+ssl/src/context.lisp" (written 09 JUN 2020 04:49:50 AM): ; processing (IN-PACKAGE :CL+SSL) ; processing (DEFINE-CONDITION VERIFY-LOCATION-NOT-FOUND-ERROR ...) ; processing (DEFUN VALIDATE-VERIFY-LOCATION ...) ; processing (DEFUN ADD-VERIFY-LOCATIONS ...) ; processing (DEFUN SSL-CTX-SET-VERIFY-LOCATION ...) ; processing (ALEXANDRIA:DEFINE-CONSTANT +DEFAULT-CIPHER-LIST+ ...) ; processing (CFFI:DEFCALLBACK VERIFY-PEER-CALLBACK ...) ; processing (DEFUN MAKE-CONTEXT ...) ; processing (DEFUN CALL-WITH-GLOBAL-CONTEXT ...) ; processing (DEFMACRO WITH-GLOBAL-CONTEXT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl+ssl/src/context-tmpLYQINFYS.fasl ; compilation finished in 0:00:00.275 ; compiling file "/usr/share/common-lisp/source/cl+ssl/src/verify-hostname.lisp" (written 09 JUN 2020 04:49:50 AM): ; processing (IN-PACKAGE :CL+SSL) ; processing (DEFINE-CONDITION HOSTNAME-VERIFICATION-ERROR ...) ; processing (DEFINE-CONDITION UNABLE-TO-MATCH-ALTNAMES ...) ; processing (DEFINE-CONDITION UNABLE-TO-DECODE-COMMON-NAME ...) ; processing (DEFINE-CONDITION UNABLE-TO-MATCH-COMMON-NAME ...) ; processing (DEFUN CASE-INSENSITIVE-MATCH ...) ; processing (DEFUN REMOVE-TRAILING-DOT ...) ; processing (DEFUN CHECK-WILDCARD-IN-LEFTMOST-LABEL ...) ; processing (DEFUN CHECK-SINGLE-WILDCARD ...) ; processing (DEFUN CHECK-TWO-LABELS-AFTER-WILDCARD ...) ; processing (DEFUN VALIDATE-AND-PARSE-WILDCARD-IDENTIFIER ...) ; processing (DEFUN WILDCARD-NOT-IN-A-LABEL ...) ; processing (DEFUN TRY-MATCH-WILDCARD ...) ; processing (DEFUN MAYBE-TRY-MATCH-WILDCARD ...) ; processing (DEFUN TRY-MATCH-HOSTNAME ...) ; processing (DEFUN TRY-MATCH-HOSTNAMES ...) ; processing (DEFUN MAYBE-CHECK-SUBJECT-CN ...) ; processing (DEFUN VERIFY-HOSTNAME ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl+ssl/src/verify-hostname-tmpGA31XWNO.fasl ; compilation finished in 0:00:00.179 ; ; compilation unit finished ; caught 15 STYLE-WARNING conditions ; printed 1721 notes ;; loading system "mssql" ; compiling file "/usr/share/common-lisp/source/iterate/package.lisp" (written 07 FEB 2018 01:05:19 AM): ; processing (DEFPACKAGE #:ITERATE ...) ; processing (IN-PACKAGE #:ITERATE) ; processing (DEFMACRO DEFCONST ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/iterate/package-tmp5HT23M6C.fasl ; compilation finished in 0:00:00.047 ; compiling file "/usr/share/common-lisp/source/iterate/iterate.lisp" (written 07 FEB 2018 01:05:19 AM): ; processing (IN-PACKAGE #:ITERATE) ; processing (DECLAIM (DECLARATION DECLARE-VARIABLES)) ; processing (DEFCONST VERSION ...) ; processing (DEFCONST STANDARD-TYPE-SYMBOLS ...) ; processing (DEFVAR *ALWAYS-DECLARE-VARIABLES* ...) ; processing (DEFVAR *RESULT-VAR*) ; processing (DEFVAR *TYPE-ALIST*) ; processing (DEFVAR *DECLARE-VARIABLES*) ; processing (DEFVAR *CLAUSE*) ; processing (DEFVAR *TOP-LEVEL?*) ; processing (DEFVAR *BINDING-CONTEXT?*) ; processing (DEFVAR *BINDINGS*) ; processing (DEFVAR *INTERNAL-VARIABLES*) ; processing (DEFVAR *DECLARATIONS*) ; processing (DEFVAR *ACCUM-VAR-ALIST*) ; processing (DEFVAR *SHARED-BINDINGS-ALIST*) ; processing (DEFVAR *BLOCK-NAME*) ; processing (DEFVAR *CLAUSE-INFO-INDEX* ...) ; processing (DEFPARAMETER *SPECIAL-FORM-ALIST* ...) ; processing (DEFVAR *SPECIAL-CLAUSE-ALIST* ...) ; processing (DEFVAR *TEMPS*) ; processing (DEFVAR *TEMPS-IN-USE*) ; processing (DEFVAR *ENV*) ; processing (DEFVAR *DRIVER-INFO-ALIST*) ; processing (DEFVAR *PREVIOUS-VARS-ALIST*) ; processing (DEFVAR *LOOP-TOP*) ; processing (DEFVAR *LOOP-STEP*) ; processing (DEFVAR *LOOP-END*) ; processing (DEFVAR *LOOP-STEP-USED?*) ; processing (DEFVAR *LOOP-END-USED?*) ; processing (DEFVAR *LOOP-BODY-WRAPPERS*) ; processing (DEFSTRUCT CLAUSE-INFO ...) ; processing (DEFSTRUCT DRIVER-INFO ...) ; processing (DEFSTRUCT PREVIOUS-INFO ...) ; processing (DEFSTRUCT SAVE-INFO ...) ; processing (DEFMACRO AUGMENT ...) ; processing (DEFMACRO PREPEND ...) ; processing (DEFUN LIST-OF-FORMS? ...) ; processing (DEFMACRO ITERATE ...) ; processing (DEFMACRO ITER ...) ; processing (DEFMACRO DEFMACRO-CLAUSE ...) ; processing (DEFMACRO DEFMACRO-DRIVER ...) ; processing (DEFUN PROCESS-TOP-LEVEL-DECLS ...) ; processing (DEFUN DEFAULT-DRIVER-CODE ...) ; processing (DEFUN WRAP-FORM ...) ; processing (DEFUN ADD-LOOP-BODY-WRAPPER ...) ; processing (DEFUN WALK ...) ; processing (DEFUN WALK-LIST ...) ; processing (DEFUN WALK-ARGLIST ...) ; processing (DEFUN WALK-FSPEC ...) ; processing (DEFUN WALK-LIST-NCONCING ...) ; processing (DEFUN RETURN-CODE-MODIFYING-BODY ...) ; processing (DEFUN ADD-INTERNAL-VAR ...) ; processing (DEFUN ADD-INTERNAL-VARS ...) ; processing (DEFUN LAMBDA-LIST-VARS ...) ; processing (DEFUN SPECIAL-FORM? ...) ; processing (DEFUN WALK-SPECIAL-FORM ...) ; processing (DEFUN WALK-CDR ...) ; processing (DEFUN WALK-CDDR ...) ; processing (DEFUN WALK-PROGN ...) ; processing (DEFUN WALK-SETQ ...) ; processing (DEFUN WALK-FUNCTION ...) ; processing (DEFUN WALK-DECLARE ...) ; processing (DEFUN WALK-LET ...) ; processing (DEFUN WALK-LET-BINDINGS ...) ; processing (DEFUN WALK-LET*-BINDINGS ...) ; processing (DEFUN WALK-LET-BINDING ...) ; processing (DEFUN WALK-MULTIPLE-VALUE-BIND ...) ; processing (DEFUN WALK-FLET ...) ; processing (DEFUN WALK-CDR-WITH-DECLARATIONS ...) ; processing (DEFUN WALK-CDDR-WITH-DECLARATIONS ...) ; processing (DEFUN WALK-TAGBODY ...) ; processing (DEFUN WALK-MACROLET ...) ; processing (DEFVAR *INITIAL*) ; processing (DEFVAR *DECLS*) ; processing (DEFVAR *STEP*) ; processing (DEFVAR *FINAL*) ; processing (DEFVAR *FINALP*) ; processing (DEFUN PROCESS-CLAUSE ...) ; processing (DEFUN APPLY-CLAUSE-FUNCTION ...) ; processing (DEFUN PREPROCESS-CLAUSE ...) ; processing (DEFUN SYMBOL-SYNONYM ...) ; processing (DEFUN LISTIFY ...) ; processing (DEFUN KEYWORDIZE ...) ; processing (DEFUN ARG-CHECK ...) ; processing (DEFUN WALK-EXPR ...) ; processing (DEFUN DISPLAY-ITERATE-CLAUSES ...) ; processing (DEFUN DISP-STD-CLAUSES ...) ; processing (DEFUN DISPLAY-CLAUSE ...) ; processing (DEFCONST FILL-COL ...) ; processing (DEFUN DISPLAY-KWS ...) ; processing (DEFUN CLAUSE-MATCHES? ...) ; processing (DEFUN GET-CLAUSE-INFO ...) ; processing (DEFUN IS-ITERATE-CLAUSE? ...) ; processing (DEFUN STARTS-CLAUSE? ...) ; processing (DEFUN INSTALL-CLAUSE-INFO ...) ; processing (DEFUN INSTALL-CLAUSE-INFO-1 ...) ; processing (DEFUN BUILD-INDEX ...) ; processing (DEFUN INDEX? ...) ; processing (DEFUN INDEX-ADD ...) ; processing (DEFUN INDEX-LOOKUP ...) ; processing (DEFUN AMBIGUITY-CHECK-INDEX ...) ; processing (DEFUN AMBIGUITY-CHECK-CLAUSE ...) ; processing (DEFUN AMBIGUOUS-CLAUSES? ...) ; processing (DEFUN DISPLAY-INDEX ...) ; processing (DEFUN REMOVE-CLAUSE ...) ; processing (DEFMACRO DEFCLAUSE ...) ; processing (DEFMACRO DEFCLAUSE-DRIVER ...) ; processing (DEFCONST SEQUENCE-KEYWORD-LIST ...) ; processing (DEFUN DEFINE-CLAUSE ...) ; processing (DEFUN MAKE-FUNCTION-NAME ...) ; processing (DEFUN SPLIT-CLAUSE-TEMPLATE ...) ; processing (DEFUN SPLIT-LIST-ODD-EVEN ...) ; processing (DEFUN CONTAINS-DUPLICATES? ...) ; processing (DEFMACRO DEFSYNONYM ...) ; processing (DEFMACRO DEFCLAUSE-SEQUENCE ...) ; processing (DEFUN IF-1ST-TIME ...) ; processing (DEFMACRO WITH-TEMPORARY ...) ; processing (DEFUN GET-FREE-TEMP ...) ; processing (DEFUN VAR-TYPE ...) ; processing (DEFUN VAR-DECLARATION ...) ; processing (DEFUN EXPR-TYPE-ONLY ...) ; processing (DEFUN EXPRESSION-TYPE ...) ; processing (DEFUN QUOTED? ...) ; processing (DEFUN FUNCTION-QUOTED? ...) ; processing (DEFUN LAMBDA-EXPRESSION? ...) ; processing (DEFUN THE-EXPRESSION? ...) ; processing (DEFUN SELF-EVALUATING? ...) ; processing (DEFUN CONSTANT? ...) ; processing (DEFUN DUPLICABLE? ...) ; processing (DEFUN VAR-SPEC? ...) ; processing (DEFUN EXTRACT-VAR ...) ; processing (DEFUN MAKE-BINDING ...) ; processing (DEFUN MAKE-DEFAULT-BINDING ...) ; processing (DEFUN MAKE-VAR-AND-BINDING ...) ; processing (DEFUN MAKE-VAR-AND-DEFAULT-BINDING ...) ; processing (DEFUN MAKE-ACCUM-VAR-BINDING ...) ; processing (DEFUN MAKE-ACCUM-VAR-DEFAULT-BINDING ...) ; processing (DEFUN MAKE-ACCUM-VAR-BINDING-INTERNAL ...) ; processing (DEFUN MAKE-SHARED-BINDING ...) ; processing (DEFUN MAKE-BINDING-INTERNAL ...) ; processing (DEFUN MAKE-INITIAL-VALUE ...) ; processing (DEFUN ADD-BINDING ...) ; processing (DEFUN CHECK-INTERNAL-VARIABLES ...) ; processing (DEFUN INTERNAL-VARIABLE? ...) ; processing (DEFUN VAR-BINDING ...) ; processing (DEFUN MAKE-DESTRUCTURING-BINDINGS ...) ; processing (DEFUN DO-DESTRUCTURING-BINDINGS ...) ; processing (DEFUN EXTRACT-VARS ...) ; processing (DEFMACRO DSETQ ...) ; processing (DEFUN DO-DSETQ ...) ; processing (DEFUN MAKE-DSETQS ...) ; processing (DEFUN MAKE-MV-DSETQS ...) ; processing (DEFUN DSETQ-ERROR ...) ; processing (DEFUN IN-ITERATE? ...) ; processing (DEFUN LOCAL-BINDING-CHECK ...) ; processing (DEFUN FREE-VARIABLES ...) ; processing (DEFUN FREE-VARS ...) ; processing (DEFUN FREE-VARS-LIST ...) ; processing (DEFUN FREE-VARS-FSPEC ...) ; processing (DEFUN RETURN-CODE ...) ; processing (DEFMACRO RETURN-DRIVER-CODE ...) ; processing (DEFUN ADD-DRIVER-INFO ...) ; processing (DEFMACRO RETURN-SEQUENCE-CODE ...) ; processing (DEFUN RETURN-SEQ-CODE ...) ; processing (DEFUN CHECK-SEQUENCE-KEYWORDS ...) ; processing (DEFUN EVAL-CONST-EXPR ...) ; processing (DEFUN MAKE-FUNCALL ...) ; processing (DEFUN MAKE-APPLICATION ...) ; processing (DEFUN APPLY-SUBST-EXPR ...) ; processing (DEFMACRO DEF-SPECIAL-CLAUSE ...) ; processing (DEFUN INSTALL-SPECIAL-CLAUSE-FUNCTION ...) ; processing (DEF-SPECIAL-CLAUSE INITIALLY ...) ; processing (DEF-SPECIAL-CLAUSE AFTER-EACH ...) ; processing (DEF-SPECIAL-CLAUSE ELSE ...) ; processing (DEF-SPECIAL-CLAUSE FINALLY ...) ; processing (DEF-SPECIAL-CLAUSE FINALLY-PROTECTED ...) ; processing (DEF-SPECIAL-CLAUSE IF-FIRST-TIME ...) ; processing (DEF-SPECIAL-CLAUSE FIRST-TIME-P ...) ; processing (DEF-SPECIAL-CLAUSE FIRST-ITERATION-P ...) ; processing (DEF-SPECIAL-CLAUSE IN ...) ; processing (DEF-SPECIAL-CLAUSE NEXT ...) ; processing (DEFUN MAKE-NEXT-CODE ...) ; processing (DEFUN VAR-VALUE-RETURNED ...) ; processing (DEFSYNONYM AS ...) ; processing (DEFSYNONYM GENERATING ...) ; processing (DEFCLAUSE (REPEAT N) ...) ; processing (DEFCLAUSE-DRIVER (FOR VAR-SPEC ...) ...) ; processing (DEFCLAUSE-DRIVER (FOR VAR ...) ...) ; processing (DEFCLAUSE-DRIVER (FOR VAR ...) ...) ; processing (DEFUN GENERATE-FUNCTION-STEP-CODE ...) ; processing (DEFCLAUSE-SEQUENCE IN-VECTOR ...) ; processing (DEFCLAUSE-SEQUENCE IN-SEQUENCE ...) ; processing (DEFCLAUSE-SEQUENCE IN-STRING ...) ; processing (DEFCLAUSE-DRIVER (FOR KEY-VAL-VARS ...) ...) ; processing (DEFCLAUSE-DRIVER (FOR SYM-ACCESS-PKG-VARS ...) ...) ; processing (DEFMACRO-DRIVER (FOR VAR ...) ...) ; processing (DEFCLAUSE-DRIVER (FOR VAR ...) ...) ; processing (DEFCLAUSE-DRIVER (FOR VAR ...) ...) ; processing (DEFUN RETURN-STREAM-DRIVER-CODE ...) ; processing (DEFCLAUSE-DRIVER (FOR VAR ...) ...) ; processing (DEFCLAUSE-DRIVER (FOR VAR ...) ...) ; processing (DEFCLAUSE (WITH VAR ...) ...) ; processing (DEFCLAUSE (FOR VAR ...) ...) ; processing (DEFCLAUSE (FOR VAR ...) ...) ; processing (DEFCLAUSE (FOR VAR ...) ...) ; processing (DEFUN RETURN-REDUCTION-CODE ...) ; processing (DEFSYNONYM COUNT ...) ; processing (DEFCLAUSE (COUNTING EXPR ...) ...) ; processing (DEFCLAUSE (SUM EXPR ...) ...) ; processing (DEFSYNONYM SUMMING ...) ; processing (DEFCLAUSE (MULTIPLY EXPR ...) ...) ; processing (DEFSYNONYM MULTIPLYING ...) ; processing (DEFCLAUSE (REDUCING EXPR ...) ...) ; processing (DEFCLAUSE (MAXIMIZE EXPR ...) ...) ; processing (DEFSYNONYM MAXIMIZING ...) ; processing (DEFCLAUSE (MINIMIZE EXPR ...) ...) ; processing (DEFSYNONYM MINIMIZING ...) ; processing (DEFUN RETURN-EXTREMUM-CODE ...) ; processing (DEFMACRO FINISH ...) ; processing (DEFMACRO TERMINATE ...) ; processing (DEFMACRO NEXT-ITERATION ...) ; processing (DEFMACRO LEAVE ...) ; processing (DEFCLAUSE (WHILE EXPR) ...) ; processing (DEFCLAUSE (UNTIL EXPR) ...) ; processing (DEFCLAUSE (ALWAYS EXPR) ...) ; processing (DEFCLAUSE (NEVER EXPR) ...) ; processing (DEFCLAUSE (THEREIS EXPR) ...) ; processing (DEFCLAUSE (FINDING EXPR ...) ...) ; processing (DEFCLAUSE (FINDING EXPR ...) ...) ; processing (DEFCLAUSE (FINDING EXPR ...) ...) ; processing (DEFUN RETURN-FIND-EXTREMUM-CODE ...) ; processing (DEFUN RETURN-COLLECTION-CODE ...) ; processing (DEFCLAUSE (COLLECT EXPR ...) ...) ; processing (DEFSYNONYM COLLECTING ...) ; processing (DEFCLAUSE (ADJOINING EXPR ...) ...) ; processing (DEFCLAUSE (NCONCING EXPR ...) ...) ; processing (DEFCLAUSE (APPENDING EXPR ...) ...) ; processing (DEFCLAUSE (UNIONING EXPR ...) ...) ; processing (DEFCLAUSE (NUNIONING EXPR ...) ...) ; processing (DEFCLAUSE (ACCUMULATE EXPR ...) ...) ; processing (DEFSYNONYM ACCUMULATING ...) ; processing (DEFCLAUSE (FOR PVAR-SPEC ...) ...) ; processing (DEFUN REGISTER-PREVIOUS-CODE ...) ; processing (DEFUN INTERN-PREVIOUS-INFO ...) ; processing (DEFUN IS-SAVE-VAR ...) ; processing (DEFUN MAKE-SAVE-VARS ...) ; processing (DEFUN INSERT-PREVIOUS-CODE ...) ; processing (DEFUN DO-EXTRA-SAVE-VAR-HACK ...) ; processing (DEFUN MAKE-POST-SAVE-VAR ...) ; processing (DEFUN MAKE-PREV-CODE ...) ; processing (DEFUN MAKE-SAVE-PREVIOUS-CODE ...) ; processing (DEFUN SPLICE-IN-CODE ...) ; processing (DEFUN ADD-PROGN ...) ; processing (DEFUN AT-TOP-LEVEL? ...) ; processing (DEFUN TOP-LEVEL-CHECK ...) ; processing (DEFUN PROGNIFY ...) ; processing (DEFUN CLAUSE-ERROR ...) ; processing (DEFUN CLAUSE-WARNING ...) ; processing (DEFUN BUG ...) ; processing (DEFVAR *GENVAR-COUNTER* ...) ; processing (DEFUN GENVAR ...) ; processing (DEFUN SYMBOL-APPEND ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/iterate/iterate-tmpA60KLDKY.fasl ; compilation finished in 0:00:13.459 ; compiling file "/usr/share/common-lisp/source/garbage-pools/garbage-pools.lisp" (written 17 APR 2013 09:15:14 AM): ; processing (DEFPACKAGE :GARBAGE-POOLS ...) ; processing (IN-PACKAGE #:GARBAGE-POOLS) ; processing (DEFVAR *POOL*) ; processing (DEFCLASS POOL ...) ; processing (DEFUN CLEANUP-REGISTER ...) ; processing (DEFUN CLEANUP-POOL ...) ; processing (DEFUN CLEANUP-OBJECT ...) ; processing (DEFUN CANCEL-OBJECT-CLEANUP ...) ; processing (DEFMACRO WITH-GARBAGE-POOL ...) ; processing (DEFGENERIC OBJECT-REGISTER ...) ; processing (DEFMETHOD OBJECT-REGISTER ...) ; processing (DEFMACRO DEFCLEANUP ...) ; processing (DEFCLEANUP POOL ...) ; processing (DEFCLEANUP STREAM ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/garbage-pools/garbage-pools-tmpD801X3GJ.fasl ; compilation finished in 0:00:00.139 ; compiling file "/usr/share/common-lisp/source/parse-number/parse-number.lisp" (written 30 OCT 2017 08:17:56 PM): ; processing (DEFPACKAGE #:ORG.MAPCAR.PARSE-NUMBER ...) ; processing (IN-PACKAGE #:ORG.MAPCAR.PARSE-NUMBER) ; processing (DEFINE-CONDITION INVALID-NUMBER ...) ; processing (DECLAIM (TYPE CONS ...)) ; processing (DEFPARAMETER *WHITE-SPACE-CHARACTERS* ...) ; processing (DECLAIM (INLINE WHITE-SPACE-P)) ; processing (DEFUN WHITE-SPACE-P ...) ; processing (DECLAIM (INLINE PARSE-INTEGER-AND-PLACES)) ; processing (DEFUN PARSE-INTEGER-AND-PLACES ...) ; file: /usr/share/common-lisp/source/parse-number/parse-number.lisp ; in: DEFUN PARSE-INTEGER-AND-PLACES ; (CHAR STRING ORG.MAPCAR.PARSE-NUMBER::POS) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (CONS INTEGER ORG.MAPCAR.PARSE-NUMBER::RELEVANT-DIGITS) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of INIT-SLOT ; processing (DEFUN PARSE-INTEGERS ...) ; file: /usr/share/common-lisp/source/parse-number/parse-number.lisp ; in: DEFUN PARSE-INTEGERS ; (ORG.MAPCAR.PARSE-NUMBER::PARSE-INTEGER-AND-PLACES STRING ; ORG.MAPCAR.PARSE-NUMBER::LEFT ORG.MAPCAR.PARSE-NUMBER::END :RADIX ; ORG.MAPCAR.PARSE-NUMBER::RADIX) ; --> BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION LET ; ==> ; (- ORG.MAPCAR.PARSE-NUMBER::END-POS ORG.MAPCAR.PARSE-NUMBER::START ; (LOOP :FOR ORG.MAPCAR.PARSE-NUMBER::POS :FROM (- ; ORG.MAPCAR.PARSE-NUMBER::END-POS ; 1) :DOWNTO ORG.MAPCAR.PARSE-NUMBER::START ; :WHILE (MEMBER (CHAR STRING ORG.MAPCAR.PARSE-NUMBER::POS) ; ORG.MAPCAR.PARSE-NUMBER::*WHITE-SPACE-CHARACTERS*) ; :COUNT 1)) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (ORG.MAPCAR.PARSE-NUMBER::PARSE-INTEGER-AND-PLACES STRING ; ORG.MAPCAR.PARSE-NUMBER::LEFT ORG.MAPCAR.PARSE-NUMBER::RIGHT :RADIX ; ORG.MAPCAR.PARSE-NUMBER::RADIX) ; --> BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION LET ; ==> ; (- ORG.MAPCAR.PARSE-NUMBER::END-POS ORG.MAPCAR.PARSE-NUMBER::START ; (LOOP :FOR ORG.MAPCAR.PARSE-NUMBER::POS :FROM (- ; ORG.MAPCAR.PARSE-NUMBER::END-POS ; 1) :DOWNTO ORG.MAPCAR.PARSE-NUMBER::START ; :WHILE (MEMBER (CHAR STRING ORG.MAPCAR.PARSE-NUMBER::POS) ; ORG.MAPCAR.PARSE-NUMBER::*WHITE-SPACE-CHARACTERS*) ; :COUNT 1)) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ==> ; (CONS INTEGER ORG.MAPCAR.PARSE-NUMBER::RELEVANT-DIGITS) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of INIT-SLOT ; (ORG.MAPCAR.PARSE-NUMBER::PARSE-INTEGER-AND-PLACES STRING ; ORG.MAPCAR.PARSE-NUMBER::LEFT ORG.MAPCAR.PARSE-NUMBER::END :RADIX ; ORG.MAPCAR.PARSE-NUMBER::RADIX) ; --> BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION LET ; ==> ; (CONS INTEGER ORG.MAPCAR.PARSE-NUMBER::RELEVANT-DIGITS) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of INIT-SLOT ; processing (DECLAIM (INLINE NUMBER-VALUE ...)) ; processing (DEFUN NUMBER-VALUE ...) ; processing (DEFUN PLACES ...) ; processing (DEFUN PARSE-NUMBER ...) ; processing (DEFUN PARSE-REAL-NUMBER ...) ; processing (DEFUN BASE-FOR-EXPONENT-MARKER ...) ; processing (DEFUN MAKE-FLOAT/FRAC ...) ; processing (DEFUN MAKE-FLOAT/WHOLE ...) ; processing (DEFUN PARSE-POSITIVE-REAL-NUMBER ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/parse-number/parse-number-tmpGOW1GC70.fasl ; compilation finished in 0:00:01.467 ; compiling file "/usr/share/common-lisp/source/mssql/src/packages.lisp" (written 21 JUN 2017 01:29:38 AM): ; processing (DEFPACKAGE #:MSSQL ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/mssql/src/packages-tmpPQ1X28TL.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/mssql/src/mssql.lisp" (written 21 JUN 2017 01:29:38 AM): ; processing (IN-PACKAGE :MSSQL) ; processing (DEFINE-FOREIGN-LIBRARY SYBDB ...) ; processing (WITH-SIMPLE-RESTART (SKIP "Skip loading foreign library tds.") ...) ; processing (DEFCTYPE %DBPROCESS ...) ; processing (DEFCTYPE %CHARPTR ...) ; processing (DEFCTYPE %LOGINREC ...) ; processing (DEFCTYPE %RETCODE ...) ; processing (DEFCTYPE %BYTE ...) ; processing (DEFCTYPE %DBINT ...) ; processing (DEFCTYPE %DBSMALLINT ...) ; processing (DEFCONSTANT +FAIL+ ...) ; processing (DEFCONSTANT +INT_CANCEL+ ...) ; processing (DEFINE-CONDITION MSSQL-ERROR ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFCFUN ("dberrhandle" %DBERRHANDLE) ...) ; processing (DEFVAR *ERROR-MESSAGE-LIST*) ; processing (DEFCALLBACK %ERROR-HANDLER ...) ; processing (%DBERRHANDLE (CALLBACK %ERROR-HANDLER)) ; processing (DEFCFUN ("dbmsghandle" %DBMSGHANDLE) ...) ; processing (DEFCALLBACK %MESSAGE-HANDLER ...) ; processing (%DBMSGHANDLE (CALLBACK %MESSAGE-HANDLER)) ; processing (DEFMACRO DEFINE-SYBDB-FUNCTION ...) ; processing (DEFUN CFFI-STRING ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/mssql/src/mssql-tmpE92ECU7O.fasl ; compilation finished in 0:00:00.723 ; compiling file "/usr/share/common-lisp/source/mssql/src/connection.lisp" (written 21 JUN 2017 01:29:38 AM): ; processing (IN-PACKAGE :MSSQL) ; processing (DEFVAR *DATABASE* ...) ; processing (DEFCLASS DATABASE-CONNECTION ...) ; processing (DEFINE-SYBDB-FUNCTION ("dblogin" %DBLOGIN ...) ...) ; processing (DEFINE-SYBDB-FUNCTION ("dbloginfree" %DBLOGINFREE) ...) ; processing (DEFINE-SYBDB-FUNCTION ("dbsetlname" %DBSETLNAME ...) ...) ; processing (DEFINE-SYBDB-FUNCTION ("tdsdbopen" %TDSDBOPEN ...) ...) ; processing (DEFINE-SYBDB-FUNCTION ("dbcmd" %DBCMD ...) ...) ; processing (DEFINE-SYBDB-FUNCTION ("dbsqlexec" %DBSQLEXEC ...) ...) ; processing (DEFINE-SYBDB-FUNCTION ("dbcancel" %DBCANCEL ...) ...) ; processing (DEFUN CONNECT ...) ; processing (DEFUN CONNECTED-P ...) ; processing (DEFINE-SYBDB-FUNCTION ("dbclose" %DBCLOSE) ...) ; processing (DEFUN DISCONNECT ...) ; processing (GARBAGE-POOLS:DEFCLEANUP DATABASE-CONNECTION ...) ; processing (DEFUN DISCONNECT-TOPLEVEL ...) ; processing (DEFUN CONNECT-TOPLEVEL ...) ; processing (DEFMACRO WITH-CONNECTION ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/mssql/src/connection-tmp8S0II570.fasl ; compilation finished in 0:00:00.971 ; compiling file "/usr/share/common-lisp/source/mssql/src/query.lisp" (written 21 JUN 2017 01:29:38 AM): ; processing (IN-PACKAGE :MSSQL) ; processing (DEFCONSTANT +NO-MORE-RESULTS+ ...) ; processing (DEFCONSTANT +NO-MORE-ROWS+ ...) ; processing (DEFINE-SYBDB-FUNCTION ("dbresults" %DBRESULTS) ...) ; processing (DEFINE-SYBDB-FUNCTION ("dbnumcols" %DBNUMCOLS) ...) ; processing (DEFINE-SYBDB-FUNCTION ("dbcolname" %DBCOLNAME) ...) ; processing (DEFINE-SYBDB-FUNCTION ("dbcoltype" %DBCOLTYPE) ...) ; processing (DEFINE-SYBDB-FUNCTION ("dbnextrow" %DBNEXTROW) ...) ; processing (DEFINE-SYBDB-FUNCTION ("dbdata" %DBDATA) ...) ; processing (DEFINE-SYBDB-FUNCTION ("dbdatlen" %DBDATLEN) ...) ; processing (DEFCENUM %SYB-VALUE-TYPE ...) ; processing (DEFINE-SYBDB-FUNCTION ("dbconvert" %DBCONVERT) ...) ; processing (DEFCONSTANT +NUMERIC-BUF-SZ+ ...) ; processing (DEFUN SYSDB-DATA-TO-LISP ...) ; processing (DEFUN FIELD-NAME-S ...) ; processing (DEFUN ONE-ROW ...) ; processing (DEFUN ALL-ROWS ...) ; processing (DEFMACRO DEFINE-ROW-READER ...) ; processing (DEFINE-ROW-READER READ-PLIST-ROW ...) ; processing (DEFINE-ROW-READER READ-ALIST-ROW ...) ; processing (DEFINE-ROW-READER READ-LIST-ROW ...) ; file: /usr/share/common-lisp/source/mssql/src/query.lisp ; in: DEFINE-ROW-READER READ-LIST-ROW ; (MSSQL::DEFINE-ROW-READER MSSQL::READ-LIST-ROW ; (MSSQL::COLLUMN MSSQL::VALUE) ; (ITERATE:COLLECT MSSQL::VALUE)) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK ITERATE:ITER ; ==> ; (LET* ((#:LIST16 NIL) ; (MSSQL::COLLUMN NIL) ; (#:G2 NIL) ; (MSSQL::VALUE NIL) ; (#:RESULT15 NIL) ; (#:END-POINTER17 NIL) ; (#:TEMP18 NIL)) ; (BLOCK NIL ; (TAGBODY ; (PROGN (SETQ #) (SETQ #)) ; MSSQL::LOOP-TOP-NIL ; (PROGN ; (IF # ; #) ; (SETQ #) ; (SETQ #) ; (SETQ #) ; (SETQ #) ; (PROGN # # #:RESULT15)) ; (PROGN) ; (GO MSSQL::LOOP-TOP-NIL) ; MSSQL::LOOP-END-NIL ; (PROGN)) ; #:RESULT15)) ; ; caught STYLE-WARNING: ; The variable COLLUMN is assigned but never read. ; processing (DEFUN READ-SINGLE-VALUE ...) ; processing (DEFPARAMETER *QUERY-FORMATS* ...) ; processing (DEFUN GET-RESULTS ...) ; processing (DEFUN QUERY ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/mssql/src/query-tmpJE88A12F.fasl ; compilation finished in 0:00:00.559 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/mssql/src/execute.lisp" (written 21 JUN 2017 01:29:38 AM): ; processing (IN-PACKAGE :MSSQL) ; processing (DEFUN EXECUTE ...) ; processing (DEFCLASS TRANSACTION-HANDLE ...) ; processing (DEFMACRO WITH-TRANSACTION ...) ; processing (DEFUN ROLLBACK-TRANSACTION ...) ; processing (DEFUN COMMIT-TRANSACTION ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/mssql/src/execute-tmpA5FNLPLT.fasl ; compilation finished in 0:00:00.115 ; compiling file "/usr/share/common-lisp/source/mssql/src/remote.lisp" (written 21 JUN 2017 01:29:38 AM): ; processing (IN-PACKAGE :MSSQL) ; processing (DEFINE-SYBDB-FUNCTION ("dbrpcinit" %DBRPCINIT) ...) ; processing (DEFINE-SYBDB-FUNCTION ("dbrpcparam" %DBRPCPARAM) ...) ; processing (DEFINE-SYBDB-FUNCTION ("dbrpcsend" %DBRPCSEND) ...) ; processing (DEFUN LISP-TO-SYSDB ...) ; processing (DEFUN CALL-REMOTE-PROCEDURE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/mssql/src/remote-tmpHKCV9TP8.fasl ; compilation finished in 0:00:00.163 ; ; compilation unit finished ; caught 1 STYLE-WARNING condition ; printed 6 notes ;; loading file #P"/build/reproducible-path/pgloader-3.6.2/src/hooks.lisp" ;; loading #P"/build/reproducible-path/pgloader-3.6.2/src/hooks.lisp" ;; # ;; (:PGLOADER-IMAGE :BORDEAUX-THREADS :FLEXI-STREAMS :THREAD-SUPPORT CFFI-FEATURES:FLAT-NAMESPACE CFFI-FEATURES:X86-64 CFFI-FEATURES:UNIX :CFFI CFFI-SYS::FLAT-NAMESPACE ALEXANDRIA::SEQUENCE-EMPTYP :ASDF-SYSTEM-CONNECTIONS :ASDF3.3 :ASDF3.2 :ASDF3.1 :ASDF3 :ASDF2 :ASDF :OS-UNIX :NON-BASE-CHARS-EXIST-P :ASDF-UNICODE :X86-64 :GENCGC :64-BIT :ANSI-CL :COMMON-LISP :ELF :IEEE-FLOATING-POINT :LINUX :LITTLE-ENDIAN :PACKAGE-LOCAL-NICKNAMES :SB-CORE-COMPRESSION :SB-LDB :SB-PACKAGE-LOCKS :SB-THREAD :SB-UNICODE :SBCL :UNIX) ;; T ;; CLOSE-FOREIGN-LIBS ;; OPEN-FOREIGN-LIBS ;; (#) ;; (#) ;; loading system "pgloader" WARNING: System definition file #P"/usr/share/common-lisp/source/cl-fad/cl-fad.asd" contains definition for system "cl-fad-test". Please only define "cl-fad" and secondary systems with a name starting with "cl-fad/" (e.g. "cl-fad/test") in that file. WARNING: System definition file #P"/usr/share/common-lisp/source/ieee-floats/ieee-floats.asd" contains definition for system "ieee-floats-tests". Please only define "ieee-floats" and secondary systems with a name starting with "ieee-floats/" (e.g. "ieee-floats/test") in that file. WARNING: UIOP/VERSION:PARSE-VERSION: "1.1-dev" doesn't follow asdf version numbering convention WARNING: Invalid :version specifier "1.1-dev" for component "py-configparser" from file #P"/usr/share/common-lisp/source/py-configparser/py-configparser.asd", using NIL instead WARNING: Invalid :version specifier "1.1-dev" for component "py-configparser" from file #P"/usr/share/common-lisp/source/py-configparser/py-configparser.asd", using NIL instead WARNING: System definition file #P"/usr/share/common-lisp/source/trivial-utf-8/trivial-utf-8.asd" contains definition for system "trivial-utf-8-tests". Please only define "trivial-utf-8" and secondary systems with a name starting with "trivial-utf-8/" (e.g. "trivial-utf-8/test") in that file. ;;; Checking for wide character support... WARNING: Lisp implementation doesn't use UTF-16, but accepts surrogate code points. yes, using code points. WARNING: System definition file #P"/usr/share/common-lisp/source/cxml/cxml.asd" contains definition for system "cxml-xml". Please only define "cxml" and secondary systems with a name starting with "cxml/" (e.g. "cxml/test") in that file. WARNING: System definition file #P"/usr/share/common-lisp/source/cxml/cxml.asd" contains definition for system "cxml-dom". Please only define "cxml" and secondary systems with a name starting with "cxml/" (e.g. "cxml/test") in that file. WARNING: System definition file #P"/usr/share/common-lisp/source/cxml/cxml.asd" contains definition for system "cxml-klacks". Please only define "cxml" and secondary systems with a name starting with "cxml/" (e.g. "cxml/test") in that file. WARNING: System definition file #P"/usr/share/common-lisp/source/cxml/cxml.asd" contains definition for system "cxml-test". Please only define "cxml" and secondary systems with a name starting with "cxml/" (e.g. "cxml/test") in that file. ;;; Checking for wide character support... WARNING: Lisp implementation doesn't use UTF-16, but accepts surrogate code points. yes, using code points. ;;; Building Closure with CHARACTER RUNES ; compiling file "/usr/share/common-lisp/source/cl-log/pkg.lisp" (written 07 DEC 2012 12:06:09 AM): ; processing (IN-PACKAGE "CL-USER") ; processing (DEFPACKAGE "COM.RAVENBROOK.COMMON-LISP-LOG" ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-log/pkg-tmpZ18MA7XE.fasl ; compilation finished in 0:00:00.023 ; compiling file "/usr/share/common-lisp/source/cl-log/cl-log.lisp" (written 07 DEC 2012 12:06:09 AM): ; processing (IN-PACKAGE "COM.RAVENBROOK.COMMON-LISP-LOG") ; processing (DEFPARAMETER *CL-LOG-RELEASE* ...) ; processing (DEFMACRO ORF ...) ; processing (DEFMACRO WHEN-LET ...) ; processing (DEFCLASS LOG-OBJECT ...) ; processing (DEFCLASS LOG-MANAGER ...) ; processing (DEFVAR *LOG-MANAGER* ...) ; processing (DEFUN LOG-MANAGER ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFUN FIRST-TIME-FOR-LOG-MANAGER ...) ; processing (DEFMETHOD LOGGING-DISABLED ...) ; processing (DEFMETHOD (SETF LOGGING-DISABLED) ...) ; processing (DEFMACRO WITH-LOGGING-DISABLED ...) ; processing (DEFMACRO WITH-LOG-MANAGER-DISABLED ...) ; processing (DEFMETHOD (SETF LOG-MANAGER-MESSENGERS) ...) ; processing (DEFMETHOD (SETF LOG-MANAGER-CATEGORY-SET) ...) ; processing (DEFMETHOD CATEGORY-CACHE ...) ; processing (DEFMETHOD INVALIDATE-LOG-MANAGER ...) ; processing (DEFUN (SETF LOG-MANAGER) ...) ; processing (DEFMACRO REBINDING-LOG-MANAGER ...) ; processing (DEFSTRUCT (TIMESTAMP #) ...) ; processing (DEFUN MAKE-TIMESTAMP ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFCLASS BASE-MESSAGE ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFCLASS FORMATTED-MESSAGE ...) ; processing (DEFMETHOD MESSAGE-TEXT ...) ; processing (DEFMETHOD FORMAT-MESSAGE ...) ; processing (DEFCLASS BASE-MESSENGER ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFUN START-MESSENGER ...) ; processing (DEFMETHOD STOP-MESSENGER ...) ; processing (DEFMETHOD STOP-MESSENGER ...) ; processing (DEFUN FIND-MESSENGER ...) ; processing (DEFUN CATEGORY-MESSENGERS ...) ; processing (DEFUN CATEGORY-SATISFIES ...) ; processing (DEFUN IN-CATEGORY-SATISFIES ...) ; processing (DEFUN SEND-MESSAGE ...) ; processing (DEFMETHOD MESSENGER-SEND-MESSAGE ...) ; processing (DEFSTRUCT (RING #) ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN MAKE-RING ...) ; processing (DEFUN RING-PUSH ...) ; processing (DEFUN RING-LIST ...) ; processing (DEFCLASS RING-MESSENGER ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFMETHOD MESSENGER-SEND-MESSAGE ...) ; processing (DEFMETHOD RING-MESSENGER-MESSAGES ...) ; processing (DEFCLASS TEXT-STREAM-MESSENGER ...) ; processing (DEFMETHOD MESSENGER-SEND-MESSAGE ...) ; processing (DEFMETHOD STOP-MESSENGER ...) ; processing (DEFCLASS TEXT-FILE-MESSENGER ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFCLASS CATEGORY-SET ...) ; processing (DEFUN EXPAND-CATEGORY ...) ; processing (DEFMACRO DEFCATEGORY ...) ; processing (DEFUN DEFCATEGORY-FN ...) ; processing (DEFMACRO UNDEFCATEGORY ...) ; processing (DEFUN UNDEFCATEGORY-FN ...) ; processing (DEFUN CLEAR-CATEGORIES ...) ; processing (DEFMACRO LOG-MANAGER-MESSAGE ...) ; processing (DEFMACRO LOG-MESSAGE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-log/cl-log-tmp6LQJ9T0C.fasl ; compilation finished in 0:00:00.631 ; compiling file "/usr/share/common-lisp/source/md5/md5.lisp" (written 23 FEB 2018 11:24:35 AM): ; processing (DEFPACKAGE #:MD5 ...) ; processing (IN-PACKAGE #:MD5) ; processing (DEFTYPE UB32 ...) ; processing (DEFMACRO ASSEMBLE-UB32 ...) ; processing (DEFTYPE UB32-VECTOR ...) ; processing (DEFMACRO MAKE-UB32-VECTOR ...) ; processing (DEFMACRO UB32-AREF ...) ; processing (DECLAIM (INLINE F ...) ...) ; processing (DEFUN F ...) ; processing (DEFUN G ...) ; processing (DEFUN H ...) ; processing (DEFUN I ...) ; processing (DECLAIM (INLINE MOD32+) ...) ; processing (DEFUN MOD32+ ...) ; processing (DEFINE-COMPILER-MACRO MOD32+ ...) ; processing (DECLAIM (INLINE ROL32) ...) ; processing (DEFUN ROL32 ...) ; processing (DEFPARAMETER *T* ...) ; processing (DEFMACRO WITH-MD5-ROUND ...) ; processing (DEFTYPE MD5-REGS ...) ; processing (DEFMACRO MD5-REGS-A ...) ; processing (DEFMACRO MD5-REGS-B ...) ; processing (DEFMACRO MD5-REGS-C ...) ; processing (DEFMACRO MD5-REGS-D ...) ; processing (DEFCONSTANT +MD5-MAGIC-A+ ...) ; processing (DEFCONSTANT +MD5-MAGIC-B+ ...) ; processing (DEFCONSTANT +MD5-MAGIC-C+ ...) ; processing (DEFCONSTANT +MD5-MAGIC-D+ ...) ; processing (DECLAIM (INLINE INITIAL-MD5-REGS)) ; processing (DEFUN INITIAL-MD5-REGS ...) ; processing (DEFTYPE MD5-BLOCK ...) ; processing (DEFUN UPDATE-MD5-BLOCK ...) ; processing (DECLAIM (INLINE FILL-BLOCK ...)) ; processing (DEFUN FILL-BLOCK-UB8 ...) ; processing (DEFUN FILL-BLOCK-CHAR ...) ; processing (DEFUN FILL-BLOCK ...) ; processing (DECLAIM (INLINE MD5REGS-DIGEST)) ; processing (DEFUN MD5REGS-DIGEST ...) ; processing (DEFSTRUCT (MD5-STATE # ...) ...) ; file: /usr/share/common-lisp/source/md5/md5.lisp ; in: DEFSTRUCT MD5-STATE ; (DEFSTRUCT (MD5:MD5-STATE (:CONSTRUCTOR MD5:MAKE-MD5-STATE NIL) (:COPIER)) ; (MD5::REGS (MD5:INITIAL-MD5-REGS) :TYPE MD5:MD5-REGS :READ-ONLY T) ; (MD5::AMOUNT 0 :TYPE (INTEGER 0 *)) ; (BLOCK (MD5::MAKE-UB32-VECTOR 16) :READ-ONLY T :TYPE MD5::MD5-BLOCK) ; (MD5::BUFFER (MAKE-ARRAY 64 :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) :READ-ONLY T ; :TYPE (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (64))) ; (MD5::BUFFER-INDEX 0 :TYPE (INTEGER 0 63)) ; (MD5::FINALIZED-P NIL)) ; --> PROGN SB-C:XDEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN ; --> SB-INT:NAMED-LAMBDA FUNCTION BLOCK SB-KERNEL:%INSTANCE-SET SB-KERNEL:THE* ; --> MULTIPLE-VALUE-BIND LET UNLESS IF AND IF LOCALLY AND THE ; ==> ; (>= (TRULY-THE INTEGER #:G14) 0) ; ; note: forced to do FAST-IF-<-ZERO (cost 9) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a INTEGER, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> PROGN SB-KERNEL::%TARGET-DEFSTRUCT SB-KERNEL::%TARGET-DEFSTRUCT ; --> SB-INT:NAMED-LAMBDA FUNCTION AND IF IF ; ==> ; (= ; (SB-KERNEL:THE* ((INTEGER 0 *) :DERIVE-TYPE-ONLY T) ; (SB-KERNEL:%INSTANCE-REF (THE MD5:MD5-STATE SB-KERNEL::A) ; 1)) ; (SB-KERNEL:THE* ((INTEGER 0 *) :DERIVE-TYPE-ONLY T) ; (SB-KERNEL:%INSTANCE-REF (THE MD5:MD5-STATE SB-KERNEL::B) ; 1))) ; ; note: forced to do %EQL/INTEGER (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The second argument is a UNSIGNED-BYTE, not a FIXNUM. ; processing (DECLAIM (INLINE COPY-TO-BUFFER)) ; processing (DEFUN COPY-TO-BUFFER ...) ; processing (DEFUN UPDATE-MD5-STATE ...) ; file: /usr/share/common-lisp/source/md5/md5.lisp ; in: DEFUN UPDATE-MD5-STATE ; (+ (MD5::MD5-STATE-AMOUNT MD5::STATE) LENGTH) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), 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 first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; processing (DEFUN FINALIZE-MD5-STATE ...) ; file: /usr/share/common-lisp/source/md5/md5.lisp ; in: DEFUN FINALIZE-MD5-STATE ; (* 8 (MD5::MD5-STATE-AMOUNT MD5::STATE)) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #2=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do #1# (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #2#), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; (LDB (BYTE 32 32) MD5::TOTAL-LENGTH) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #2=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do #1# (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #2#), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; processing (DEFUN MD5SUM-SEQUENCE ...) ; file: /usr/share/common-lisp/source/md5/md5.lisp ; in: DEFUN MD5SUM-SEQUENCE ; (+ MD5::REAL-START (- MD5::END MD5::START)) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first result of inline (signed-byte 64) arithmetic ; processing (DEFUN MD5SUM-STRING ...) ; processing (DEFCONSTANT +BUFFER-SIZE+ ...) ; processing (DEFTYPE BUFFER-INDEX ...) ; processing (DEFUN MD5SUM-STREAM ...) ; processing (DEFUN MD5SUM-FILE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/md5/md5-tmpTX7OA81T.fasl ; compilation finished in 0:00:02.299 ; compiling file "/usr/share/common-lisp/source/cl-split-sequence/package.lisp" (written 11 MAY 2019 09:39:50 AM): ; processing (DEFPACKAGE #:SPLIT-SEQUENCE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-split-sequence/package-tmpWOTC3PB7.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/cl-split-sequence/vector.lisp" (written 11 MAY 2019 09:39:50 AM): ; processing (IN-PACKAGE :SPLIT-SEQUENCE) ; processing (DECLAIM (INLINE SPLIT-VECTOR ...)) ; processing (DEFTYPE ARRAY-INDEX ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN SPLIT-VECTOR ...) ; file: /usr/share/common-lisp/source/cl-split-sequence/vector.lisp ; in: DEFUN SPLIT-VECTOR ; (DEFUN SPLIT-SEQUENCE::SPLIT-VECTOR ; (SPLIT-SEQUENCE::DELIMITER VECTOR SPLIT-SEQUENCE::START ; SPLIT-SEQUENCE::END SPLIT-SEQUENCE::FROM-END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS SPLIT-SEQUENCE::TEST ; SPLIT-SEQUENCE::TEST-NOT SPLIT-SEQUENCE::KEY) ; (COND ; ((AND (NOT SPLIT-SEQUENCE::FROM-END) (NULL SPLIT-SEQUENCE::TEST-NOT)) ; (SPLIT-SEQUENCE::SPLIT-VECTOR-FROM-START (LAMBDA # #) VECTOR ; SPLIT-SEQUENCE::START SPLIT-SEQUENCE::END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS)) ; ((AND (NOT SPLIT-SEQUENCE::FROM-END) SPLIT-SEQUENCE::TEST-NOT) ; (SPLIT-SEQUENCE::SPLIT-VECTOR-FROM-START (LAMBDA # #) VECTOR ; SPLIT-SEQUENCE::START SPLIT-SEQUENCE::END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS)) ; ((AND SPLIT-SEQUENCE::FROM-END (NULL SPLIT-SEQUENCE::TEST-NOT)) ; (SPLIT-SEQUENCE::SPLIT-VECTOR-FROM-END (LAMBDA # #) VECTOR ; SPLIT-SEQUENCE::START SPLIT-SEQUENCE::END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS)) ; (T ; (SPLIT-SEQUENCE::SPLIT-VECTOR-FROM-END (LAMBDA # #) VECTOR ; SPLIT-SEQUENCE::START SPLIT-SEQUENCE::END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS)))) ; --> PROGN ; ==> ; (SB-IMPL::%DEFUN 'SPLIT-SEQUENCE::SPLIT-VECTOR ; (SB-INT:NAMED-LAMBDA SPLIT-SEQUENCE::SPLIT-VECTOR ; (SPLIT-SEQUENCE::DELIMITER VECTOR SPLIT-SEQUENCE::START ; SPLIT-SEQUENCE::END SPLIT-SEQUENCE::FROM-END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS ; SPLIT-SEQUENCE::TEST SPLIT-SEQUENCE::TEST-NOT ; SPLIT-SEQUENCE::KEY) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK SPLIT-SEQUENCE::SPLIT-VECTOR ; (COND (# #) (# #) (# #) (T #)))) ; '(LAMBDA ; (SPLIT-SEQUENCE::DELIMITER VECTOR SPLIT-SEQUENCE::START ; SPLIT-SEQUENCE::END SPLIT-SEQUENCE::FROM-END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS ; SPLIT-SEQUENCE::TEST SPLIT-SEQUENCE::TEST-NOT ; SPLIT-SEQUENCE::KEY) ; (BLOCK SPLIT-SEQUENCE::SPLIT-VECTOR ; (COND (# #) (# #) (# #) (T #))))) ; ; caught STYLE-WARNING: ; Call to SPLIT-SEQUENCE::SPLIT-VECTOR-FROM-END could not be inlined because its ; source code was not saved. A global INLINE or SB-EXT:MAYBE-INLINE proclamation ; must be in effect to save function definitions for inlining. ; ; caught STYLE-WARNING: ; Call to SPLIT-SEQUENCE::SPLIT-VECTOR-FROM-START could not be inlined because ; its source code was not saved. A global INLINE or SB-EXT:MAYBE-INLINE ; proclamation must be in effect to save function definitions for inlining. ; processing (DEFUN SPLIT-VECTOR-IF ...) ; processing (DEFUN SPLIT-VECTOR-IF-NOT ...) ; processing (DEFUN SPLIT-VECTOR-FROM-END ...) ; processing (DEFUN SPLIT-VECTOR-FROM-START ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-split-sequence/vector-tmpHQE95SAC.fasl ; compilation finished in 0:00:00.031 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/cl-split-sequence/list.lisp" (written 11 MAY 2019 09:39:50 AM): ; processing (IN-PACKAGE :SPLIT-SEQUENCE) ; processing (DECLAIM (INLINE COLLECT-UNTIL ...)) ; processing (DECLAIM (FTYPE # ...)) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN COLLECT-UNTIL ...) ; processing (DEFUN COUNT-WHILE ...) ; processing (DEFUN SPLIT-LIST-INTERNAL ...) ; processing (DEFUN SPLIT-LIST-FROM-END ...) ; file: /usr/share/common-lisp/source/cl-split-sequence/list.lisp ; in: DEFUN SPLIT-LIST-FROM-END ; (SPLIT-SEQUENCE::SPLIT-LIST-INTERNAL SPLIT-SEQUENCE::PREDICATE (REVERSE LIST) ; (IF SPLIT-SEQUENCE::END ; (- LENGTH SPLIT-SEQUENCE::END) ; 0) ; (- LENGTH SPLIT-SEQUENCE::START) COUNT SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS) ; --> BLOCK LET FLET VALUES + IF SPLIT-SEQUENCE::COUNT-WHILE BLOCK IF LOOP ; --> BLOCK LET SB-KERNEL:THE* LIST ; ==> ; LIST ; ; note: deleting unreachable code ; processing (DEFUN SPLIT-LIST-FROM-START ...) ; processing (DEFUN SPLIT-LIST-IF ...) ; file: /usr/share/common-lisp/source/cl-split-sequence/list.lisp ; in: DEFUN SPLIT-LIST-IF ; (SPLIT-SEQUENCE::SPLIT-LIST-FROM-END SPLIT-SEQUENCE::PREDICATE LIST ; SPLIT-SEQUENCE::START SPLIT-SEQUENCE::END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS) ; --> BLOCK LET MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; --> SPLIT-SEQUENCE::SPLIT-LIST-INTERNAL BLOCK LET FLET VALUES + IF ; --> SPLIT-SEQUENCE::COUNT-WHILE BLOCK IF LOOP BLOCK LET SB-KERNEL:THE* LIST ; ==> ; LIST ; ; note: deleting unreachable code ; processing (DEFUN SPLIT-LIST-IF-NOT ...) ; file: /usr/share/common-lisp/source/cl-split-sequence/list.lisp ; in: DEFUN SPLIT-LIST-IF-NOT ; (SPLIT-SEQUENCE::SPLIT-LIST-IF (COMPLEMENT SPLIT-SEQUENCE::PREDICATE) LIST ; SPLIT-SEQUENCE::START SPLIT-SEQUENCE::END SPLIT-SEQUENCE::FROM-END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS SPLIT-SEQUENCE::KEY) ; --> BLOCK LET IF SPLIT-SEQUENCE::SPLIT-LIST-FROM-END BLOCK LET ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; --> SPLIT-SEQUENCE::SPLIT-LIST-INTERNAL BLOCK LET FLET VALUES + IF ; --> SPLIT-SEQUENCE::COUNT-WHILE BLOCK IF LOOP BLOCK LET SB-KERNEL:THE* LIST ; ==> ; LIST ; ; note: deleting unreachable code ; processing (DEFUN SPLIT-LIST ...) ; file: /usr/share/common-lisp/source/cl-split-sequence/list.lisp ; in: DEFUN SPLIT-LIST ; (SPLIT-SEQUENCE::SPLIT-LIST-FROM-END SPLIT-SEQUENCE::PREDICATE LIST ; SPLIT-SEQUENCE::START SPLIT-SEQUENCE::END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS) ; --> BLOCK LET MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; --> SPLIT-SEQUENCE::SPLIT-LIST-INTERNAL BLOCK LET FLET VALUES + IF ; --> SPLIT-SEQUENCE::COUNT-WHILE BLOCK IF LOOP BLOCK LET SB-KERNEL:THE* LIST ; ==> ; LIST ; ; note: deleting unreachable code ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-split-sequence/list-tmpO87FP9NR.fasl ; compilation finished in 0:00:00.155 ; compiling file "/usr/share/common-lisp/source/cl-split-sequence/extended-sequence.lisp" (written 11 MAY 2019 09:39:50 AM): ; processing (IN-PACKAGE :SPLIT-SEQUENCE) ; processing (DEFTYPE EXTENDED-SEQUENCE ...) ; processing (DECLAIM (INLINE SPLIT-EXTENDED-SEQUENCE ...)) ; processing (DECLAIM (FTYPE # ...)) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN SPLIT-EXTENDED-SEQUENCE ...) ; file: /usr/share/common-lisp/source/cl-split-sequence/extended-sequence.lisp ; in: DEFUN SPLIT-EXTENDED-SEQUENCE ; (DEFUN SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE ; (SPLIT-SEQUENCE::DELIMITER SEQUENCE SPLIT-SEQUENCE::START ; SPLIT-SEQUENCE::END SPLIT-SEQUENCE::FROM-END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS SPLIT-SEQUENCE::TEST ; SPLIT-SEQUENCE::TEST-NOT SPLIT-SEQUENCE::KEY) ; (COND ; ((AND (NOT SPLIT-SEQUENCE::FROM-END) (NULL SPLIT-SEQUENCE::TEST-NOT)) ; (SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE-FROM-START (LAMBDA # #) SEQUENCE ; SPLIT-SEQUENCE::START SPLIT-SEQUENCE::END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS)) ; ((AND (NOT SPLIT-SEQUENCE::FROM-END) SPLIT-SEQUENCE::TEST-NOT) ; (SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE-FROM-START (LAMBDA # #) SEQUENCE ; SPLIT-SEQUENCE::START SPLIT-SEQUENCE::END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS)) ; ((AND SPLIT-SEQUENCE::FROM-END (NULL SPLIT-SEQUENCE::TEST-NOT)) ; (SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE-FROM-END (LAMBDA # #) SEQUENCE ; SPLIT-SEQUENCE::START SPLIT-SEQUENCE::END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS)) ; (T ; (SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE-FROM-END (LAMBDA # #) SEQUENCE ; SPLIT-SEQUENCE::START SPLIT-SEQUENCE::END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS)))) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE ; (SPLIT-SEQUENCE::DELIMITER SEQUENCE SPLIT-SEQUENCE::START ; SPLIT-SEQUENCE::END SPLIT-SEQUENCE::FROM-END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS SPLIT-SEQUENCE::TEST ; SPLIT-SEQUENCE::TEST-NOT SPLIT-SEQUENCE::KEY) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE ; (COND ; ((AND # #) ; (SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE-FROM-START # SEQUENCE ; SPLIT-SEQUENCE::START SPLIT-SEQUENCE::END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS)) ; ((AND # SPLIT-SEQUENCE::TEST-NOT) ; (SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE-FROM-START # SEQUENCE ; SPLIT-SEQUENCE::START SPLIT-SEQUENCE::END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS)) ; ((AND SPLIT-SEQUENCE::FROM-END #) ; (SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE-FROM-END # SEQUENCE ; SPLIT-SEQUENCE::START SPLIT-SEQUENCE::END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS)) ; (T ; (SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE-FROM-END # SEQUENCE ; SPLIT-SEQUENCE::START SPLIT-SEQUENCE::END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS))))) ; ; note: Type assertion too complex to check: ; (VALUES LIST UNSIGNED-BYTE &REST T). ; It allows an unknown number of values, consider using ; (VALUES LIST UNSIGNED-BYTE &OPTIONAL). ; --> PROGN ; ==> ; (SB-IMPL::%DEFUN 'SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE ; (SB-INT:NAMED-LAMBDA SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE ; (SPLIT-SEQUENCE::DELIMITER SEQUENCE ; SPLIT-SEQUENCE::START SPLIT-SEQUENCE::END ; SPLIT-SEQUENCE::FROM-END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS ; SPLIT-SEQUENCE::TEST SPLIT-SEQUENCE::TEST-NOT ; SPLIT-SEQUENCE::KEY) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE ; (COND (# #) (# #) (# #) (T #)))) ; '(LAMBDA ; (SPLIT-SEQUENCE::DELIMITER SEQUENCE ; SPLIT-SEQUENCE::START SPLIT-SEQUENCE::END ; SPLIT-SEQUENCE::FROM-END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS ; SPLIT-SEQUENCE::TEST SPLIT-SEQUENCE::TEST-NOT ; SPLIT-SEQUENCE::KEY) ; (BLOCK SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE ; (COND (# #) (# #) (# #) (T #))))) ; ; caught STYLE-WARNING: ; Call to SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE-FROM-END could not be inlined ; because its source code was not saved. A global INLINE or SB-EXT:MAYBE-INLINE ; proclamation must be in effect to save function definitions for inlining. ; ; caught STYLE-WARNING: ; Call to SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE-FROM-START could not be inlined ; because its source code was not saved. A global INLINE or SB-EXT:MAYBE-INLINE ; proclamation must be in effect to save function definitions for inlining. ; processing (DEFUN SPLIT-EXTENDED-SEQUENCE-IF ...) ; file: /usr/share/common-lisp/source/cl-split-sequence/extended-sequence.lisp ; in: DEFUN SPLIT-EXTENDED-SEQUENCE-IF ; (DEFUN SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE-IF ; (SPLIT-SEQUENCE::PREDICATE SEQUENCE SPLIT-SEQUENCE::START ; SPLIT-SEQUENCE::END SPLIT-SEQUENCE::FROM-END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS SPLIT-SEQUENCE::KEY) ; (IF SPLIT-SEQUENCE::FROM-END ; (SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE-FROM-END ; (LAMBDA (SEQUENCE SPLIT-SEQUENCE::END) ; (POSITION-IF SPLIT-SEQUENCE::PREDICATE SEQUENCE :END ; SPLIT-SEQUENCE::END :FROM-END T :KEY ; SPLIT-SEQUENCE::KEY)) ; SEQUENCE SPLIT-SEQUENCE::START SPLIT-SEQUENCE::END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS) ; (SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE-FROM-START ; (LAMBDA (SEQUENCE SPLIT-SEQUENCE::START) ; (POSITION-IF SPLIT-SEQUENCE::PREDICATE SEQUENCE :START ; SPLIT-SEQUENCE::START :KEY SPLIT-SEQUENCE::KEY)) ; SEQUENCE SPLIT-SEQUENCE::START SPLIT-SEQUENCE::END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS))) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE-IF ; (SPLIT-SEQUENCE::PREDICATE SEQUENCE SPLIT-SEQUENCE::START ; SPLIT-SEQUENCE::END SPLIT-SEQUENCE::FROM-END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS SPLIT-SEQUENCE::KEY) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE-IF ; (IF SPLIT-SEQUENCE::FROM-END ; (SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE-FROM-END (LAMBDA # #) ; SEQUENCE SPLIT-SEQUENCE::START SPLIT-SEQUENCE::END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS) ; (SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE-FROM-START (LAMBDA # #) ; SEQUENCE SPLIT-SEQUENCE::START SPLIT-SEQUENCE::END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS)))) ; ; note: Type assertion too complex to check: ; (VALUES LIST UNSIGNED-BYTE &REST T). ; It allows an unknown number of values, consider using ; (VALUES LIST UNSIGNED-BYTE &OPTIONAL). ; processing (DEFUN SPLIT-EXTENDED-SEQUENCE-IF-NOT ...) ; file: /usr/share/common-lisp/source/cl-split-sequence/extended-sequence.lisp ; in: DEFUN SPLIT-EXTENDED-SEQUENCE-IF-NOT ; (DEFUN SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE-IF-NOT ; (SPLIT-SEQUENCE::PREDICATE SEQUENCE SPLIT-SEQUENCE::START ; SPLIT-SEQUENCE::END SPLIT-SEQUENCE::FROM-END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS SPLIT-SEQUENCE::KEY) ; (IF SPLIT-SEQUENCE::FROM-END ; (SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE-FROM-END ; (LAMBDA (SEQUENCE SPLIT-SEQUENCE::END) ; (POSITION-IF-NOT SPLIT-SEQUENCE::PREDICATE SEQUENCE :END ; SPLIT-SEQUENCE::END :FROM-END T :KEY ; SPLIT-SEQUENCE::KEY)) ; SEQUENCE SPLIT-SEQUENCE::START SPLIT-SEQUENCE::END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS) ; (SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE-FROM-START ; (LAMBDA (SEQUENCE SPLIT-SEQUENCE::START) ; (POSITION-IF-NOT SPLIT-SEQUENCE::PREDICATE SEQUENCE :START ; SPLIT-SEQUENCE::START :KEY SPLIT-SEQUENCE::KEY)) ; SEQUENCE SPLIT-SEQUENCE::START SPLIT-SEQUENCE::END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS))) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE-IF-NOT ; (SPLIT-SEQUENCE::PREDICATE SEQUENCE SPLIT-SEQUENCE::START ; SPLIT-SEQUENCE::END SPLIT-SEQUENCE::FROM-END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS SPLIT-SEQUENCE::KEY) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE-IF-NOT ; (IF SPLIT-SEQUENCE::FROM-END ; (SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE-FROM-END (LAMBDA # #) ; SEQUENCE SPLIT-SEQUENCE::START SPLIT-SEQUENCE::END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS) ; (SPLIT-SEQUENCE::SPLIT-EXTENDED-SEQUENCE-FROM-START (LAMBDA # #) ; SEQUENCE SPLIT-SEQUENCE::START SPLIT-SEQUENCE::END COUNT ; SPLIT-SEQUENCE::REMOVE-EMPTY-SUBSEQS)))) ; ; note: Type assertion too complex to check: ; (VALUES LIST UNSIGNED-BYTE &REST T). ; It allows an unknown number of values, consider using ; (VALUES LIST UNSIGNED-BYTE &OPTIONAL). ; processing (DEFUN SPLIT-EXTENDED-SEQUENCE-FROM-END ...) ; processing (DEFUN SPLIT-EXTENDED-SEQUENCE-FROM-START ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-split-sequence/extended-sequence-tmpP6A3E92I.fasl ; compilation finished in 0:00:00.035 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/cl-split-sequence/api.lisp" (written 11 MAY 2019 09:39:50 AM): ; processing (IN-PACKAGE :SPLIT-SEQUENCE) ; processing (DEFUN LIST-LONG-ENOUGH-P ...) ; processing (DEFUN CHECK-BOUNDS ...) ; processing (DEFINE-CONDITION SIMPLE-PROGRAM-ERROR ...) ; processing (DEFMACRO CHECK-TESTS ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN SPLIT-SEQUENCE ...) ; processing (DEFUN SPLIT-SEQUENCE-IF ...) ; processing (DEFUN SPLIT-SEQUENCE-IF-NOT ...) ; processing (PUSHNEW :SPLIT-SEQUENCE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-split-sequence/api-tmpUSHT8RIL.fasl ; compilation finished in 0:00:00.415 ; compiling file "/usr/share/common-lisp/source/cl-split-sequence/documentation.lisp" (written 11 MAY 2019 09:39:50 AM): ; processing (IN-PACKAGE :SPLIT-SEQUENCE) ; processing (SETF (DOCUMENTATION # ...) ...) ; processing (SETF (DOCUMENTATION # ...) ...) ; processing (SETF (DOCUMENTATION # ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-split-sequence/documentation-tmp7YCPD44Y.fasl ; compilation finished in 0:00:00.000 ; compiling file "/usr/share/common-lisp/source/usocket/package.lisp" (written 23 DEC 2019 01:05:56 AM): ; processing (DEFPACKAGE :USOCKET ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/usocket/package-tmpQXR7SNXD.fasl ; compilation finished in 0:00:00.000 ; compiling file "/usr/share/common-lisp/source/usocket/usocket.lisp" (written 23 DEC 2019 01:05:56 AM): ; processing (IN-PACKAGE :USOCKET) ; processing (DEFPARAMETER *WILDCARD-HOST* ...) ; processing (DEFPARAMETER *AUTO-PORT* ...) ; processing (DEFPARAMETER *VERSION* ...) ; processing (DEFCONSTANT +MAX-DATAGRAM-PACKET-SIZE+ ...) ; processing (DEFCLASS USOCKET ...) ; processing (DEFGENERIC SOCKET-STATE ...) ; processing (DEFMETHOD SOCKET-STATE ...) ; processing (DEFCLASS STREAM-USOCKET ...) ; processing (DEFCLASS STREAM-SERVER-USOCKET ...) ; processing (DEFCLASS DATAGRAM-USOCKET ...) ; processing (DEFUN USOCKET-P ...) ; processing (DEFUN STREAM-USOCKET-P ...) ; processing (DEFUN STREAM-SERVER-USOCKET-P ...) ; processing (DEFUN DATAGRAM-USOCKET-P ...) ; processing (DEFUN MAKE-SOCKET ...) ; processing (DEFUN MAKE-STREAM-SOCKET ...) ; processing (DEFUN MAKE-STREAM-SERVER-SOCKET ...) ; processing (DEFUN MAKE-DATAGRAM-SOCKET ...) ; processing (DEFGENERIC SOCKET-ACCEPT ...) ; processing (DEFGENERIC SOCKET-CLOSE ...) ; processing (DEFMETHOD SOCKET-CLOSE ...) ; processing (DEFGENERIC SOCKET-SHUTDOWN ...) ; processing (DEFGENERIC SOCKET-SEND ...) ; processing (DEFGENERIC SOCKET-RECEIVE ...) ; processing (DEFGENERIC GET-LOCAL-ADDRESS ...) ; processing (DEFGENERIC GET-PEER-ADDRESS ...) ; processing (DEFGENERIC GET-LOCAL-PORT ...) ; processing (DEFGENERIC GET-PEER-PORT ...) ; processing (DEFGENERIC GET-LOCAL-NAME ...) ; processing (DEFGENERIC GET-PEER-NAME ...) ; processing (DEFMACRO WITH-CONNECTED-SOCKET ...) ; processing (DEFMACRO WITH-CLIENT-SOCKET ...) ; processing (DEFMACRO WITH-SERVER-SOCKET ...) ; processing (DEFMACRO WITH-SOCKET-LISTENER ...) ; processing (DEFSTRUCT (WAIT-LIST #) ...) ; processing (DEFUN MAKE-WAIT-LIST ...) ; processing (DEFUN ADD-WAITER ...) ; processing (DEFUN REMOVE-WAITER ...) ; processing (DEFUN REMOVE-ALL-WAITERS ...) ; processing (DEFUN WAIT-FOR-INPUT ...) ; processing (DEFUN INTEGER-TO-OCTET-BUFFER ...) ; processing (DEFUN OCTET-BUFFER-TO-INTEGER ...) ; processing (DEFMACRO PORT-TO-OCTET-BUFFER ...) ; processing (DEFMACRO IP-TO-OCTET-BUFFER ...) ; processing (DEFMACRO PORT-FROM-OCTET-BUFFER ...) ; processing (DEFMACRO IP-FROM-OCTET-BUFFER ...) ; processing (DEFUN LIST-OF-STRINGS-TO-INTEGERS ...) ; processing (DEFUN IP-ADDRESS-STRING-P ...) ; processing (DEFUN HBO-TO-DOTTED-QUAD ...) ; processing (DEFUN HBO-TO-VECTOR-QUAD ...) ; processing (DEFUN VECTOR-QUAD-TO-DOTTED-QUAD ...) ; processing (DEFUN DOTTED-QUAD-TO-VECTOR-QUAD ...) ; processing (DEFGENERIC HOST-BYTE-ORDER ...) ; processing (DEFMETHOD HOST-BYTE-ORDER ...) ; processing (DEFMETHOD HOST-BYTE-ORDER ...) ; processing (DEFMETHOD HOST-BYTE-ORDER ...) ; processing (DEFUN VECTOR-TO-IPV6-HOST ...) ; processing (DEFUN SPLIT-IPV6-ADDRESS ...) ; processing (DEFUN IPV6-HOST-TO-VECTOR ...) ; processing (DEFUN HOST-TO-HOSTNAME ...) ; processing (DEFUN IP= ...) ; processing (DEFUN IP/= ...) ; processing (DEFUN GET-HOST-BY-NAME ...) ; processing (DEFUN GET-RANDOM-HOST-BY-NAME ...) ; processing (DEFUN HOST-TO-VECTOR-QUAD ...) ; processing (DEFUN HOST-TO-HBO ...) ; processing (DEFUN SPLIT-TIMEOUT ...) ; processing (SETF (DOCUMENTATION # ...) ...) ; processing (SETF (DOCUMENTATION # ...) ...) ; processing (PROCLAIM (QUOTE #)) ; processing (DEFUN BOOL->INT ...) ; processing (DEFUN INT->BOOL ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/usocket/usocket-tmp6FLI1OC3.fasl ; compilation finished in 0:00:00.143 ; compiling file "/usr/share/common-lisp/source/usocket/condition.lisp" (written 23 DEC 2019 01:05:56 AM): ; processing (IN-PACKAGE :USOCKET) ; processing (DEFINE-CONDITION INSUFFICIENT-IMPLEMENTATION ...) ; processing (DEFINE-CONDITION UNSUPPORTED ...) ; processing (DEFINE-CONDITION UNIMPLEMENTED ...) ; processing (DEFINE-CONDITION SOCKET-CONDITION ...) ; processing (DEFINE-CONDITION SOCKET-ERROR ...) ; processing (DEFINE-CONDITION NS-CONDITION ...) ; processing (DEFINE-CONDITION NS-ERROR ...) ; processing (DEFUN DEFINE-USOCKET-CONDITION-CLASS ...) ; processing (DEFMACRO DEFINE-USOCKET-CONDITION-CLASSES ...) ; processing (DEFINE-USOCKET-CONDITION-CLASSES (INTERRUPTED-CONDITION) ...) ; processing (DEFINE-CONDITION UNKNOWN-CONDITION ...) ; processing (DEFINE-USOCKET-CONDITION-CLASSES (ADDRESS-IN-USE-ERROR ADDRESS-NOT-AVAILABLE-ERROR ...) ...) ; processing (DEFINE-CONDITION UNKNOWN-ERROR ...) ; processing (DEFINE-USOCKET-CONDITION-CLASSES (NS-TRY-AGAIN-CONDITION) ...) ; processing (DEFINE-CONDITION NS-UNKNOWN-CONDITION ...) ; processing (DEFINE-USOCKET-CONDITION-CLASSES (NS-HOST-NOT-FOUND-ERROR NS-NO-RECOVERY-ERROR) ...) ; processing (DEFINE-CONDITION NS-UNKNOWN-ERROR ...) ; processing (DEFMACRO WITH-MAPPED-CONDITIONS ...) ; processing (DEFPARAMETER +UNIX-ERRNO-CONDITION-MAP+ ...) ; processing (DEFPARAMETER +UNIX-ERRNO-ERROR-MAP+ ...) ; processing (DEFUN MAP-ERRNO-CONDITION ...) ; processing (DEFUN MAP-ERRNO-ERROR ...) ; processing (DEFPARAMETER +UNIX-NS-ERROR-MAP+ ...) ; processing (DEFMACRO UNSUPPORTED ...) ; processing (DEFMACRO UNIMPLEMENTED ...) ; processing (DEFMACRO IGNORE-UNSUPPORTED-WARNINGS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/usocket/condition-tmpWBK8JTS9.fasl ; compilation finished in 0:00:00.035 ; compiling file "/usr/share/common-lisp/source/usocket/backend/sbcl.lisp" (written 23 DEC 2019 01:05:56 AM): ; processing (IN-PACKAGE :USOCKET) ; processing (DEFUN GET-HOST-NAME ...) ; processing (DEFUN MAP-SOCKET-ERROR ...) ; processing (DEFPARAMETER +SBCL-CONDITION-MAP+ ...) ; processing (DEFPARAMETER +SBCL-ERROR-MAP+ ...) ; processing (DEFUN HANDLE-CONDITION ...) ; processing (DEFVAR *DUMMY-STREAM* ...) ; processing (DEFMACRO %WITH-TIMEOUT ...) ; processing (DEFUN GET-HOSTS-BY-NAME ...) ; processing (DEFUN SOCKET-CONNECT ...) ; file: /usr/share/common-lisp/source/usocket/backend/sbcl.lisp ; in: DEFUN SOCKET-CONNECT ; (USOCKET::%WITH-TIMEOUT (USOCKET::TIMEOUT (ERROR 'TIMEOUT)) ; (USOCKET::CONNECT)) ; --> BLOCK TAGBODY FLET LET ; ==> ; (MAKE-TIMER #'#:G11) ; ; note: could not stack allocate: ; (%WITH-TIMEOUT (TIMEOUT (ERROR 'SB-EXT:TIMEOUT)) ; (CONNECT)) ; processing (DEFUN SOCKET-LISTEN ...) ; processing (DEFMETHOD SOCKET-ACCEPT ...) ; processing (DEFMETHOD SOCKET-CLOSE ...) ; processing (DEFMETHOD SOCKET-CLOSE ...) ; processing (DEFMETHOD SOCKET-SHUTDOWN ...) ; processing (DEFMETHOD SOCKET-SEND ...) ; processing (DEFMETHOD SOCKET-RECEIVE ...) ; file: /usr/share/common-lisp/source/usocket/backend/sbcl.lisp ; in: DEFMETHOD SOCKET-RECEIVE (DATAGRAM-USOCKET T T) ; (DEFMETHOD USOCKET:SOCKET-RECEIVE ; ((USOCKET:USOCKET USOCKET:DATAGRAM-USOCKET) USOCKET::BUFFER LENGTH ; &KEY (USOCKET::ELEMENT-TYPE '(UNSIGNED-BYTE 8))) ; (DECLARE ; (VALUES (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) (INTEGER 0) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) (UNSIGNED-BYTE 16))) ; (USOCKET:WITH-MAPPED-CONDITIONS (USOCKET:USOCKET) ; (LET ((USOCKET::S #)) ; (SB-BSD-SOCKETS:SOCKET-RECEIVE USOCKET::S USOCKET::BUFFER LENGTH ; :ELEMENT-TYPE USOCKET::ELEMENT-TYPE)))) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; ==> ; (THE ; (VALUES (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) UNSIGNED-BYTE ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) (UNSIGNED-BYTE 16) &REST T) ; (PROGN ; (SYMBOL-MACROLET ((SB-PCL::PV-ENV-ENVIRONMENT SB-PCL::DEFAULT)) ; (SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS (# SB-PCL::.NEXT-METHOD-CALL. # ; NIL :CALL-NEXT-METHOD-P NIL ; :SETQ-P NIL :PARAMETERS-SETQD NIL ; :METHOD-CELL # ...) ; (DECLARE #) ; (LOCALLY # #))))) ; ; note: Type assertion too complex to check: ; (VALUES (SIMPLE-ARRAY (UNSIGNED-BYTE 8) . #1=((*))) UNSIGNED-BYTE ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) . #1#) (UNSIGNED-BYTE 16) &REST T). ; It allows an unknown number of values, consider using ; (VALUES (SIMPLE-ARRAY (UNSIGNED-BYTE 8) . #1=((*))) UNSIGNED-BYTE ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) . #1#) (UNSIGNED-BYTE 16) &OPTIONAL). ; processing (DEFMETHOD GET-LOCAL-NAME ...) ; processing (DEFMETHOD GET-PEER-NAME ...) ; processing (DEFMETHOD GET-LOCAL-ADDRESS ...) ; processing (DEFMETHOD GET-PEER-ADDRESS ...) ; processing (DEFMETHOD GET-LOCAL-PORT ...) ; processing (DEFMETHOD GET-PEER-PORT ...) ; processing (DEFUN GET-HOST-BY-ADDRESS ...) ; processing (DEFUN %SETUP-WAIT-LIST ...) ; processing (DEFUN %ADD-WAITER ...) ; processing (DEFUN %REMOVE-WAITER ...) ; processing (DEFUN WAIT-FOR-INPUT-INTERNAL ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/usocket/backend/sbcl-tmpUVEUD2ZN.fasl ; compilation finished in 0:00:00.239 ; compiling file "/usr/share/common-lisp/source/usocket/option.lisp" (written 23 DEC 2019 01:05:56 AM): ; processing (IN-PACKAGE :USOCKET) ; processing (DEFPARAMETER *BACKEND* ...) ; processing (DEFGENERIC SOCKET-OPTION ...) ; processing (DEFGENERIC (SETF SOCKET-OPTION) ...) ; processing (DEFMETHOD SOCKET-OPTION ...) ; processing (DEFMETHOD (SETF SOCKET-OPTION) ...) ; processing (DEFMETHOD SOCKET-OPTION ...) ; processing (DEFMETHOD (SETF SOCKET-OPTION) ...) ; processing (DEFMETHOD SOCKET-OPTION ...) ; processing (DEFMETHOD (SETF SOCKET-OPTION) ...) ; processing (DEFMETHOD SOCKET-OPTION ...) ; processing (DEFMETHOD (SETF SOCKET-OPTION) ...) ; processing (DEFMETHOD SOCKET-OPTION ...) ; processing (DEFMETHOD (SETF SOCKET-OPTION) ...) ; processing (DEFMETHOD SOCKET-OPTION ...) ; processing (DEFMETHOD (SETF SOCKET-OPTION) ...) ; processing (DEFMETHOD SOCKET-OPTION ...) ; processing (DEFMETHOD SOCKET-OPTION ...) ; processing (DEFMETHOD (SETF SOCKET-OPTION) ...) ; processing (DEFMETHOD (SETF SOCKET-OPTION) ...) ; processing (EXPORT (QUOTE SOCKET-OPTION)) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/usocket/option-tmpOWNJOEU.fasl ; compilation finished in 0:00:00.127 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/trivial-utf-8.lisp" (written 26 APR 2018 03:04:31 AM): ; processing (DEFPACKAGE :CL-POSTGRES-TRIVIAL-UTF-8 ...) ; processing (IN-PACKAGE :CL-POSTGRES-TRIVIAL-UTF-8) ; processing (DEFPARAMETER *OPTIMIZE* ...) ; processing (DEFUN UTF-8-BYTE-LENGTH ...) ; processing (DEFMACRO AS-UTF-8-BYTES ...) ; processing (DEFUN STRING-TO-UTF-8-BYTES ...) ; processing (DEFUN WRITE-UTF-8-BYTES ...) ; processing (DEFINE-CONDITION UTF-8-DECODING-ERROR ...) ; processing (DECLAIM (INLINE UTF-8-GROUP-SIZE)) ; processing (DEFUN UTF-8-GROUP-SIZE ...) ; processing (DEFUN UTF-8-STRING-LENGTH ...) ; processing (DEFUN GET-UTF-8-CHARACTER ...) ; processing (DEFUN UTF-8-BYTES-TO-STRING ...) ; processing (DEFUN READ-UTF-8-STRING ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/postmodern/cl-postgres/trivial-utf-8-tmpVT5BMTA5.fasl ; compilation finished in 0:00:00.179 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/ieee-floats.lisp" (written 26 APR 2018 03:04:31 AM): ; processing (DEFPACKAGE :CL-POSTGRES-IEEE-FLOATS ...) ; processing (IN-PACKAGE :CL-POSTGRES-IEEE-FLOATS) ; processing (DEFMACRO MAKE-FLOAT-CONVERTERS ...) ; processing (MAKE-FLOAT-CONVERTERS ENCODE-FLOAT32 ...) ; processing (MAKE-FLOAT-CONVERTERS ENCODE-FLOAT64 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/postmodern/cl-postgres/ieee-floats-tmpN3CFVWZF.fasl ; compilation finished in 0:00:00.079 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/features.lisp" (written 26 APR 2018 03:04:31 AM): ; processing (DEFPACKAGE :CL-POSTGRES.FEATURES ...) ; processing (IN-PACKAGE :CL-POSTGRES.FEATURES) ; processing (WHEN (FIND-PACKAGE #) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/postmodern/cl-postgres/features-tmpNK27C0R1.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/package.lisp" (written 26 APR 2018 03:04:31 AM): ; processing (DEFPACKAGE :CL-POSTGRES ...) ; processing (DEFPACKAGE :CL-POSTGRES-ERROR ...) ; processing (DEFPACKAGE :CL-POSTGRES-OID ...) ; processing (IN-PACKAGE :CL-POSTGRES) ; processing (DEFPARAMETER *OPTIMIZE* ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/postmodern/cl-postgres/package-tmp3BPE71HR.fasl ; compilation finished in 0:00:00.000 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/errors.lisp" (written 26 APR 2018 03:04:31 AM): ; processing (IN-PACKAGE :CL-POSTGRES) ; processing (DEFPARAMETER *CURRENT-QUERY* ...) ; processing (DEFPARAMETER *QUERY-LOG* ...) ; processing (DEFPARAMETER *QUERY-CALLBACK* ...) ; processing (DEFUN LOG-QUERY ...) ; processing (DEFMACRO WITH-QUERY ...) ; processing (DEFINE-CONDITION DATABASE-ERROR ...) ; processing (DEFUN DATABASE-ERROR-CONSTRAINT-NAME ...) ; processing (DEFINE-CONDITION DATABASE-CONNECTION-ERROR ...) ; processing (DEFINE-CONDITION DATABASE-CONNECTION-LOST ...) ; processing (DEFINE-CONDITION DATABASE-SOCKET-ERROR ...) ; processing (DEFUN WRAP-SOCKET-ERROR ...) ; processing (IN-PACKAGE :CL-POSTGRES-ERROR) ; processing (DEFPARAMETER *ERROR-TABLE* ...) ; processing (DEFMACRO DEFERROR ...) ; processing (DEFERROR "0A" ...) ; processing (DEFERROR "22" ...) ; processing (DEFERROR "22012" ...) ; processing (DEFERROR "22007" ...) ; processing (DEFERROR "22003" ...) ; processing (DEFERROR "22P01" ...) ; processing (DEFERROR "23" ...) ; processing (DEFERROR "23001" ...) ; processing (DEFERROR "23502" ...) ; processing (DEFERROR "23503" ...) ; processing (DEFERROR "23505" ...) ; processing (DEFERROR "23514" ...) ; processing (DEFERROR "42" ...) ; processing (DEFERROR "42501" ...) ; processing (DEFERROR "40" ...) ; processing (DEFERROR "40001" ...) ; processing (DEFERROR "40002" ...) ; processing (DEFERROR "40003" ...) ; processing (DEFERROR "40P01" ...) ; processing (DEFERROR "42P01" ...) ; processing (DEFERROR "42601" ...) ; processing (DEFERROR "42703" ...) ; processing (DEFERROR "42701" ...) ; processing (DEFERROR "42P03" ...) ; processing (DEFERROR "42P04" ...) ; processing (DEFERROR "42723" ...) ; processing (DEFERROR "42P05" ...) ; processing (DEFERROR "42P06" ...) ; processing (DEFERROR "42P07" ...) ; processing (DEFERROR "42712" ...) ; processing (DEFERROR "42710" ...) ; processing (DEFERROR "53" ...) ; processing (DEFERROR "54" ...) ; processing (DEFERROR "55" ...) ; processing (DEFERROR "55006" ...) ; processing (DEFERROR "55P03" ...) ; processing (DEFERROR "57" ...) ; processing (DEFERROR "57014" ...) ; processing (DEFINE-CONDITION SERVER-SHUTDOWN ...) ; processing (DEFERROR "57P01" ...) ; processing (DEFERROR "57P02" ...) ; processing (DEFERROR "57P03" ...) ; processing (DEFERROR "58" ...) ; processing (DEFERROR "XX" ...) ; processing (DEFUN GET-ERROR-TYPE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/postmodern/cl-postgres/errors-tmp758YUXMV.fasl ; compilation finished in 0:00:00.071 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/sql-string.lisp" (written 26 APR 2018 03:04:31 AM): ; processing (IN-PACKAGE :CL-POSTGRES) ; processing (DEFUN ESCAPE-BYTES ...) ; processing (DEFPARAMETER *SILENTLY-TRUNCATE-RATIONALS* ...) ; processing (DEFUN WRITE-RATIONAL-AS-FLOATING-POINT ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/sql-string.lisp ; in: DEFUN WRITE-RATIONAL-AS-FLOATING-POINT ; (< NUMBER 0) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (- NUMBER) ; ; note: unable to ; Eliminate %negate/%negate of rationals ; due to type uncertainty: ; The first argument is a (OR (DOUBLE-FLOAT * (0.0d0)) (SINGLE-FLOAT * (0.0)) ; (RATIONAL * (0))), not a RATIONAL. ; (TRUNCATE ; (IF (< NUMBER 0) ; (PROG1 (- NUMBER) (WRITE-CHAR #\- STREAM)) ; NUMBER)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0) ; (RATIONAL 0)), not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0) ; (RATIONAL 0)), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0) ; (RATIONAL 0)), not a FLOAT. ; (- CL-POSTGRES::DIGIT-LENGTH-LIMIT (LENGTH CL-POSTGRES::QUOTIENT-PART)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; (ZEROP CL-POSTGRES::REMAINDER) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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 (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (* CL-POSTGRES::REMAINDER 10) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a FLOAT. ; ; note: unable to ; convert x*2^k to shift ; due to type uncertainty: ; The first argument is a (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a INTEGER. ; ; note: unable to ; associate */(* /) of constants ; due to type uncertainty: ; The first argument is a (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a RATIONAL. ; (FLOOR (* CL-POSTGRES::REMAINDER 10)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL (-10) (10))), not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL (-10) (10))), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL (-10) (10))), not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL (-10) (10))), not a FLOAT. ; (<= CL-POSTGRES::DECIMAL-LENGTH-LIMIT 0) ; ; 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 0.0d0) (SINGLE-FLOAT 0.0) ; (RATIONAL 0)), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (< NUMBER 0) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; (- NUMBER) ; ; note: forced to do GENERIC-NEGATE (cost 10) ; unable to do #1=inline float arithmetic (cost 1) because: ; The first argument is a (OR (DOUBLE-FLOAT * #2=(0.0d0)) ; (SINGLE-FLOAT * #3=(0.0)) (RATIONAL * #4=(0))), not a DOUBLE-FLOAT. ; The result is a (VALUES ; (OR (RATIONAL #5=(0)) (SINGLE-FLOAT #6=(-0.0)) ; (DOUBLE-FLOAT #7=(-0.0d0))) ; . #8=(&OPTIONAL)), not a (VALUES DOUBLE-FLOAT &REST T). ; unable to do #1# (cost 1) because: ; The first argument is a (OR (DOUBLE-FLOAT * #2#) (SINGLE-FLOAT * #3#) ; (RATIONAL * #4#)), not a SINGLE-FLOAT. ; The result is a (VALUES ; (OR (RATIONAL #5#) (SINGLE-FLOAT #6#) ; (DOUBLE-FLOAT #7#)) ; . #8#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; (TRUNCATE ; (IF (< NUMBER 0) ; (PROG1 (- NUMBER) (WRITE-CHAR #\- STREAM)) ; NUMBER)) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0) ; (RATIONAL 0)), not a FIXNUM. ; The second argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL #1=(-1) #2=(1)) DOUBLE-FLOAT SINGLE-FLOAT) ; . #3=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0) ; (RATIONAL 0)), not a (SIGNED-BYTE 64). ; The second argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES (OR (RATIONAL #1# #2#) DOUBLE-FLOAT SINGLE-FLOAT) ; . #3#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; (- CL-POSTGRES::DIGIT-LENGTH-LIMIT (LENGTH CL-POSTGRES::QUOTIENT-PART)) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; etc. ; (<= CL-POSTGRES::DECIMAL-LENGTH-LIMIT 0) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; (> CL-POSTGRES::DECIMAL-DIGITS CL-POSTGRES::DECIMAL-LENGTH-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-POSTGRES::REMAINDER 10) ; ; note: forced to do GENERIC-* (cost 30) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a (OR (RATIONAL #2=(-1) #3=(1)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a FIXNUM. ; The result is a (VALUES ; (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL #4=(-10) #5=(10))) ; . #6=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (OR (RATIONAL #2# #3#) DOUBLE-FLOAT SINGLE-FLOAT), not a FIXNUM. ; The result is a (VALUES (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL #4# #5#)) ; . #6#), not a (VALUES FIXNUM &REST T). ; etc. ; (FLOOR (* CL-POSTGRES::REMAINDER 10)) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL #1=(-10) #2=(10))), not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL #3=(-1) #4=(1)) DOUBLE-FLOAT SINGLE-FLOAT) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL #1# #2#)), not a (SIGNED-BYTE ; 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES (OR (RATIONAL #3# #4#) DOUBLE-FLOAT SINGLE-FLOAT) ; . #5#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL #2=(-10) #3=(10))), not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL #2# #3#)), not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a (OR (RATIONAL #2=(-1) #3=(1)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a FIXNUM. ; The result is a (VALUES ; (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL #4=(0) #5=(2))) ; . #6=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (OR (RATIONAL #2# #3#) DOUBLE-FLOAT SINGLE-FLOAT), not a FIXNUM. ; The result is a (VALUES (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL #4# #5#)) ; . #6#), not a (VALUES FIXNUM &REST T). ; etc. ; (LOOP :FOR CL-POSTGRES::DECIMAL-DIGITS :UPFROM 1 ; :UNTIL (ZEROP CL-POSTGRES::REMAINDER) ; :DO (WHEN ; (> CL-POSTGRES::DECIMAL-DIGITS ; CL-POSTGRES::DECIMAL-LENGTH-LIMIT) ; (CL-POSTGRES::FAIL)) ; :DO (MULTIPLE-VALUE-BIND (CL-POSTGRES::QUOTIENT REM) ; (FLOOR (* CL-POSTGRES::REMAINDER 10)) ; (PRINC CL-POSTGRES::QUOTIENT STREAM) ; (SETF CL-POSTGRES::REMAINDER REM))) ; --> BLOCK LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE ; ==> ; (1+ CL-POSTGRES::DECIMAL-DIGITS) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES (INTEGER 2) . #2=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES (INTEGER 2) . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; processing (DEFUN WRITE-QUOTED ...) ; processing (DEFGENERIC TO-SQL-STRING ...) ; processing (DEFGENERIC SERIALIZE-FOR-POSTGRES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/postmodern/cl-postgres/sql-string-tmpGMQXK1HK.fasl ; compilation finished in 0:00:00.123 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/strings-utf-8.lisp" (written 11 FEB 2021 02:48:52 AM): ; processing (IN-PACKAGE :CL-POSTGRES) ; processing (DEFPARAMETER *CLIENT-ENCODING* ...) ; processing (DECLAIM (INLINE ENC-BYTE-LENGTH)) ; processing (DEFUN ENC-BYTE-LENGTH ...) ; processing (DECLAIM (INLINE ENC-WRITE-STRING)) ; processing (DEFUN ENC-WRITE-STRING ...) ; processing (DECLAIM (INLINE ENC-READ-STRING)) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN ENC-READ-STRING ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/strings-utf-8.lisp ; in: DEFUN ENC-READ-STRING ; (DEFUN CL-POSTGRES::ENC-READ-STRING ; (CL-POSTGRES::INPUT ; &KEY CL-POSTGRES::NULL-TERMINATED (CL-POSTGRES::BYTE-LENGTH -1)) ; (CL-POSTGRES-TRIVIAL-UTF-8:READ-UTF-8-STRING CL-POSTGRES::INPUT ; :NULL-TERMINATED ; CL-POSTGRES::NULL-TERMINATED ; :BYTE-LENGTH ; CL-POSTGRES::BYTE-LENGTH)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-POSTGRES::ENC-READ-STRING ; (CL-POSTGRES::INPUT &KEY CL-POSTGRES::NULL-TERMINATED ; (CL-POSTGRES::BYTE-LENGTH -1)) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-POSTGRES::ENC-READ-STRING ; (CL-POSTGRES-TRIVIAL-UTF-8:READ-UTF-8-STRING CL-POSTGRES::INPUT ; :NULL-TERMINATED ; CL-POSTGRES::NULL-TERMINATED ; :BYTE-LENGTH ; CL-POSTGRES::BYTE-LENGTH))) ; ; note: Type assertion too complex to check: ; (VALUES STRING &REST T). ; It allows an unknown number of values, consider using ; (VALUES STRING &OPTIONAL). ; processing (DECLAIM (INLINE ENC-STRING-BYTES)) ; processing (DEFUN ENC-STRING-BYTES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/postmodern/cl-postgres/strings-utf-8-tmp49Q238TW.fasl ; compilation finished in 0:00:00.027 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/communicate.lisp" (written 26 APR 2018 03:04:31 AM): ; processing (IN-PACKAGE :CL-POSTGRES) ; processing (DEFUN INTEGER-READER-NAME ...) ; processing (DEFUN INTEGER-WRITER-NAME ...) ; processing (DEFMACRO INTEGER-READER ...) ; processing (DEFMACRO INTEGER-WRITER ...) ; processing (INTEGER-READER 1) ; processing (INTEGER-READER 2) ; processing (INTEGER-READER 4) ; processing (INTEGER-READER 8) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/communicate.lisp ; in: INTEGER-READER 8 ; (CL-POSTGRES::INTEGER-READER 8) ; --> PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-POSTGRES::READ-INT8 ; (CL-POSTGRES::SOCKET) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (DECLARE (TYPE STREAM CL-POSTGRES::SOCKET) ; (OPTIMIZE (SPEED 3) (SAFETY 0) (SPACE 1) (DEBUG 1) ; (COMPILATION-SPEED 0))) ; (BLOCK CL-POSTGRES::READ-INT8 ; (LET ((CL-POSTGRES::RESULT 0)) ; (DECLARE (TYPE # CL-POSTGRES::RESULT)) ; (SETF # #) ; (SETF # #) ; (SETF # #) ; (SETF # #) ; (SETF # #) ; (SETF # #) ; (SETF # #) ; (SETF # #) ; (IF (LOGBITP 63 CL-POSTGRES::RESULT) ; (DPB CL-POSTGRES::RESULT # -1) ; CL-POSTGRES::RESULT)))) ; ; note: doing signed word to integer coercion (cost 20) to "" ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-POSTGRES::READ-UINT8 ; (CL-POSTGRES::SOCKET) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (DECLARE (TYPE STREAM CL-POSTGRES::SOCKET) ; (OPTIMIZE (SPEED 3) (SAFETY 0) (SPACE 1) (DEBUG 1) ; (COMPILATION-SPEED 0))) ; (BLOCK CL-POSTGRES::READ-UINT8 ; (LET ((CL-POSTGRES::RESULT 0)) ; (DECLARE (TYPE # CL-POSTGRES::RESULT)) ; (SETF # #) ; (SETF # #) ; (SETF # #) ; (SETF # #) ; (SETF # #) ; (SETF # #) ; (SETF # #) ; (SETF # #) ; CL-POSTGRES::RESULT))) ; ; note: doing unsigned word to integer coercion (cost 20) from RESULT to "" ; processing (INTEGER-WRITER 1) ; processing (INTEGER-WRITER 2) ; processing (INTEGER-WRITER 4) ; processing (DEFUN WRITE-BYTES ...) ; processing (DEFUN WRITE-STR ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN READ-BYTES ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN READ-STR ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN READ-SIMPLE-STR ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/communicate.lisp ; in: DEFUN READ-SIMPLE-STR ; (< CL-POSTGRES::B 128) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a FIXNUM. ; etc. ; processing (DEFUN SKIP-BYTES ...) ; processing (DEFUN SKIP-STR ...) ; processing (DEFUN ENSURE-SOCKET-IS-CLOSED ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/postmodern/cl-postgres/communicate-tmpMXPMJ5KG.fasl ; compilation finished in 0:00:00.171 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp" (written 26 APR 2018 03:04:31 AM): ; processing (IN-PACKAGE :CL-POSTGRES) ; processing (DEFMACRO DEFINE-MESSAGE ...) ; processing (DEFINE-MESSAGE SSL-REQUEST-MESSAGE ...) ; processing (DEFINE-MESSAGE STARTUP-MESSAGE ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp ; in: DEFINE-MESSAGE STARTUP-MESSAGE ; (CL-POSTGRES::DEFINE-MESSAGE CL-POSTGRES::STARTUP-MESSAGE ; NIL ; (CL-POSTGRES::USER CL-POSTGRES::DATABASE) ; (CL-POSTGRES::UINT 4 196608) ; (STRING "user") ; (STRING CL-POSTGRES::USER) ; (STRING "database") ; (STRING CL-POSTGRES::DATABASE) ; (STRING "client_encoding") ; (STRING CL-POSTGRES::*CLIENT-ENCODING*) ; (CL-POSTGRES::UINT 1 0)) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK LET CL-POSTGRES::WRITE-UINT4 ; ==> ; (+ 15 (CL-POSTGRES::ENC-BYTE-LENGTH #:G7) (CL-POSTGRES::ENC-BYTE-LENGTH #:G6) ; (CL-POSTGRES::ENC-BYTE-LENGTH #:G5) (CL-POSTGRES::ENC-BYTE-LENGTH #:G4) ; (CL-POSTGRES::ENC-BYTE-LENGTH #:G3) (CL-POSTGRES::ENC-BYTE-LENGTH #:G2)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; etc. ; processing (DEFINE-MESSAGE PLAIN-PASSWORD-MESSAGE ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp ; in: DEFINE-MESSAGE PLAIN-PASSWORD-MESSAGE ; (CL-POSTGRES::DEFINE-MESSAGE CL-POSTGRES::PLAIN-PASSWORD-MESSAGE ; #\p ; (CL-POSTGRES::PASSWORD) ; (STRING CL-POSTGRES::PASSWORD)) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK LET CL-POSTGRES::WRITE-UINT4 ; ==> ; (+ 5 (CL-POSTGRES::ENC-BYTE-LENGTH #:G1)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; etc. ; processing (DEFUN BYTES-TO-HEX-STRING ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp ; in: DEFUN BYTES-TO-HEX-STRING ; (LOOP :FOR BYTE :ACROSS CL-POSTGRES::BYTES ; :FOR CL-POSTGRES::POS :FROM 0 :BY 2 ; :DO ...) ; --> BLOCK LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE ; ==> ; (AREF #:LOOP-ACROSS-VECTOR-0 #:LOOP-ACROSS-INDEX-1) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; processing (DEFUN MD5-PASSWORD ...) ; processing (DEFINE-MESSAGE MD5-PASSWORD-MESSAGE ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp ; in: DEFINE-MESSAGE MD5-PASSWORD-MESSAGE ; (CL-POSTGRES::DEFINE-MESSAGE CL-POSTGRES::MD5-PASSWORD-MESSAGE ; #\p ; (CL-POSTGRES::PASSWORD CL-POSTGRES::USER CL-POSTGRES::SALT) ; (STRING ; (CL-POSTGRES::MD5-PASSWORD CL-POSTGRES::PASSWORD CL-POSTGRES::USER ; CL-POSTGRES::SALT))) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK LET CL-POSTGRES::WRITE-UINT4 ; ==> ; (+ 5 (CL-POSTGRES::ENC-BYTE-LENGTH #:G1)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; etc. ; processing (DEFINE-MESSAGE GSS-AUTH-BUFFER-MESSAGE ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp ; in: DEFINE-MESSAGE GSS-AUTH-BUFFER-MESSAGE ; (CL-POSTGRES::DEFINE-MESSAGE CL-POSTGRES::GSS-AUTH-BUFFER-MESSAGE ; #\p ; (CL-POSTGRES::BUF) ; (CL-POSTGRES::BYTES CL-POSTGRES::BUF)) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK LET CL-POSTGRES::WRITE-UINT4 + ; ==> ; (LENGTH #:G1) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; processing (DEFINE-MESSAGE QUERY-MESSAGE ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp ; in: DEFINE-MESSAGE QUERY-MESSAGE ; (CL-POSTGRES::DEFINE-MESSAGE CL-POSTGRES::QUERY-MESSAGE ; #\Q ; (CL-POSTGRES::QUERY) ; (STRING CL-POSTGRES::QUERY)) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK LET CL-POSTGRES::WRITE-UINT4 ; ==> ; (+ 5 (CL-POSTGRES::ENC-BYTE-LENGTH #:G1)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; etc. ; processing (DEFINE-MESSAGE SIMPLE-PARSE-MESSAGE ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp ; in: DEFINE-MESSAGE SIMPLE-PARSE-MESSAGE ; (CL-POSTGRES::DEFINE-MESSAGE CL-POSTGRES::SIMPLE-PARSE-MESSAGE ; #\P ; (CL-POSTGRES::QUERY) ; (CL-POSTGRES::UINT 1 0) ; (STRING CL-POSTGRES::QUERY) ; (CL-POSTGRES::UINT 2 0)) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK LET CL-POSTGRES::WRITE-UINT4 ; ==> ; (+ 8 (CL-POSTGRES::ENC-BYTE-LENGTH #:G2)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; etc. ; processing (DEFINE-MESSAGE PARSE-MESSAGE ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp ; in: DEFINE-MESSAGE PARSE-MESSAGE ; (CL-POSTGRES::DEFINE-MESSAGE CL-POSTGRES::PARSE-MESSAGE ; #\P ; (CL-POSTGRES::NAME CL-POSTGRES::QUERY) ; (STRING CL-POSTGRES::NAME) ; (STRING CL-POSTGRES::QUERY) ; (CL-POSTGRES::UINT 2 0)) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK LET CL-POSTGRES::WRITE-UINT4 ; ==> ; (+ 8 (CL-POSTGRES::ENC-BYTE-LENGTH #:G2) (CL-POSTGRES::ENC-BYTE-LENGTH #:G1)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; etc. ; processing (DEFINE-MESSAGE CLOSE-PREPARED-MESSAGE ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp ; in: DEFINE-MESSAGE CLOSE-PREPARED-MESSAGE ; (CL-POSTGRES::DEFINE-MESSAGE CL-POSTGRES::CLOSE-PREPARED-MESSAGE ; #\C ; (CL-POSTGRES::NAME) ; (CL-POSTGRES::UINT 1 83) ; (STRING CL-POSTGRES::NAME)) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK LET CL-POSTGRES::WRITE-UINT4 ; ==> ; (+ 6 (CL-POSTGRES::ENC-BYTE-LENGTH #:G2)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; etc. ; processing (DEFUN FORMATS-TO-BYTES ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp ; in: DEFUN FORMATS-TO-BYTES ; (LOOP :FOR FORMAT :ACROSS CL-POSTGRES::FORMATS ; :FOR CL-POSTGRES::POS :FROM 1 :BY 2 ; :DO ...) ; --> BLOCK LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE ; ==> ; (AREF #:LOOP-ACROSS-VECTOR-0 #:LOOP-ACROSS-INDEX-1) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-ARRAY. ; ==> ; (+ CL-POSTGRES::POS 2) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES (INTEGER 3) . #2=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES (INTEGER 3) . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; processing (DEFINE-MESSAGE SIMPLE-BIND-MESSAGE ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp ; in: DEFINE-MESSAGE SIMPLE-BIND-MESSAGE ; (LENGTH CL-POSTGRES::FORMATS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; processing (DEFUN BIND-MESSAGE ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp ; in: DEFUN BIND-MESSAGE ; (+ 12 (CL-POSTGRES::ENC-BYTE-LENGTH CL-POSTGRES::NAME) ; (* 6 CL-POSTGRES::N-PARAMS) (* 2 CL-POSTGRES::N-RESULT-FORMATS) ; (LOOP :FOR CL-POSTGRES::SIZE :OF-TYPE FIXNUM :ACROSS CL-POSTGRES::PARAM-SIZES ; :SUM CL-POSTGRES::SIZE)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; (LOOP :FOR FORMAT :ACROSS CL-POSTGRES::RESULT-FORMATS ; :DO (CL-POSTGRES::WRITE-UINT2 CL-POSTGRES::SOCKET ; (IF FORMAT ; 1 ; 0))) ; --> BLOCK LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE ; ==> ; (AREF #:LOOP-ACROSS-VECTOR-39 #:LOOP-ACROSS-INDEX-40) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-ARRAY. ; (+ 12 (CL-POSTGRES::ENC-BYTE-LENGTH CL-POSTGRES::NAME) ; (* 6 CL-POSTGRES::N-PARAMS) (* 2 CL-POSTGRES::N-RESULT-FORMATS) ; (LOOP :FOR CL-POSTGRES::SIZE :OF-TYPE FIXNUM :ACROSS CL-POSTGRES::PARAM-SIZES ; :SUM CL-POSTGRES::SIZE)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), 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 first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), 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 first argument is a NUMBER, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; etc. ; (LOOP :FOR CL-POSTGRES::SIZE :OF-TYPE FIXNUM :ACROSS CL-POSTGRES::PARAM-SIZES ; :SUM CL-POSTGRES::SIZE) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; etc. ; processing (DEFINE-MESSAGE SIMPLE-DESCRIBE-MESSAGE ...) ; processing (DEFINE-MESSAGE DESCRIBE-PREPARED-MESSAGE ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp ; in: DEFINE-MESSAGE DESCRIBE-PREPARED-MESSAGE ; (CL-POSTGRES::DEFINE-MESSAGE CL-POSTGRES::DESCRIBE-PREPARED-MESSAGE ; #\D ; (CL-POSTGRES::NAME) ; (CL-POSTGRES::UINT 1 83) ; (STRING CL-POSTGRES::NAME)) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK LET CL-POSTGRES::WRITE-UINT4 ; ==> ; (+ 6 (CL-POSTGRES::ENC-BYTE-LENGTH #:G2)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; etc. ; processing (DEFINE-MESSAGE SIMPLE-EXECUTE-MESSAGE ...) ; processing (DEFINE-MESSAGE FLUSH-MESSAGE ...) ; processing (DEFINE-MESSAGE SYNC-MESSAGE ...) ; processing (DEFINE-MESSAGE TERMINATE-MESSAGE ...) ; processing (DEFINE-MESSAGE COPY-DONE-MESSAGE ...) ; processing (DEFUN COPY-DATA-MESSAGE ...) ; processing (DEFINE-MESSAGE COPY-FAIL-MESSAGE ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp ; in: DEFINE-MESSAGE COPY-FAIL-MESSAGE ; (CL-POSTGRES::DEFINE-MESSAGE CL-POSTGRES::COPY-FAIL-MESSAGE ; #\f ; (CL-POSTGRES::REASON) ; (STRING CL-POSTGRES::REASON)) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK LET CL-POSTGRES::WRITE-UINT4 ; ==> ; (+ 5 (CL-POSTGRES::ENC-BYTE-LENGTH #:G1)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; etc. ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/postmodern/cl-postgres/messages-tmpB69313KI.fasl ; compilation finished in 0:00:00.423 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/oid.lisp" (written 26 APR 2018 03:04:31 AM): ; processing (IN-PACKAGE :CL-POSTGRES-OID) ; processing (DEFCONSTANT +BOOL+ ...) ; processing (DEFCONSTANT +BYTEA+ ...) ; processing (DEFCONSTANT +CHAR+ ...) ; processing (DEFCONSTANT +NAME+ ...) ; processing (DEFCONSTANT +INT8+ ...) ; processing (DEFCONSTANT +INT2+ ...) ; processing (DEFCONSTANT +INT2VECTOR+ ...) ; processing (DEFCONSTANT +INT4+ ...) ; processing (DEFCONSTANT +REGPROC+ ...) ; processing (DEFCONSTANT +TEXT+ ...) ; processing (DEFCONSTANT +OID+ ...) ; processing (DEFCONSTANT +TID+ ...) ; processing (DEFCONSTANT +XID+ ...) ; processing (DEFCONSTANT +CID+ ...) ; processing (DEFCONSTANT +OID-VECTOR+ ...) ; processing (DEFCONSTANT +JSON+ ...) ; processing (DEFCONSTANT +XML+ ...) ; processing (DEFCONSTANT +PGNODETREE+ ...) ; processing (DEFCONSTANT +PGDDLCOMMAND+ ...) ; processing (DEFCONSTANT +POINT+ ...) ; processing (DEFCONSTANT +LSEG+ ...) ; processing (DEFCONSTANT +PATH+ ...) ; processing (DEFCONSTANT +BOX+ ...) ; processing (DEFCONSTANT +POLYGON+ ...) ; processing (DEFCONSTANT +LINE+ ...) ; processing (DEFCONSTANT +FLOAT4+ ...) ; processing (DEFCONSTANT +FLOAT8+ ...) ; processing (DEFCONSTANT +ABSTIME+ ...) ; processing (DEFCONSTANT +RELTIME+ ...) ; processing (DEFCONSTANT +TINTERVAL+ ...) ; processing (DEFCONSTANT +UNKNOWN+ ...) ; processing (DEFCONSTANT +CIRCLE+ ...) ; processing (DEFCONSTANT +CASH+ ...) ; processing (DEFCONSTANT +MACADDR+ ...) ; processing (DEFCONSTANT +INET+ ...) ; processing (DEFCONSTANT +CIDR+ ...) ; processing (DEFCONSTANT +BOOL-ARRAY+ ...) ; processing (DEFCONSTANT +BYTEA-ARRAY+ ...) ; processing (DEFCONSTANT +CHAR-ARRAY+ ...) ; processing (DEFCONSTANT +NAME-ARRAY+ ...) ; processing (DEFCONSTANT +INT2-ARRAY+ ...) ; processing (DEFCONSTANT +INT4-ARRAY+ ...) ; processing (DEFCONSTANT +TEXT-ARRAY+ ...) ; processing (DEFCONSTANT +BPCHAR-ARRAY+ ...) ; processing (DEFCONSTANT +VARCHAR-ARRAY+ ...) ; processing (DEFCONSTANT +INT8-ARRAY+ ...) ; processing (DEFCONSTANT +POINT-ARRAY+ ...) ; processing (DEFCONSTANT +LSEG-ARRAY+ ...) ; processing (DEFCONSTANT +BOX-ARRAY+ ...) ; processing (DEFCONSTANT +FLOAT4-ARRAY+ ...) ; processing (DEFCONSTANT +FLOAT8-ARRAY+ ...) ; processing (DEFCONSTANT +OID-ARRAY+ ...) ; processing (DEFCONSTANT +ACLITEM+ ...) ; processing (DEFCONSTANT +CSTRING-ARRAY+ ...) ; processing (DEFCONSTANT +BPCHAR+ ...) ; processing (DEFCONSTANT +VARCHAR+ ...) ; processing (DEFCONSTANT +DATE+ ...) ; processing (DEFCONSTANT +TIME+ ...) ; processing (DEFCONSTANT +TIMESTAMP+ ...) ; processing (DEFCONSTANT +TIMESTAMP-ARRAY+ ...) ; processing (DEFCONSTANT +DATE-ARRAY+ ...) ; processing (DEFCONSTANT +TIME-ARRAY+ ...) ; processing (DEFCONSTANT +TIMESTAMPTZ+ ...) ; processing (DEFCONSTANT +TIMESTAMPTZ-ARRAY+ ...) ; processing (DEFCONSTANT +INTERVAL+ ...) ; processing (DEFCONSTANT +INTERVAL-ARRAY+ ...) ; processing (DEFCONSTANT +TIMETZ+ ...) ; processing (DEFCONSTANT +BIT+ ...) ; processing (DEFCONSTANT +BIT-ARRAY+ ...) ; processing (DEFCONSTANT +VARBIT+ ...) ; processing (DEFCONSTANT +VARBIT-ARRAY+ ...) ; processing (DEFCONSTANT +NUMERIC+ ...) ; processing (DEFCONSTANT +NUMERIC-ARRAY+ ...) ; processing (DEFCONSTANT +REFCURSOR+ ...) ; processing (DEFCONSTANT +REGPROCEDURE+ ...) ; processing (DEFCONSTANT +REGOPER+ ...) ; processing (DEFCONSTANT +REGOPERATOR+ ...) ; processing (DEFCONSTANT +REGCLASS+ ...) ; processing (DEFCONSTANT +REGTYPE+ ...) ; processing (DEFCONSTANT +REGROLE+ ...) ; processing (DEFCONSTANT +REGNAMESPACE+ ...) ; processing (DEFCONSTANT +REGTYPE-ARRAY+ ...) ; processing (DEFCONSTANT +UUID+ ...) ; processing (DEFCONSTANT +LSN+ ...) ; processing (DEFCONSTANT +TSVECTOR+ ...) ; processing (DEFCONSTANT +GTSVECTOR+ ...) ; processing (DEFCONSTANT +TSQUERY+ ...) ; processing (DEFCONSTANT +REGCONFIG+ ...) ; processing (DEFCONSTANT +REGDICTIONARY+ ...) ; processing (DEFCONSTANT +JSONB+ ...) ; processing (DEFCONSTANT +INT4RANGE+ ...) ; processing (DEFCONSTANT +RECORD+ ...) ; processing (DEFCONSTANT +RECORD-ARRAY+ ...) ; processing (DEFCONSTANT +CSTRING+ ...) ; processing (DEFCONSTANT +ANY+ ...) ; processing (DEFCONSTANT +ANY-ARRAY+ ...) ; processing (DEFCONSTANT +V-OID+ ...) ; processing (DEFCONSTANT +TRIGGER+ ...) ; processing (DEFCONSTANT +EVTTRIGGER+ ...) ; processing (DEFCONSTANT +LANGUAGE-HANDLER+ ...) ; processing (DEFCONSTANT +INTERNAL+ ...) ; processing (DEFCONSTANT +OPAQUE+ ...) ; processing (DEFCONSTANT +ANYELEMENT+ ...) ; processing (DEFCONSTANT +ANYNON-ARRAY+ ...) ; processing (DEFCONSTANT +ANYENUM+ ...) ; processing (DEFCONSTANT +FDW-HANDLER+ ...) ; processing (DEFCONSTANT +INDEX-AM-HANDLER+ ...) ; processing (DEFCONSTANT +TSM-HANDLER+ ...) ; processing (DEFCONSTANT +ANYRANGE+ ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/postmodern/cl-postgres/oid-tmp9ZT99EEA.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/interpret.lisp" (written 26 APR 2018 03:04:31 AM): ; processing (IN-PACKAGE :CL-POSTGRES) ; processing (DEFPARAMETER *TIMESTAMP-FORMAT* ...) ; processing (DEFPARAMETER *SQL-READTABLE* ...) ; processing (DEFUN INTERPRET-AS-TEXT ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/interpret.lisp ; in: DEFUN INTERPRET-AS-TEXT ; (CL-POSTGRES::ENC-READ-STRING STREAM :BYTE-LENGTH CL-POSTGRES::SIZE) ; ; note: Type assertion too complex to check: ; (VALUES STRING &REST T). ; It allows an unknown number of values, consider using ; (VALUES STRING &OPTIONAL). ; processing (DEFCLASS TYPE-INTERPRETER ...) ; processing (DEFUN INTERPRETER-BINARY-P ...) ; processing (DEFUN INTERPRETER-READER ...) ; processing (LET (#) ...) ; processing (DEFUN SET-SQL-READER ...) ; processing (DEFMACRO BINARY-READER ...) ; processing (DEFMACRO DEFINE-INTERPRETER ...) ; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+CHAR+ ...) ; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+INT2+ ...) ; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+INT4+ ...) ; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+INT8+ ...) ; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+OID+ ...) ; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+BOOL+ ...) ; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+BYTEA+ ...) ; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+TEXT+ ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/interpret.lisp ; in: DEFINE-INTERPRETER CL-POSTGRES-OID:+TEXT+ ; (CL-POSTGRES::DEFINE-INTERPRETER CL-POSTGRES-OID:+TEXT+ ; "text" ; STRING) ; --> CL-POSTGRES:SET-SQL-READER CL-POSTGRES:SET-SQL-READER ; --> CL-POSTGRES::BINARY-READER FUNCTION ; ==> ; (CL-POSTGRES::ENC-READ-STRING #:G2 :BYTE-LENGTH (- #:G3 0)) ; ; note: Type assertion too complex to check: ; (VALUES STRING &REST T). ; It allows an unknown number of values, consider using ; (VALUES STRING &OPTIONAL). ; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+BPCHAR+ ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/interpret.lisp ; in: DEFINE-INTERPRETER CL-POSTGRES-OID:+BPCHAR+ ; (CL-POSTGRES::DEFINE-INTERPRETER CL-POSTGRES-OID:+BPCHAR+ ; "bpchar" ; STRING) ; --> CL-POSTGRES:SET-SQL-READER CL-POSTGRES:SET-SQL-READER ; --> CL-POSTGRES::BINARY-READER FUNCTION ; ==> ; (CL-POSTGRES::ENC-READ-STRING #:G2 :BYTE-LENGTH (- #:G3 0)) ; ; note: Type assertion too complex to check: ; (VALUES STRING &REST T). ; It allows an unknown number of values, consider using ; (VALUES STRING &OPTIONAL). ; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+VARCHAR+ ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/interpret.lisp ; in: DEFINE-INTERPRETER CL-POSTGRES-OID:+VARCHAR+ ; (CL-POSTGRES::DEFINE-INTERPRETER CL-POSTGRES-OID:+VARCHAR+ ; "varchar" ; STRING) ; --> CL-POSTGRES:SET-SQL-READER CL-POSTGRES:SET-SQL-READER ; --> CL-POSTGRES::BINARY-READER FUNCTION ; ==> ; (CL-POSTGRES::ENC-READ-STRING #:G2 :BYTE-LENGTH (- #:G3 0)) ; ; note: Type assertion too complex to check: ; (VALUES STRING &REST T). ; It allows an unknown number of values, consider using ; (VALUES STRING &OPTIONAL). ; processing (DEFUN READ-ROW-VALUE ...) ; processing (DEFPARAMETER *READ-ROW-VALUES-AS-BINARY* ...) ; processing (SET-SQL-READER CL-POSTGRES-OID:+RECORD+ ...) ; processing (DEFMACRO WITH-BINARY-ROW-VALUES ...) ; processing (DEFMACRO WITH-TEXT-ROW-VALUES ...) ; processing (DEFUN READ-BINARY-BITS ...) ; processing (SET-SQL-READER CL-POSTGRES-OID:+BIT+ ...) ; processing (SET-SQL-READER CL-POSTGRES-OID:+VARBIT+ ...) ; processing (DEFUN READ-BINARY-ARRAY-VALUE ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/interpret.lisp ; in: DEFUN READ-BINARY-ARRAY-VALUE ; (LET ((CL-POSTGRES::NUM-DIMS (CL-POSTGRES::READ-UINT4 STREAM)) ; (CL-POSTGRES::HAS-NULL (CL-POSTGRES::READ-UINT4 STREAM)) ; (CL-POSTGRES::ELEMENT-TYPE (CL-POSTGRES::READ-UINT4 STREAM))) ; (COND ((ZEROP CL-POSTGRES::NUM-DIMS) NIL) ; (T ; (LET* (# #) ; (LET # ; # ; CL-POSTGRES::RESULTS))))) ; ; caught STYLE-WARNING: ; The variable HAS-NULL is defined but never used. ; processing (DOLIST (OID #) ...) ; processing (SET-SQL-READER CL-POSTGRES-OID:+RECORD-ARRAY+ ...) ; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+POINT+ ...) ; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+LSEG+ ...) ; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+BOX+ ...) ; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+FLOAT4+ ...) ; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+FLOAT8+ ...) ; processing (DEFINE-INTERPRETER CL-POSTGRES-OID:+NUMERIC+ ...) ; processing (DEFUN SET-DATE-READER ...) ; processing (DEFUN INTERPRET-USEC-BITS ...) ; processing (DEFUN SET-INTERVAL-READER ...) ; processing (DEFUN SET-USEC-READER ...) ; processing (DEFUN SET-SQL-DATETIME-READERS ...) ; processing (DEFCONSTANT +START-OF-2000+ ...) ; processing (DEFCONSTANT +SECONDS-IN-DAY+ ...) ; processing (SET-SQL-DATETIME-READERS :DATE ...) ; processing (DEFUN READ-ARRAY-VALUE ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/interpret.lisp ; in: DEFUN READ-ARRAY-VALUE ; (FUNCALL CL-POSTGRES::TRANSFORM CL-POSTGRES::WORD) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TRANSFORM is not known to be a function ; (CHAR CL-POSTGRES::VALUE CL-POSTGRES::POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-ARRAY. ; (CHAR CL-POSTGRES::VALUE (INCF CL-POSTGRES::POS)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-ARRAY. ; (CHAR CL-POSTGRES::VALUE CL-POSTGRES::POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-ARRAY. ; (CL-POSTGRES::INTERPRET (CL-POSTGRES::WORD) ; (IF (STRING= CL-POSTGRES::WORD "NULL") ; :NULL ; (FUNCALL CL-POSTGRES::TRANSFORM CL-POSTGRES::WORD))) ; ; note: Return type not fixed values, so can't use known return convention: ; * ; processing (DEFUN COPY-SQL-READTABLE ...) ; processing (DEFPARAMETER *DEFAULT-SQL-READTABLE* ...) ; processing (DEFUN DEFAULT-SQL-READTABLE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/postmodern/cl-postgres/interpret-tmpW045U8V2.fasl ; compilation finished in 0:00:00.271 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/protocol.lisp" (written 26 APR 2018 03:04:31 AM): ; processing (IN-PACKAGE :CL-POSTGRES) ; processing (DEFINE-CONDITION PROTOCOL-ERROR ...) ; processing (DEFMACRO MESSAGE-CASE ...) ; processing (DEFPARAMETER *CONNECTION-PARAMS* ...) ; processing (DEFUN UPDATE-PARAMETER ...) ; processing (DEFUN READ-BYTE-DELIMITED ...) ; processing (DEFINE-CONDITION POSTGRESQL-NOTIFICATION ...) ; processing (DEFUN GET-NOTIFICATION ...) ; processing (DEFUN GET-ERROR ...) ; processing (DEFINE-CONDITION POSTGRESQL-WARNING ...) ; processing (DEFUN GET-WARNING ...) ; processing (DEFPARAMETER *SSL-CERTIFICATE-FILE* ...) ; processing (DEFPARAMETER *SSL-KEY-FILE* ...) ; processing (LET (#) ...) ; processing (DEFUN AUTHENTICATE ...) ; processing (DEFCLASS FIELD-DESCRIPTION ...) ; processing (DEFUN READ-FIELD-DESCRIPTIONS ...) ; processing (DEFUN TERMINATE-CONNECTION ...) ; processing (DEFPARAMETER *EFFECTED-ROWS* ...) ; processing (DEFUN LOOK-FOR-ROW ...) ; processing (DEFUN TRY-TO-SYNC ...) ; processing (DEFMACRO WITH-SYNCING ...) ; processing (DEFMACRO RETURNING-EFFECTED-ROWS ...) ; processing (DEFUN SEND-QUERY ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/protocol.lisp ; in: DEFUN SEND-QUERY ; (MAP 'VECTOR 'CL-POSTGRES::FIELD-BINARY-P CL-POSTGRES::ROW-DESCRIPTION) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR SIMPLE-VECTOR NULL), not a VECTOR. ; (FUNCALL CL-POSTGRES:ROW-READER CL-POSTGRES::SOCKET ; CL-POSTGRES::ROW-DESCRIPTION) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; ROW-READER is not known to be a function ; (CL-POSTGRES::WITH-QUERY (CL-POSTGRES::QUERY) ; (LET ((CL-POSTGRES::ROW-DESCRIPTION NIL)) ; (CL-POSTGRES::SIMPLE-PARSE-MESSAGE CL-POSTGRES::SOCKET ; CL-POSTGRES::QUERY) ; (CL-POSTGRES::SIMPLE-DESCRIBE-MESSAGE CL-POSTGRES::SOCKET) ; (CL-POSTGRES::FLUSH-MESSAGE CL-POSTGRES::SOCKET) ; (FORCE-OUTPUT CL-POSTGRES::SOCKET) ; (CL-POSTGRES::MESSAGE-CASE CL-POSTGRES::SOCKET ; (#\1)) ; (CL-POSTGRES::MESSAGE-CASE CL-POSTGRES::SOCKET ; (#\t :SKIP)) ; (CL-POSTGRES::MESSAGE-CASE CL-POSTGRES::SOCKET ; (#\T (SETF #)) ; (#\n)) ; (CL-POSTGRES::SIMPLE-BIND-MESSAGE CL-POSTGRES::SOCKET ; (MAP 'VECTOR ; 'CL-POSTGRES::FIELD-BINARY-P ; CL-POSTGRES::ROW-DESCRIPTION)) ; (CL-POSTGRES::SIMPLE-EXECUTE-MESSAGE CL-POSTGRES::SOCKET) ; (CL-POSTGRES::SYNC-MESSAGE CL-POSTGRES::SOCKET) ; ...)) ; --> LET MULTIPLE-VALUE-PROG1 WHEN IF ; ==> ; (FUNCALL CL-POSTGRES:*QUERY-CALLBACK* CL-POSTGRES::*CURRENT-QUERY* ; (- (GET-INTERNAL-REAL-TIME) #:G8)) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; processing (DEFUN SEND-PARSE ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/protocol.lisp ; in: DEFUN SEND-PARSE ; (CL-POSTGRES::WITH-QUERY (CL-POSTGRES::QUERY) ; (CL-POSTGRES::PARSE-MESSAGE CL-POSTGRES::SOCKET CL-POSTGRES::NAME ; CL-POSTGRES::QUERY) ; (CL-POSTGRES::FLUSH-MESSAGE CL-POSTGRES::SOCKET) ; (FORCE-OUTPUT CL-POSTGRES::SOCKET) ; (CL-POSTGRES::MESSAGE-CASE CL-POSTGRES::SOCKET ; (#\1))) ; --> LET MULTIPLE-VALUE-PROG1 WHEN IF ; ==> ; (FUNCALL CL-POSTGRES:*QUERY-CALLBACK* CL-POSTGRES::*CURRENT-QUERY* ; (- (GET-INTERNAL-REAL-TIME) #:G8)) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; processing (DEFUN SEND-CLOSE ...) ; processing (DEFUN SEND-EXECUTE ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/protocol.lisp ; in: DEFUN SEND-EXECUTE ; (MAP 'VECTOR 'CL-POSTGRES::FIELD-BINARY-P CL-POSTGRES::ROW-DESCRIPTION) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR SIMPLE-VECTOR NULL), not a VECTOR. ; (FUNCALL CL-POSTGRES:ROW-READER CL-POSTGRES::SOCKET ; CL-POSTGRES::ROW-DESCRIPTION) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; ROW-READER is not known to be a function ; processing (DEFUN BUILD-ROW-READER ...) ; processing (DEFMACRO ROW-READER ...) ; processing (DEFMACRO DEF-ROW-READER ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/postmodern/cl-postgres/protocol-tmp6XOIRI3N.fasl ; compilation finished in 0:00:02.479 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/public.lisp" (written 26 APR 2018 03:04:31 AM): ; processing (IN-PACKAGE :CL-POSTGRES) ; processing (DEFCLASS DATABASE-CONNECTION ...) ; processing (DEFUN CONNECTION-META ...) ; processing (DEFUN DATABASE-OPEN-P ...) ; processing (DEFUN OPEN-DATABASE ...) ; processing (DEFPARAMETER *UNIX-SOCKET-DIR* ...) ; processing (DEFUN UNIX-SOCKET-PATH ...) ; processing (DEFUN UNIX-SOCKET-CONNECT ...) ; processing (DEFUN GET-HOST-ADDRESS ...) ; processing (DEFUN INET-SOCKET-CONNECT ...) ; processing (DEFUN INITIATE-CONNECTION ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/public.lisp ; in: DEFUN INITIATE-CONNECTION ; (CL-POSTGRES::ASSERT-UNIX) ; ; note: deleting unreachable code ; processing (DEFUN REOPEN-DATABASE ...) ; processing (DEFUN ENSURE-CONNECTION ...) ; processing (DEFUN CLOSE-DATABASE ...) ; processing (DEFMACRO USING-CONNECTION ...) ; processing (DEFMACRO WITH-RECONNECT-RESTART ...) ; processing (DEFUN WAIT-FOR-NOTIFICATION ...) ; processing (DEFUN EXEC-QUERY ...) ; processing (DEFUN PREPARE-QUERY ...) ; processing (DEFUN UNPREPARE-QUERY ...) ; processing (DEFUN EXEC-PREPARED ...) ; processing (DEF-ROW-READER ALIST-ROW-READER ...) ; processing (DEF-ROW-READER LIST-ROW-READER ...) ; processing (DEF-ROW-READER VECTOR-ROW-READER ...) ; processing (DEF-ROW-READER IGNORE-ROW-READER ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/postmodern/cl-postgres/public-tmp9ZHTLHSG.fasl ; compilation finished in 0:00:01.099 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/bulk-copy.lisp" (written 26 APR 2018 03:04:31 AM): ; processing (IN-PACKAGE :CL-POSTGRES) ; processing (DEFCLASS BULK-COPIER ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN OPEN-DB-WRITER ...) ; processing (DEFUN CLOSE-DB-WRITER ...) ; processing (DEFUN DB-WRITE-ROW ...) ; processing (DEFUN COPY-QUERY ...) ; processing (DEFUN SEND-COPY-START ...) ; processing (DEFUN INITIALIZE-COPIER ...) ; processing (DEFUN COPIER-WRITE-VALUE ...) ; processing (DEFUN COPIER-WRITE-SEQUENCE ...) ; processing (DEFMETHOD PREPARE-ROW ...) ; processing (DEFUN SEND-COPY-DONE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/postmodern/cl-postgres/bulk-copy-tmpRW73Q691.fasl ; compilation finished in 0:00:00.599 ; compiling file "/usr/share/common-lisp/source/postmodern/s-sql/s-sql.lisp" (written 26 APR 2018 03:04:31 AM): ; processing (DEFPACKAGE :S-SQL ...) ; processing (IN-PACKAGE :S-SQL) ; processing (DEFINE-CONDITION SQL-ERROR ...) ; processing (DEFUN SQL-ERROR ...) ; processing (DEFUN STRCAT ...) ; processing (DEFUN IMPLODE ...) ; processing (DEFUN SPLIT-ON-KEYWORDS% ...) ; processing (DEFMACRO SPLIT-ON-KEYWORDS ...) ; processing (DEFPARAMETER *POSTGRES-RESERVED-WORDS* ...) ; processing (DEFPARAMETER *ESCAPE-SQL-NAMES-P* ...) ; processing (DEFVAR *DOWNCASE-SYMBOLS* ...) ; processing (DEFUN TO-SQL-NAME ...) ; file: /usr/share/common-lisp/source/postmodern/s-sql/s-sql.lisp ; in: DEFUN TO-SQL-NAME ; (STRING S-SQL::NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a STRING. ; (CHAR S-SQL::STR S-SQL::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (CHAR-DOWNCASE (CHAR S-SQL::STR S-SQL::I)) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; (CHAR S-SQL::STR S-SQL::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; processing (DEFUN FROM-SQL-NAME ...) ; processing (DEFTYPE SMALLINT ...) ; processing (DEFTYPE BIGINT ...) ; processing (DEFTYPE NUMERIC ...) ; processing (DEFTYPE DOUBLE-PRECISION ...) ; processing (DEFTYPE BYTEA ...) ; processing (DEFTYPE TEXT ...) ; processing (DEFTYPE VARCHAR ...) ; processing (DEFTYPE SERIAL ...) ; processing (DEFTYPE SERIAL8 ...) ; processing (DEFTYPE DB-NULL ...) ; processing (DEFGENERIC SQL-TYPE-NAME ...) ; processing (DEFUN TO-TYPE-NAME ...) ; processing (DEFPARAMETER *STANDARD-SQL-STRINGS* ...) ; processing (DEFUN SQL-ESCAPE-STRING ...) ; processing (DEFGENERIC SQL-ESCAPE ...) ; processing (DEFPARAMETER *EXPAND-RUNTIME* ...) ; processing (DEFUN SQL-EXPAND ...) ; processing (DEFUN SQL-EXPAND-LIST ...) ; processing (DEFUN SQL-EXPAND-NAMES ...) ; processing (DEFUN REDUCE-STRINGS ...) ; processing (DEFMACRO SQL ...) ; processing (DEFUN SQL-COMPILE ...) ; processing (DEFUN SQL-TEMPLATE ...) ; processing (DEFUN S-SQL-READER ...) ; processing (DEFUN ENABLE-S-SQL-SYNTAX ...) ; processing (DEFGENERIC EXPAND-SQL-OP ...) ; processing (DEFMACRO DEF-SQL-OP ...) ; processing (DEFUN MAKE-EXPANDER ...) ; processing (DEFMACRO REGISTER-SQL-OPERATORS ...) ; processing (REGISTER-SQL-OPERATORS :UNARY ...) ; processing (REGISTER-SQL-OPERATORS :N-ARY ...) ; processing (REGISTER-SQL-OPERATORS :N-OR-UNARY ...) ; processing (REGISTER-SQL-OPERATORS :2+-ARY ...) ; processing (REGISTER-SQL-OPERATORS :2+-ARY ...) ; processing (REGISTER-SQL-OPERATORS :2+-ARY ...) ; processing (DEF-SQL-OP :|| ...) ; processing (DEF-SQL-OP :DESC ...) ; processing (DEF-SQL-OP :NULLS-FIRST ...) ; processing (DEF-SQL-OP :NULLS-LAST ...) ; processing (DEF-SQL-OP :AS ...) ; processing (DEF-SQL-OP :@@ ...) ; processing (DEF-SQL-OP :DISTINCT ...) ; processing (DEF-SQL-OP :ANY* ...) ; processing (DEF-SQL-OP :ANY ...) ; processing (DEF-SQL-OP :ALL ...) ; processing (DEF-SQL-OP :ARRAY ...) ; processing (DEF-SQL-OP :CAST ...) ; processing (DEF-SQL-OP :EXISTS ...) ; processing (DEF-SQL-OP :IS-NULL ...) ; processing (DEF-SQL-OP :NOT-NULL ...) ; processing (DEF-SQL-OP :IN ...) ; processing (DEF-SQL-OP :NOT-IN ...) ; processing (DEF-SQL-OP :EXTRACT ...) ; processing (DEF-SQL-OP :COUNT ...) ; processing (DEF-SQL-OP :BETWEEN ...) ; processing (DEF-SQL-OP :BETWEEN-SYMMETRIC ...) ; processing (DEF-SQL-OP :CASE ...) ; processing (DEF-SQL-OP :[] ...) ; processing (DEF-SQL-OP :SET ...) ; processing (DEF-SQL-OP :DOT ...) ; processing (DEF-SQL-OP :TYPE ...) ; processing (DEF-SQL-OP :RAW ...) ; processing (DEFUN EXPAND-JOINS ...) ; processing (DEF-SQL-OP :SELECT ...) ; processing (DEF-SQL-OP :LIMIT ...) ; processing (DEF-SQL-OP :ORDER-BY ...) ; processing (DEF-SQL-OP :SET-CONSTRAINTS ...) ; processing (DEFUN FOR-UPDATE/SHARE ...) ; processing (DEF-SQL-OP :FOR-UPDATE ...) ; processing (DEF-SQL-OP :FOR-SHARE ...) ; processing (DEFUN ESCAPE-SQL-EXPRESSION ...) ; processing (DEF-SQL-OP :FUNCTION ...) ; processing (DEF-SQL-OP :INSERT-INTO ...) ; processing (DEF-SQL-OP :LISTEN ...) ; processing (DEF-SQL-OP :UNLISTEN ...) ; processing (DEF-SQL-OP :NOTIFY ...) ; processing (DEFUN EXPAND-ROWS ...) ; processing (DEF-SQL-OP :INSERT-ROWS-INTO ...) ; processing (DEF-SQL-OP :UPDATE ...) ; processing (DEF-SQL-OP :DELETE-FROM ...) ; processing (DEF-SQL-OP :OVER ...) ; processing (DEF-SQL-OP :PARTITION-BY ...) ; processing (DEF-SQL-OP :PARENS ...) ; processing (DEF-SQL-OP :WITH ...) ; processing (DEF-SQL-OP :WITH-RECURSIVE ...) ; processing (DEF-SQL-OP :WINDOW ...) ; processing (DEFUN DISSECT-TYPE ...) ; processing (DEFUN EXPAND-FOREIGN-ON* ...) ; processing (DEFUN %BUILD-FOREIGN-REFERENCE ...) ; processing (DEFUN EXPAND-TABLE-CONSTRAINT ...) ; processing (DEFUN EXPAND-EXTENDED-TABLE-CONSTRAINT ...) ; processing (DEFUN EXPAND-TABLE-COLUMN ...) ; processing (DEF-SQL-OP :CREATE-TABLE ...) ; processing (DEF-SQL-OP :CREATE-TABLE-FULL ...) ; processing (DEF-SQL-OP :ALTER-TABLE ...) ; processing (DEF-SQL-OP :ALTER-SEQUENCE ...) ; processing (DEFUN EXPAND-CREATE-INDEX ...) ; processing (DEF-SQL-OP :CREATE-INDEX ...) ; processing (DEF-SQL-OP :CREATE-UNIQUE-INDEX ...) ; processing (DEF-SQL-OP :CASCADE ...) ; processing (DEFMACRO DEF-DROP-OP ...) ; processing (DEF-DROP-OP :DROP-TABLE ...) ; processing (DEF-DROP-OP :DROP-INDEX ...) ; processing (DEF-DROP-OP :DROP-SEQUENCE ...) ; processing (DEF-DROP-OP :DROP-VIEW ...) ; processing (DEF-DROP-OP :DROP-TYPE ...) ; processing (DEF-DROP-OP :DROP-RULE ...) ; processing (DEFUN DEQUOTE ...) ; processing (DEF-SQL-OP :NEXTVAL ...) ; processing (DEF-SQL-OP :CURRVAL ...) ; processing (DEF-SQL-OP :CREATE-SEQUENCE ...) ; processing (DEF-SQL-OP :CREATE-VIEW ...) ; processing (DEF-SQL-OP :CREATE-ENUM ...) ; processing (DEF-SQL-OP :CREATE-DOMAIN ...) ; processing (DEF-SQL-OP :DROP-DOMAIN ...) ; processing (DEF-SQL-OP :CREATE-RULE ...) ; processing (DEF-SQL-OP :CREATE-DATABASE ...) ; processing (DEF-DROP-OP :DROP-DATABASE ...) ; processing (DEF-SQL-OP :CREATE-ROLE ...) ; processing (DEF-DROP-OP :DROP-ROLE ...) ; processing (DEF-SQL-OP :COPY ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/postmodern/s-sql/s-sql-tmp4TM0ME1F.fasl ; compilation finished in 0:00:08.715 ; compiling file "/usr/share/common-lisp/source/closer-mop/closer-mop-packages.lisp" (written 29 OCT 2020 06:18:14 AM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE #:CLOSER-MOP ...) ; processing (IN-PACKAGE :CLOSER-MOP) ; processing (DEFINE-CLOSER-COMMON-LISP-PACKAGE) ; processing (DEFPACKAGE #:CLOSER-COMMON-LISP-USER ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/closer-mop/closer-mop-packages-tmpU2IL9N4.fasl ; compilation finished in 0:00:00.399 ; compiling file "/usr/share/common-lisp/source/closer-mop/closer-mop-shared.lisp" (written 29 OCT 2020 06:18:14 AM): ; processing (IN-PACKAGE :CLOSER-MOP) ; processing (DEFUN REQUIRED-ARGS ...) ; processing (DEFUN ENSURE-FINALIZED ...) ; processing (DEFUN SUBCLASSP ...) ; processing (DEFCLASS STANDARD-GENERIC-FUNCTION ...) ; processing (DECLAIM (INLINE M-FUNCTION)) ; processing (DEFUN M-FUNCTION ...) ; processing (DEFINE-COMPILER-MACRO M-FUNCTION ...) ; processing (DEFUN COMPUTE-ARGUMENT-ORDER ...) ; processing (DEFUN PARSE-METHOD-BODY ...) ; processing (COMMON-LISP:DEFMETHOD MAKE-METHOD-LAMBDA ...) ; processing (COMMON-LISP:DEFGENERIC COMPUTE-EFFECTIVE-METHOD-FUNCTION ...) ; processing (COMMON-LISP:DEFMETHOD COMPUTE-EFFECTIVE-METHOD-FUNCTION ...) ; 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: ; * ; processing (DEFUN GET-EMF ...) ; file: /usr/share/common-lisp/source/closer-mop/closer-mop-shared.lisp ; 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. ; processing (DEFUN GET-EMF-USING-CLASSES ...) ; processing (DEFVAR *STANDARD-GFS* ...) ; processing (DEFUN ONLY-STANDARD-METHODS ...) ; file: /usr/share/common-lisp/source/closer-mop/closer-mop-shared.lisp ; 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 #1=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 #1# (cost 4) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; etc. ; processing (DEFUN METHODS-ALL-THE-SAME-SPECIALIZERS ...) ; file: /usr/share/common-lisp/source/closer-mop/closer-mop-shared.lisp ; 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 #1=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 #1# (cost 4) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; etc. ; processing (DEFUN COMPUTE-DISCRIMINATOR ...) ; file: /usr/share/common-lisp/source/closer-mop/closer-mop-shared.lisp ; in: DEFUN COMPUTE-DISCRIMINATOR ; (LENGTH ; (CLOSER-MOP:REQUIRED-ARGS ; (HANDLER-CASE (SB-MOP:GENERIC-FUNCTION-LAMBDA-LIST CLOSER-MOP::GF) ; (UNBOUND-SLOT NIL ; (RETURN-FROM CLOSER-MOP::COMPUTE-DISCRIMINATOR #))))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (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 #1=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 #1# (cost 4) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; etc. ; processing (COMMON-LISP:DEFMETHOD COMPUTE-DISCRIMINATING-FUNCTION ...) ; processing (DEFMACRO DEFGENERIC ...) ; processing (DEFINE-CONDITION DEFMETHOD-WITHOUT-GENERIC-FUNCTION ...) ; processing (DEFINE-SYMBOL-MACRO WARN-ON-DEFMETHOD-WITHOUT-GENERIC-FUNCTION ...) ; processing (DEFMACRO DEFMETHOD ...) ; processing (DEFUN ENSURE-METHOD ...) ; processing (DEFVAR *STANDARD-SLOT-KEYS* ...) ; processing (DEFUN FIX-SLOT-INITARGS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/closer-mop/closer-mop-shared-tmpOPW41KDL.fasl ; compilation finished in 0:00:01.683 ; compiling file "/usr/share/common-lisp/source/closer-mop/closer-sbcl.lisp" (written 29 OCT 2020 06:18:14 AM): ; processing (IN-PACKAGE :CLOSER-MOP) ; processing (PUSHNEW :CLOSER-MOP ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/closer-mop/closer-sbcl-tmpIPVWLON2.fasl ; compilation finished in 0:00:00.019 ; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/package.lisp" (written 26 APR 2018 03:04:31 AM): ; processing (DEFPACKAGE :POSTMODERN ...) ; processing (IN-PACKAGE :POSTMODERN) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/postmodern/postmodern/package-tmpO0LCOIDS.fasl ; compilation finished in 0:00:00.023 ; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/connect.lisp" (written 26 APR 2018 03:04:31 AM): ; processing (IN-PACKAGE :POSTMODERN) ; processing (DEFCLASS POOLED-DATABASE-CONNECTION ...) ; processing (DEFPARAMETER *DATABASE* ...) ; processing (DEFPARAMETER *DEFAULT-USE-SSL* ...) ; processing (DEFUN CONNECT ...) ; processing (DEFUN CONNECTED-P ...) ; processing (DEFUN CONNECT-TOPLEVEL ...) ; processing (DEFGENERIC DISCONNECT ...) ; processing (DEFGENERIC RECONNECT ...) ; processing (DEFUN DISCONNECT-TOPLEVEL ...) ; processing (DEFUN CALL-WITH-CONNECTION ...) ; processing (DEFMACRO WITH-CONNECTION ...) ; processing (DEFVAR *MAX-POOL-SIZE* ...) ; processing (DEFVAR *CONNECTION-POOLS* ...) ; processing (DEFVAR *POOL-LOCK* ...) ; processing (DEFMACRO WITH-POOL-LOCK ...) ; processing (DEFUN GET-FROM-POOL ...) ; processing (DEFMETHOD DISCONNECT ...) ; processing (DEFUN CLEAR-CONNECTION-POOL ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/postmodern/postmodern/connect-tmpP264WQ6O.fasl ; compilation finished in 0:00:00.539 ; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/query.lisp" (written 26 APR 2018 03:04:31 AM): ; processing (IN-PACKAGE :POSTMODERN) ; processing (DEF-ROW-READER SYMBOL-ALIST-ROW-READER ...) ; processing (DEF-ROW-READER SYMBOL-PLIST-ROW-READER ...) ; processing (DEF-ROW-READER COLUMN-ROW-READER ...) ; processing (DEFVAR *CLASS-FINALIZE-LOCK* ...) ; processing (DEFPARAMETER *RESULT-STYLES* ...) ; processing (DEFUN DAO-SPEC-FOR-FORMAT ...) ; processing (DEFUN READER-FOR-FORMAT ...) ; processing (DEFMACRO ALL-ROWS ...) ; processing (DEFMACRO SINGLE-ROW ...) ; processing (DEFMACRO SINGLE-ROW! ...) ; processing (DEFUN REAL-QUERY ...) ; processing (DEFMACRO QUERY ...) ; processing (DEFMACRO EXECUTE ...) ; processing (DEFMACRO DOQUERY ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/postmodern/postmodern/query-tmpESC43OCR.fasl ; compilation finished in 0:00:00.823 ; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/prepare.lisp" (written 26 APR 2018 03:04:31 AM): ; processing (IN-PACKAGE :POSTMODERN) ; processing (DEFUN ENSURE-PREPARED ...) ; processing (LET (#) ...) ; processing (DEFUN GENERATE-PREPARED ...) ; processing (DEFMACRO PREPARE ...) ; processing (DEFMACRO DEFPREPARED ...) ; processing (DEFMACRO DEFPREPARED-WITH-NAMES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/postmodern/postmodern/prepare-tmpWCAM54ZJ.fasl ; compilation finished in 0:00:00.147 ; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/util.lisp" (written 26 APR 2018 03:04:31 AM): ; processing (IN-PACKAGE :POSTMODERN) ; processing (DEFUN TO-IDENTIFIER ...) ; processing (DEFUN SEQUENCE-NEXT ...) ; processing (DEFMACRO MAKE-LIST-QUERY ...) ; processing (DEFMACRO MAKE-EXISTS-QUERY ...) ; processing (DEFUN LIST-TABLES ...) ; processing (DEFUN TABLE-EXISTS-P ...) ; processing (DEFUN LIST-SEQUENCES ...) ; processing (DEFUN SEQUENCE-EXISTS-P ...) ; processing (DEFUN LIST-VIEWS ...) ; processing (DEFUN VIEW-EXISTS-P ...) ; processing (DEFUN TABLE-DESCRIPTION ...) ; processing (DEFUN COALESCE ...) ; processing (DEFUN DATABASE-VERSION ...) ; processing (DEFUN NUM-RECORDS-IN-DATABASE ...) ; processing (DEFUN CURRENT-DATABASE ...) ; processing (DEFUN DATABASE-EXISTS-P ...) ; processing (DEFUN DATABASE-SIZE ...) ; processing (DEFUN LIST-DATABASES ...) ; processing (DEFUN LIST-SCHEMAS ...) ; processing (DEFUN LIST-TABLESPACES ...) ; processing (DEFUN LIST-AVAILABLE-TYPES ...) ; processing (DEFUN LIST-TABLE-SIZES ...) ; processing (DEFUN TABLE-SIZE ...) ; processing (DEFUN MORE-TABLE-INFO ...) ; processing (DEFUN LIST-COLUMNS ...) ; processing (DEFUN LIST-COLUMNS-WITH-TYPES ...) ; processing (DEFUN COLUMN-EXISTS-P ...) ; processing (DEFUN DESCRIBE-VIEWS ...) ; processing (DEFUN LIST-DATABASE-FUNCTIONS ...) ; processing (DEFUN LIST-INDICES ...) ; processing (DEFUN LIST-TABLE-INDICES ...) ; processing (DEFUN LIST-INDEXED-COLUMN-AND-ATTRIBUTES ...) ; processing (DEFUN LIST-INDEX-DEFINITIONS ...) ; processing (DEFUN LIST-FOREIGN-KEYS ...) ; processing (DEFUN LIST-UNIQUE-OR-PRIMARY-CONSTRAINTS ...) ; processing (DEFUN LIST-ALL-CONSTRAINTS ...) ; processing (DEFUN DESCRIBE-CONSTRAINT ...) ; processing (DEFUN DESCRIBE-FOREIGN-KEY-CONSTRAINTS ...) ; processing (DEFUN LIST-TRIGGERS ...) ; processing (DEFUN LIST-DETAILED-TRIGGERS ...) ; processing (DEFUN LIST-DATABASE-USERS ...) ; processing (DEFUN CHANGE-TOPLEVEL-DATABASE ...) ; processing (DEFUN LIST-CONNECTIONS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/postmodern/postmodern/util-tmpVTMW561L.fasl ; compilation finished in 0:00:01.275 ; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/transaction.lisp" (written 26 APR 2018 03:04:31 AM): ; processing (IN-PACKAGE :POSTMODERN) ; processing (DEFPARAMETER *TRANSACTION-LEVEL* ...) ; processing (DEFPARAMETER *CURRENT-LOGICAL-TRANSACTION* ...) ; processing (DEFCLASS TRANSACTION-HANDLE ...) ; processing (DEFUN CALL-WITH-TRANSACTION ...) ; processing (DEFMACRO WITH-TRANSACTION ...) ; processing (DEFUN ABORT-TRANSACTION ...) ; processing (DEFUN COMMIT-TRANSACTION ...) ; processing (DEFCLASS SAVEPOINT-HANDLE ...) ; processing (DEFUN CALL-WITH-SAVEPOINT ...) ; processing (DEFMACRO WITH-SAVEPOINT ...) ; processing (DEFUN ROLLBACK-SAVEPOINT ...) ; processing (DEFUN RELEASE-SAVEPOINT ...) ; processing (DEFUN CALL-WITH-LOGICAL-TRANSACTION ...) ; processing (DEFMACRO WITH-LOGICAL-TRANSACTION ...) ; processing (DEFMETHOD ABORT-LOGICAL-TRANSACTION ...) ; processing (DEFMETHOD ABORT-LOGICAL-TRANSACTION ...) ; processing (DEFMETHOD COMMIT-LOGICAL-TRANSACTION ...) ; processing (DEFMETHOD COMMIT-LOGICAL-TRANSACTION ...) ; processing (DEFUN CALL-WITH-ENSURED-TRANSACTION ...) ; processing (DEFMACRO ENSURE-TRANSACTION ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/postmodern/postmodern/transaction-tmpUNNGT9CF.fasl ; compilation finished in 0:00:00.267 ; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/namespace.lisp" (written 26 APR 2018 03:04:31 AM): ; processing (IN-PACKAGE :POSTMODERN) ; processing (DEFMACRO WITH-SCHEMA ...) ; processing (DEFUN DO-WITH-SCHEMA ...) ; processing (DEFUN GET-SEARCH-PATH ...) ; processing (DEFUN SET-SEARCH-PATH ...) ; processing (DEFUN LIST-SCHEMATA ...) ; processing (DEFUN SCHEMA-EXIST-P ...) ; processing (DEFUN SCHEMA-EXISTS-P ...) ; processing (DEFUN CREATE-SCHEMA ...) ; processing (DEFUN DROP-SCHEMA ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/postmodern/postmodern/namespace-tmp4L3W83SU.fasl ; compilation finished in 0:00:00.159 ; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/table.lisp" (written 26 APR 2018 03:04:31 AM): ; processing (IN-PACKAGE :POSTMODERN) ; processing (DEFCLASS DAO-CLASS ...) ; processing (DEFMETHOD DAO-KEYS ...) ; processing (DEFMETHOD VALIDATE-SUPERCLASS ...) ; processing (DEFMETHOD DAO-KEYS ...) ; processing (DEFMETHOD DAO-KEYS ...) ; processing (DEFUN DAO-COLUMN-SLOTS ...) ; processing (DEFUN DAO-COLUMN-FIELDS ...) ; processing (DEFUN DAO-TABLE-NAME ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFUN DAO-SUPERCLASSES ...) ; processing (DEFMETHOD FINALIZE-INHERITANCE ...) ; processing (DEFCLASS DIRECT-COLUMN-SLOT ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFMETHOD DIRECT-SLOT-DEFINITION-CLASS ...) ; processing (DEFPARAMETER *DIRECT-COLUMN-SLOT* ...) ; processing (DEFCLASS EFFECTIVE-COLUMN-SLOT ...) ; processing (DEFMETHOD COMPUTE-EFFECTIVE-SLOT-DEFINITION ...) ; processing (DEFMETHOD EFFECTIVE-SLOT-DEFINITION-CLASS ...) ; processing (DEFGENERIC DAO-EXISTS-P ...) ; processing (DEFGENERIC INSERT-DAO ...) ; processing (DEFGENERIC UPDATE-DAO ...) ; processing (DEFGENERIC DELETE-DAO ...) ; processing (DEFGENERIC UPSERT-DAO ...) ; processing (DEFGENERIC GET-DAO ...) ; processing (DEFGENERIC MAKE-DAO ...) ; processing (DEFMACRO DEFINE-DAO-FINALIZATION ...) ; processing (DEFGENERIC FETCH-DEFAULTS ...) ; processing (DEFUN %EVAL ...) ; processing (DEFUN BUILD-DAO-METHODS ...) ; processing (DEFPARAMETER *CUSTOM-COLUMN-WRITERS* ...) ; processing (DEFMACRO WITH-COLUMN-WRITERS ...) ; processing (DEFPARAMETER *IGNORE-UNKNOWN-COLUMNS* ...) ; processing (DEFUN DAO-FROM-FIELDS ...) ; processing (DEFUN DAO-ROW-READER ...) ; processing (DEFUN SAVE-DAO ...) ; processing (DEFUN SAVE-DAO/TRANSACTION ...) ; processing (DEFUN QUERY-DAO% ...) ; processing (DEFMACRO QUERY-DAO ...) ; processing (DEFMACRO DAO-ROW-READER-WITH-BODY ...) ; processing (DEFMACRO DO-QUERY-DAO ...) ; processing (DEFUN GENERATE-DAO-QUERY ...) ; processing (DEFMACRO SELECT-DAO ...) ; processing (DEFMACRO DO-SELECT-DAO ...) ; processing (DEFUN DAO-TABLE-DEFINITION ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/postmodern/postmodern/table-tmpGE7QNNEE.fasl ; compilation finished in 0:00:01.155 ; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/deftable.lisp" (written 26 APR 2018 03:04:31 AM): ; processing (IN-PACKAGE :POSTMODERN) ; processing (DEFVAR *TABLE-NAME*) ; processing (SETF (DOCUMENTATION # ...) ...) ; processing (DEFVAR *TABLE-SYMBOL*) ; processing (SETF (DOCUMENTATION # ...) ...) ; processing (DEFVAR *TABLES* ...) ; processing (DEFUN ADD-TABLE-DEFINITION ...) ; processing (DEFMACRO DEFTABLE ...) ; processing (DEFUN CREATE-TABLE ...) ; processing (DEFUN CREATE-ALL-TABLES ...) ; processing (DEFUN CREATE-PACKAGE-TABLES ...) ; processing (DEFUN FLAT-TABLE-NAME ...) ; processing (LABELS (# #) ...) ; processing (DEFUN !DAO-DEF ...) ; processing (DEFUN !FOREIGN ...) ; processing (DEFUN !UNIQUE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/postmodern/postmodern/deftable-tmp9B0UZGT4.fasl ; compilation finished in 0:00:00.503 ; compiling file "/usr/share/common-lisp/source/postmodern/simple-date/simple-date.lisp" (written 26 APR 2018 03:04:31 AM): ; processing (DEFPACKAGE :SIMPLE-DATE ...) ; processing (IN-PACKAGE :SIMPLE-DATE) ; processing (DEFUN TO-EXTERNAL-DATE ...) ; processing (DEFUN TO-INTERNAL-DATE ...) ; processing (LET (#) ...) ; processing (DEFUN MONTH-AT-DAY ...) ; processing (DEFCONSTANT +DAYS-IN-400-YEARS+ ...) ; processing (DEFCONSTANT +DAYS-IN-100-YEARS+ ...) ; processing (DEFCONSTANT +DAYS-IN-4-YEARS+ ...) ; processing (DEFCONSTANT +DAYS-IN-YEAR+ ...) ; processing (DEFCONSTANT +MILLISECS-IN-DAY+ ...) ; processing (DEFUN ENCODE-DAYS ...) ; processing (DEFUN DECODE-DAYS ...) ; processing (DEFUN ENCODE-MILLISECS ...) ; processing (DEFUN DECODE-MILLISECS ...) ; processing (DEFUN LEAP-YEAR-P ...) ; processing (DEFUN DAYS-IN-MONTH ...) ; processing (DEFUN NORMALIZE-TIMESTAMP ...) ; processing (DEFUN DATE-ADD ...) ; processing (DEFUN INVERT-INTERVAL ...) ; processing (DEFCLASS DATE ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN ENCODE-DATE ...) ; processing (DEFUN DECODE-DATE ...) ; processing (DEFUN DAY-OF-WEEK ...) ; processing (DEFCLASS TIME-OF-DAY ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN ENCODE-TIME-OF-DAY ...) ; processing (DEFUN DECODE-TIME-OF-DAY ...) ; processing (DEFCLASS TIMESTAMP ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN ENCODE-TIMESTAMP ...) ; processing (DEFUN DECODE-TIMESTAMP ...) ; processing (DEFCONSTANT +UNIVERSAL-TIME-OFFSET+ ...) ; processing (DEFUN TIMESTAMP-TO-UNIVERSAL-TIME ...) ; processing (DEFUN UNIVERSAL-TIME-TO-TIMESTAMP ...) ; processing (DEFCLASS INTERVAL ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN ENCODE-INTERVAL ...) ; processing (DEFUN DECODE-INTERVAL ...) ; processing (DEFGENERIC TIME-ADD ...) ; processing (DEFMETHOD TIME-ADD ...) ; processing (DEFMETHOD TIME-ADD ...) ; processing (DEFMETHOD TIME-ADD ...) ; processing (DEFMETHOD TIME-ADD ...) ; processing (DEFMETHOD TIME-ADD ...) ; processing (DEFMETHOD TIME-ADD ...) ; processing (DEFMETHOD TIME-ADD ...) ; processing (DEFMETHOD TIME-ADD ...) ; processing (DEFMETHOD TIME-ADD ...) ; processing (DEFMETHOD TIME-ADD ...) ; processing (DEFGENERIC TIME-SUBTRACT ...) ; processing (DEFMETHOD TIME-SUBTRACT ...) ; processing (DEFMETHOD TIME-SUBTRACT ...) ; processing (DEFMETHOD TIME-SUBTRACT ...) ; processing (DEFMETHOD TIME-SUBTRACT ...) ; processing (DEFMETHOD TIME-SUBTRACT ...) ; processing (DEFMETHOD TIME-SUBTRACT ...) ; processing (DEFMETHOD TIME-SUBTRACT ...) ; processing (DEFMETHOD TIME-SUBTRACT ...) ; processing (DEFGENERIC TIME= ...) ; processing (DEFMETHOD TIME= ...) ; processing (DEFMETHOD TIME= ...) ; processing (DEFMETHOD TIME= ...) ; processing (DEFMETHOD TIME= ...) ; processing (DEFMETHOD TIME= ...) ; processing (DEFMETHOD TIME= ...) ; processing (DEFGENERIC TIME< ...) ; processing (DEFMETHOD TIME< ...) ; processing (DEFMETHOD TIME< ...) ; processing (DEFMETHOD TIME< ...) ; processing (DEFMETHOD TIME< ...) ; processing (DEFMETHOD TIME< ...) ; processing (DEFGENERIC TIME> ...) ; processing (DEFMETHOD TIME> ...) ; processing (DEFMETHOD TIME> ...) ; processing (DEFMETHOD TIME> ...) ; processing (DEFMETHOD TIME> ...) ; processing (DEFMETHOD TIME> ...) ; processing (DEFUN TIME<= ...) ; processing (DEFUN TIME>= ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/postmodern/simple-date/simple-date-tmpAJ5U325P.fasl ; compilation finished in 0:00:01.283 ; compiling file "/usr/share/common-lisp/source/ironclad/src/package.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (DEFPACKAGE :IRONCLAD ...) ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFUN ARRAY-READER ...) ; processing (DEFPARAMETER *IRONCLAD-READTABLE* ...) ; processing (DEFMACRO IN-IRONCLAD-READTABLE ...) ; processing (DEFUN IRONCLAD-IMPLEMENTATION-FEATURES ...) ; processing (DOLIST (F #) ...) ; processing (PUSHNEW :IRONCLAD-ASSEMBLY ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/package-tmpAOF1CYAS.fasl ; compilation finished in 0:00:00.155 ; compiling file "/usr/share/common-lisp/source/ironclad/src/conditions.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :IRONCLAD) ; processing (DEFINE-CONDITION IRONCLAD-ERROR ...) ; processing (DEFINE-CONDITION KEY-NOT-SUPPLIED ...) ; processing (DEFINE-CONDITION INITIALIZATION-VECTOR-NOT-SUPPLIED ...) ; processing (DEFINE-CONDITION INVALID-INITIALIZATION-VECTOR ...) ; processing (DEFINE-CONDITION INVALID-KEY-LENGTH ...) ; processing (DEFINE-CONDITION UNSUPPORTED-CIPHER ...) ; processing (DEFINE-CONDITION UNSUPPORTED-MODE ...) ; processing (DEFINE-CONDITION UNSUPPORTED-PADDING ...) ; processing (DEFINE-CONDITION UNSUPPORTED-DIGEST ...) ; processing (DEFINE-CONDITION UNSUPPORTED-MAC ...) ; processing (DEFINE-CONDITION UNSUPPORTED-KDF ...) ; processing (DEFINE-CONDITION UNSUPPORTED-SCRYPT-COST-FACTORS ...) ; processing (DEFINE-CONDITION UNSUPPORTED-ARGON2-PARAMETERS ...) ; processing (DEFINE-CONDITION INSUFFICIENT-BUFFER-SPACE ...) ; processing (DEFINE-CONDITION INVALID-PADDING ...) ; processing (DEFINE-CONDITION INVALID-MAC-PARAMETER ...) ; processing (DEFINE-CONDITION INVALID-SIGNATURE-LENGTH ...) ; processing (DEFINE-CONDITION INVALID-MESSAGE-LENGTH ...) ; processing (DEFINE-CONDITION MISSING-KEY-PARAMETER ...) ; processing (DEFINE-CONDITION MISSING-MESSAGE-PARAMETER ...) ; processing (DEFINE-CONDITION MISSING-SIGNATURE-PARAMETER ...) ; processing (DEFINE-CONDITION INCOMPATIBLE-KEYS ...) ; processing (DEFINE-CONDITION INVALID-CURVE-POINT ...) ; processing (DEFINE-CONDITION INVALID-PUBLIC-KEY-LENGTH ...) ; processing (DEFINE-CONDITION OAEP-DECODING-ERROR ...) ; processing (DEFINE-CONDITION UNSUPPORTED-AUTHENTICATED-ENCRYPTION-MODE ...) ; processing (DEFINE-CONDITION BAD-AUTHENTICATION-TAG ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/conditions-tmpIXCQTSHA.fasl ; compilation finished in 0:00:01.091 ; compiling file "/usr/share/common-lisp/source/ironclad/src/generic.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFGENERIC PROCESS-ASSOCIATED-DATA ...) ; processing (DEFGENERIC PRODUCE-TAG ...) ; processing (DEFGENERIC VERIFY-KEY ...) ; processing (DEFGENERIC SCHEDULE-KEY ...) ; processing (DEFGENERIC KEY-LENGTHS ...) ; processing (DEFGENERIC BLOCK-LENGTH ...) ; processing (DEFGENERIC ENCRYPTED-MESSAGE-LENGTH ...) ; processing (DEFGENERIC MODE-CRYPT-FUNCTIONS ...) ; processing (DEFGENERIC VALID-MODE-FOR-CIPHER-P ...) ; processing (DEFGENERIC ENCRYPT ...) ; processing (DEFGENERIC DECRYPT ...) ; processing (DEFGENERIC DIGEST-FILE ...) ; processing (DEFGENERIC DIGEST-STREAM ...) ; processing (DEFGENERIC DIGEST-SEQUENCE ...) ; processing (DEFGENERIC COPY-DIGEST ...) ; processing (DEFGENERIC UPDATE-DIGEST ...) ; processing (DEFGENERIC PRODUCE-DIGEST ...) ; processing (DEFGENERIC DIGEST-LENGTH ...) ; processing (DEFGENERIC DERIVE-KEY ...) ; processing (DEFGENERIC UPDATE-MAC ...) ; processing (DEFGENERIC PRODUCE-MAC ...) ; processing (DEFGENERIC ADD-PADDING-BYTES ...) ; processing (DEFGENERIC COUNT-PADDING-BYTES ...) ; processing (DEFGENERIC MAKE-PRNG ...) ; processing (DEFGENERIC PRNG-RANDOM-DATA ...) ; processing (DEFGENERIC PRNG-RESEED ...) ; processing (DEFGENERIC PRNG-SEED-LENGTH ...) ; processing (DEFGENERIC MAKE-PUBLIC-KEY ...) ; processing (DEFGENERIC DESTRUCTURE-PUBLIC-KEY ...) ; processing (DEFGENERIC MAKE-PRIVATE-KEY ...) ; processing (DEFGENERIC DESTRUCTURE-PRIVATE-KEY ...) ; processing (DEFGENERIC GENERATE-KEY-PAIR ...) ; processing (DEFGENERIC MAKE-SIGNATURE ...) ; processing (DEFGENERIC DESTRUCTURE-SIGNATURE ...) ; processing (DEFGENERIC GENERATE-SIGNATURE-NONCE ...) ; processing (DEFGENERIC SIGN-MESSAGE ...) ; processing (DEFGENERIC VERIFY-SIGNATURE ...) ; processing (DEFGENERIC MAKE-MESSAGE ...) ; processing (DEFGENERIC DESTRUCTURE-MESSAGE ...) ; processing (DEFGENERIC ENCRYPT-MESSAGE ...) ; processing (DEFGENERIC DECRYPT-MESSAGE ...) ; processing (DEFGENERIC DIFFIE-HELLMAN ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/generic-tmp5E6VIEMS.fasl ; compilation finished in 0:00:00.075 ; compiling file "/usr/share/common-lisp/source/ironclad/src/macro-utils.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFUN QUOTATIONP ...) ; processing (DEFUN UNQUOTE ...) ; processing (DEFUN MASSAGE-SYMBOL ...) ; processing (DEFUN MAKE-CIRCULAR-LIST ...) ; processing (DEFUN CIRCULAR-LIST-SUBSEQ ...) ; processing (DEFUN TRIVIAL-MACROEXPAND-ALL ...) ; processing (DEFMACRO DOTIMES-UNROLLED ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/macro-utils-tmpI0PODGVV.fasl ; compilation finished in 0:00:00.143 ; compiling file "/usr/share/common-lisp/source/ironclad/src/util.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DECLAIM (INLINE BYTE-ARRAY-TO-HEX-STRING ...)) ; processing (DEFUN BYTE-ARRAY-TO-HEX-STRING ...) ; processing (DEFUN HEX-STRING-TO-BYTE-ARRAY ...) ; processing (DEFUN ASCII-STRING-TO-BYTE-ARRAY ...) ; processing (DECLAIM (NOTINLINE BYTE-ARRAY-TO-HEX-STRING ...)) ; processing (DEFUN CONSTANT-TIME-EQUAL ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/util-tmp1Z95I17K.fasl ; compilation finished in 0:00:00.275 ; compiling file "/usr/share/common-lisp/source/ironclad/src/opt/sbcl/fndb.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :SB-C) ; processing (DEFKNOWN (IRONCLAD::FILL-BLOCK-UB8-LE IRONCLAD::FILL-BLOCK-UB8-BE) ...) ; processing (DEFKNOWN IRONCLAD::FILL-BLOCK-UB8-LE/64 ...) ; processing (DEFKNOWN IRONCLAD::FILL-BLOCK-UB8-BE/64 ...) ; processing (DEFKNOWN IRONCLAD::EXPAND-BLOCK ...) ; processing (DEFKNOWN IRONCLAD::%UPDATE-SHA1-BLOCK ...) ; processing (DEFKNOWN IRONCLAD::SHA256-EXPAND-BLOCK ...) ; processing (DEFKNOWN IRONCLAD::X-SALSA-CORE ...) ; processing (DEFKNOWN IRONCLAD::X-CHACHA-CORE ...) ; processing (DEFKNOWN IRONCLAD::PCLMULQDQ-SUPPORT-P ...) ; processing (DEFKNOWN IRONCLAD::AES-NI-SUPPORT-P ...) ; processing (DEFKNOWN IRONCLAD::AES-NI-GENERATE-ROUND-KEYS ...) ; processing (DEFKNOWN IRONCLAD::AES-NI-ENCRYPT ...) ; processing (DEFKNOWN IRONCLAD::AES-NI-DECRYPT ...) ; processing (DEFKNOWN IRONCLAD::FAST-BLAKE2S-MIXING ...) ; processing (DEFKNOWN IRONCLAD::GMAC-MUL-FAST ...) ; processing (DEFKNOWN IRONCLAD::XOR128 ...) ; processing (DEFKNOWN IRONCLAD::MOV128 ...) ; processing (DEFKNOWN IRONCLAD::SWAP32 ...) ; processing (DEFKNOWN IRONCLAD::SWAP64 ...) ; processing (DEFKNOWN IRONCLAD::INC-COUNTER-BLOCK ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/opt/sbcl/fndb-tmpCFVK1AC1.fasl ; compilation finished in 0:00:00.019 ; compiling file "/usr/share/common-lisp/source/ironclad/src/opt/sbcl/x86oid-vm.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (DEFPACKAGE :IRONCLAD-VM ...) ; processing (IN-PACKAGE :IRONCLAD-VM) ; processing (SETF (FDEFINITION #) ...) ; processing (SETF (FDEFINITION #) ...) ; processing (DEFMACRO DWORD-INST ...) ; processing (DEFINE-VOP (FILL-BLOCK-UB8) ...) ; processing (DEFINE-VOP (FILL-BLOCK-UB8-LE FILL-BLOCK-UB8) ...) ; processing (DEFINE-VOP (FILL-BLOCK-UB8-BE FILL-BLOCK-UB8) ...) ; processing (DEFINE-VOP (FILL-BLOCK-UB8-LE/64 FILL-BLOCK-UB8) ...) ; processing (DEFINE-VOP (FILL-BLOCK-UB8-BE/64 FILL-BLOCK-UB8) ...) ; processing (DEFINE-VOP (EXPAND-BLOCK) ...) ; processing (DEFINE-VOP (SHA256-EXPAND-BLOCK) ...) ; processing (DEFINE-VOP (UPDATE-SHA1-BLOCK) ...) ; processing (DEFINE-VOP (SALSA-CORE-FAST) ...) ; processing (DEFINE-VOP (CHACHA-CORE-FAST) ...) ; processing (DEFINE-VOP (PCLMULQDQ-SUPPORT-P) ...) ; processing (DEFINE-VOP (AES-NI-SUPPORT-P) ...) ; processing (DEFINE-VOP (AES-NI-GENERATE-ROUND-KEYS) ...) ; processing (DEFINE-VOP (AES-NI-ENCRYPT) ...) ; processing (DEFINE-VOP (AES-NI-DECRYPT) ...) ; processing (DEFINE-VOP (FAST-BLAKE2S-MIXING) ...) ; processing (DEFINE-VOP (GMAC-MUL-FAST) ...) ; processing (DEFINE-VOP (XOR128) ...) ; processing (DEFINE-VOP (MOV128) ...) ; processing (DEFINE-VOP (SWAP32) ...) ; processing (DEFINE-VOP (SWAP64) ...) ; processing (DEFINE-VOP (INC-COUNTER-BLOCK) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/opt/sbcl/x86oid-vm-tmpHHRR8E8N.fasl ; compilation finished in 0:00:03.039 ; compiling file "/usr/share/common-lisp/source/ironclad/src/opt/sbcl/cpu-features.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (SB-EXT:DEFGLOBAL AES-NI-SUPPORT-KNOWN-P ...) ; processing (SB-EXT:DEFGLOBAL AES-NI-SUPPORTED-P ...) ; processing (DECLAIM (INLINE AES-NI-SUPPORTED-P)) ; processing (DEFUN AES-NI-SUPPORTED-P ...) ; processing (SB-EXT:DEFGLOBAL PCLMULQDQ-SUPPORT-KNOWN-P ...) ; processing (SB-EXT:DEFGLOBAL PCLMULQDQ-SUPPORTED-P ...) ; processing (DECLAIM (INLINE PCLMULQDQ-SUPPORTED-P)) ; processing (DEFUN PCLMULQDQ-SUPPORTED-P ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/opt/sbcl/cpu-features-tmpWWJ02E3I.fasl ; compilation finished in 0:00:00.059 ; compiling file "/usr/share/common-lisp/source/ironclad/src/common.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFMACRO DEFCONST ...) ; processing (DEFTYPE INDEX ...) ; processing (DEFTYPE INDEX+1 ...) ; processing (DEFTYPE SIMPLE-OCTET-VECTOR ...) ; processing (DEFUN BURN-BABY-BURN ...) ; processing (DEFUN HOLD-ME-BACK ...) ; processing (DECLAIM (INLINE FIRST-BYTE)) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN FIRST-BYTE ...) ; processing (DECLAIM (INLINE SECOND-BYTE)) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN SECOND-BYTE ...) ; processing (DECLAIM (INLINE THIRD-BYTE)) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN THIRD-BYTE ...) ; processing (DECLAIM (INLINE FOURTH-BYTE)) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN FOURTH-BYTE ...) ; processing (DECLAIM (INLINE FIFTH-BYTE)) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN FIFTH-BYTE ...) ; processing (DECLAIM (INLINE SIXTH-BYTE)) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN SIXTH-BYTE ...) ; processing (DECLAIM (INLINE SEVENTH-BYTE)) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN SEVENTH-BYTE ...) ; processing (DECLAIM (INLINE EIGHTH-BYTE)) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN EIGHTH-BYTE ...) ; processing (DEFUN UBREF-FUN-NAME ...) ; processing (DECLAIM (INLINE UB16REF/LE ...)) ; processing (DEFUN UB16REF/LE ...) ; processing (DEFUN (SETF UB16REF/LE) ...) ; processing (DEFUN UB16REF/BE ...) ; processing (DEFUN (SETF UB16REF/BE) ...) ; processing (DEFUN UB32REF/LE ...) ; processing (DEFUN (SETF UB32REF/LE) ...) ; processing (DEFUN UB32REF/BE ...) ; processing (DEFUN (SETF UB32REF/BE) ...) ; processing (DEFUN UB64REF/LE ...) ; processing (DEFUN (SETF UB64REF/LE) ...) ; processing (DEFUN UB64REF/BE ...) ; processing (DEFUN (SETF UB64REF/BE) ...) ; processing (DECLAIM (INLINE MOD32+) ...) ; processing (DEFUN MOD32+ ...) ; processing (DEFINE-COMPILER-MACRO MOD32+ ...) ; processing (DECLAIM (INLINE MOD32-) ...) ; processing (DEFUN MOD32- ...) ; processing (DEFINE-COMPILER-MACRO MOD32- ...) ; processing (DECLAIM (INLINE MOD32*) ...) ; processing (DEFUN MOD32* ...) ; processing (DEFINE-COMPILER-MACRO MOD32* ...) ; processing (DECLAIM (INLINE MOD32ASH) ...) ; processing (DEFUN MOD32ASH ...) ; processing (DEFINE-COMPILER-MACRO MOD32ASH ...) ; processing (DECLAIM (INLINE MOD32LOGNOT) ...) ; processing (DEFUN MOD32LOGNOT ...) ; processing (DEFINE-COMPILER-MACRO MOD32LOGNOT ...) ; processing (DECLAIM (INLINE ROL32 ...) ...) ; processing (DEFUN ROL32 ...) ; processing (DEFUN ROR32 ...) ; processing (DECLAIM (INLINE MOD64+ ...) ...) ; processing (DEFUN MOD64+ ...) ; processing (DEFINE-COMPILER-MACRO MOD64+ ...) ; processing (DEFUN MOD64- ...) ; processing (DEFINE-COMPILER-MACRO MOD64- ...) ; processing (DEFUN MOD64* ...) ; processing (DEFINE-COMPILER-MACRO MOD64* ...) ; processing (DECLAIM (INLINE MOD64ASH) ...) ; processing (DEFUN MOD64ASH ...) ; processing (DEFINE-COMPILER-MACRO MOD64ASH ...) ; processing (DECLAIM (INLINE MOD64LOGNOT) ...) ; processing (DEFUN MOD64LOGNOT ...) ; processing (DEFINE-COMPILER-MACRO MOD64LOGNOT ...) ; processing (DECLAIM (INLINE ROL64 ...) ...) ; processing (DEFUN ROL64 ...) ; processing (DEFUN ROR64 ...) ; processing (DECLAIM (INLINE %ADD-WITH-CARRY ...)) ; processing (DEFUN %ADD-WITH-CARRY ...) ; processing (DEFUN %SUBTRACT-WITH-BORROW ...) ; processing (DECLAIM (INLINE FILL-BLOCK-LE-UB8 ...)) ; processing (DECLAIM (INLINE COPY-TO-BUFFER)) ; processing (DEFUN COPY-TO-BUFFER ...) ; processing (DEFUN FILL-BLOCK-UB8-LE ...) ; processing (DEFUN FILL-BLOCK-UB8-BE ...) ; processing (DEFUN FILL-BLOCK-UB8-LE/64 ...) ; processing (DEFUN FILL-BLOCK-UB8-BE/64 ...) ; processing (DEFUN XOR-BLOCK ...) ; processing (DEFINE-COMPILER-MACRO XOR-BLOCK ...) ; processing (DEFUN COPY-BLOCK ...) ; processing (DEFINE-COMPILER-MACRO COPY-BLOCK ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/common-tmpONTOHUJ2.fasl ; compilation finished in 0:00:01.595 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/cipher.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS CIPHER ...) ; processing (DEFCLASS STREAM-CIPHER ...) ; processing (DEFMETHOD ENCRYPT ...) ; processing (DEFMETHOD DECRYPT ...) ; processing (DEFUN ENCRYPT-IN-PLACE ...) ; processing (DEFUN DECRYPT-IN-PLACE ...) ; processing (DEFMACRO WITH-WORDS ...) ; processing (DEFCLASS 8-BYTE-BLOCK-MIXIN ...) ; processing (DEFCLASS 16-BYTE-BLOCK-MIXIN ...) ; processing (DEFCLASS 32-BYTE-BLOCK-MIXIN ...) ; processing (DEFCLASS 64-BYTE-BLOCK-MIXIN ...) ; processing (DEFCLASS 128-BYTE-BLOCK-MIXIN ...) ; processing (DEFMACRO DEFCIPHER ...) ; processing (DEFMACRO DEFINE-BLOCK-ENCRYPTOR ...) ; processing (DEFMACRO DEFINE-BLOCK-DECRYPTOR ...) ; processing (DEFMACRO DEFINE-STREAM-CRYPTOR ...) ; processing (DEFMETHOD VERIFY-KEY ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFCLASS CIPHER-INFO ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN %FIND-CIPHER ...) ; processing (DEFUN (SETF %FIND-CIPHER) ...) ; processing (DEFMETHOD KEY-LENGTHS ...) ; processing (DEFMETHOD KEY-LENGTHS ...) ; processing (DEFMETHOD BLOCK-LENGTH ...) ; processing (DEFMETHOD BLOCK-LENGTH ...) ; processing (DEFMETHOD BLOCK-LENGTH ...) ; processing (DEFMETHOD BLOCK-LENGTH ...) ; processing (DEFMETHOD BLOCK-LENGTH ...) ; processing (DEFMETHOD BLOCK-LENGTH ...) ; processing (DEFMETHOD BLOCK-LENGTH ...) ; processing (DEFUN LIST-ALL-CIPHERS ...) ; processing (DEFUN CIPHER-SUPPORTED-P ...) ; processing (DEFUN ACCEPTABLE-KEY-LENGTHS* ...) ; processing (DEFUN ACCEPTABLE-KEY-LENGTHS ...) ; processing (DEFUN GENERATE-KEY-VERIFIER-METHODS ...) ; processing (DEFUN GENERATE-COMMON-CIPHER-METHODS ...) ; processing (DEFUN GENERATE-BLOCK-CIPHER-FORMS ...) ; processing (DEFUN GENERATE-STREAM-CIPHER-FORMS ...) ; processing (DEFUN %DEFCIPHER ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/cipher-tmpQT9APWMH.fasl ; compilation finished in 0:00:01.091 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/padding.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS PADDING ...) ; processing (DEFCLASS PKCS7-PADDING ...) ; processing (DEFMETHOD ADD-PADDING-BYTES ...) ; processing (DEFMETHOD COUNT-PADDING-BYTES ...) ; processing (DEFCLASS ANSI-X923-PADDING ...) ; processing (DEFMETHOD ADD-PADDING-BYTES ...) ; processing (DEFMETHOD COUNT-PADDING-BYTES ...) ; processing (DEFCLASS ISO-7816-4-PADDING ...) ; processing (DEFMETHOD ADD-PADDING-BYTES ...) ; processing (DEFMETHOD COUNT-PADDING-BYTES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/padding-tmp6LYQXY0L.fasl ; compilation finished in 0:00:00.643 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/make-cipher.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFMETHOD VALID-MODE-FOR-CIPHER-P ...) ; processing (DEFUN VALID-MODE-FOR-BLOCK-CIPHER-P ...) ; processing (DEFMETHOD VALID-MODE-FOR-CIPHER-P ...) ; processing (DEFMETHOD VALID-MODE-FOR-CIPHER-P ...) ; processing (DEFMETHOD VALID-MODE-FOR-CIPHER-P ...) ; processing (DEFMETHOD VALID-MODE-FOR-CIPHER-P ...) ; processing (DEFMETHOD VALID-MODE-FOR-CIPHER-P ...) ; processing (DEFMETHOD VALID-MODE-FOR-CIPHER-P ...) ; processing (DEFUN MAKE-MODE-FOR-CIPHER ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFUN %BLOCK-CIPHER-P ...) ; processing (DEFUN FIND-CIPHER-OR-LOSE ...) ; processing (DEFUN VALIDATE-PARAMETERS-FOR-CIPHER-INFO ...) ; processing (DEFUN MAKE-CIPHER ...) ; processing (DEFINE-COMPILER-MACRO MAKE-CIPHER ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/make-cipher-tmpNKVDR0J1.fasl ; compilation finished in 0:00:00.811 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/modes.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS ENCRYPTION-MODE ...) ; processing (DEFCLASS PADDED-MODE ...) ; processing (DEFCLASS ECB-MODE ...) ; processing (DEFCLASS STREAM-MODE ...) ; processing (DEFCLASS INITITIALIZATION-VECTOR-MIXIN ...) ; processing (DEFCLASS CBC-MODE ...) ; processing (DEFCLASS OFB-MODE ...) ; processing (DEFCLASS CFB-MODE ...) ; processing (DEFCLASS CFB8-MODE ...) ; processing (DEFCLASS CTR-MODE ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFVAR *SUPPORTED-MODES* ...) ; processing (DEFUN MODE-SUPPORTED-P ...) ; processing (DEFUN LIST-ALL-MODES ...) ; processing (DEFMETHOD ENCRYPT-MESSAGE ...) ; processing (DEFMETHOD DECRYPT-MESSAGE ...) ; processing (DEFUN INCREMENT-COUNTER-BLOCK ...) ; processing (DECLAIM (INLINE INCREMENT-COUNTER-BLOCK-1)) ; processing (DEFUN INCREMENT-COUNTER-BLOCK-1 ...) ; processing (DEFUN DECREMENT-COUNTER-BLOCK ...) ; processing (DEFINE-MODE-FUNCTION MODE-CRYPT ...) ; processing (DEFINE-MODE-FUNCTION MODE-CRYPT ...) ; processing (DEFINE-MODE-FUNCTION MODE-CRYPT ...) ; processing (DEFINE-MODE-FUNCTION MODE-CRYPT ...) ; processing (DEFINE-MODE-FUNCTION MODE-CRYPT ...) ; processing (DEFINE-MODE-FUNCTION MODE-CRYPT ...) ; processing (DEFMETHOD MODE-CRYPT-FUNCTIONS ...) ; processing (DEFMETHOD ENCRYPTED-MESSAGE-LENGTH ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/modes-tmp6F83SDCV.fasl ; compilation finished in 0:00:11.471 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/aes.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (IN-IRONCLAD-READTABLE) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFCONST TE0 ...) ; processing (DEFCONST TE1 ...) ; processing (DEFCONST TE2 ...) ; processing (DEFCONST TE3 ...) ; processing (DEFCONST TE4 ...) ; processing (DEFCONST TD0 ...) ; processing (DEFCONST TD1 ...) ; processing (DEFCONST TD2 ...) ; processing (DEFCONST TD3 ...) ; processing (DEFCONST TD4 ...) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFCONST ROUND-CONSTANTS ...) ; processing (DEFTYPE AES-ROUND-KEYS ...) ; processing (DEFCLASS AES ...) ; processing (DEFUN ALLOCATE-ROUND-KEYS ...) ; processing (DEFUN GENERATE-128-BIT-ROUND-KEYS ...) ; processing (DEFUN GENERATE-192-BIT-ROUND-KEYS ...) ; processing (DEFUN GENERATE-256-BIT-ROUND-KEYS ...) ; processing (DEFUN GENERATE-ROUND-KEYS-FOR-ENCRYPTION ...) ; processing (DEFUN GENERATE-ROUND-KEYS-FOR-DECRYPTION ...) ; processing (DEFINE-BLOCK-ENCRYPTOR AES ...) ; processing (DEFINE-BLOCK-DECRYPTOR AES ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFCIPHER AES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/aes-tmpEJNPPMJY.fasl ; compilation finished in 0:00:01.567 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/arcfour.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFTYPE ARCFOUR-SBOX ...) ; processing (DEFCLASS ARCFOUR ...) ; processing (DEFUN ARCFOUR-KEYIFY ...) ; processing (DEFINE-STREAM-CRYPTOR ARCFOUR ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFCIPHER ARCFOUR ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/arcfour-tmp31RWPSX2.fasl ; compilation finished in 0:00:00.251 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/aria.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCONST +ARIA-S1+ ...) ; processing (DEFCONST +ARIA-S2+ ...) ; processing (DEFCONST +ARIA-X1+ ...) ; processing (DEFCONST +ARIA-X2+ ...) ; processing (DEFCONST +ARIA-C1+ ...) ; processing (DEFCONST +ARIA-C2+ ...) ; processing (DEFCONST +ARIA-C3+ ...) ; processing (DEFMACRO ARIA-BRF ...) ; processing (DEFMACRO ARIA-KXL ...) ; processing (DEFMACRO ARIA-SBL1-M ...) ; processing (DEFMACRO ARIA-SBL2-M ...) ; processing (DEFMACRO ARIA-P ...) ; processing (DEFMACRO ARIA-M ...) ; processing (DEFMACRO ARIA-MM ...) ; processing (DEFMACRO ARIA-FO ...) ; processing (DEFMACRO ARIA-FE ...) ; processing (DEFUN ARIA-GSRK ...) ; processing (DEFUN ARIA-PROCESS-BLOCK ...) ; processing (DEFCLASS ARIA ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFINE-BLOCK-ENCRYPTOR ARIA ...) ; processing (DEFINE-BLOCK-DECRYPTOR ARIA ...) ; processing (DEFCIPHER ARIA ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/aria-tmp1HKLMSTH.fasl ; compilation finished in 0:00:03.959 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/blowfish.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (IN-IRONCLAD-READTABLE) ; processing (DEFCONST +BLOWFISH-N-ROUNDS+ ...) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFCONST +P-ARRAY+ ...) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFCONST +S-BOX-0+ ...) ; processing (DEFCONST +S-BOX-1+ ...) ; processing (DEFCONST +S-BOX-2+ ...) ; processing (DEFCONST +S-BOX-3+ ...) ; processing (DEFTYPE BLOWFISH-P-ARRAY ...) ; processing (DEFTYPE BLOWFISH-S-BOXES ...) ; processing (DEFCLASS BLOWFISH ...) ; processing (DECLAIM (INLINE BLOWFISH-F)) ; processing (DEFUN BLOWFISH-F ...) ; processing (DEFUN INITIALIZE-BLOWFISH-VECTORS ...) ; processing (DECLAIM (INLINE BLOWFISH-ENCRYPT-BLOCK*)) ; processing (DEFUN BLOWFISH-ENCRYPT-BLOCK* ...) ; processing (DECLAIM (NOTINLINE BLOWFISH-ENCRYPT-BLOCK*)) ; processing (DEFINE-BLOCK-ENCRYPTOR BLOWFISH ...) ; processing (DECLAIM (INLINE BLOWFISH-DECRYPT-BLOCK*)) ; processing (DEFUN BLOWFISH-DECRYPT-BLOCK* ...) ; processing (DECLAIM (NOTINLINE BLOWFISH-DECRYPT-BLOCK*)) ; processing (DEFINE-BLOCK-DECRYPTOR BLOWFISH ...) ; processing (DEFUN MIX-P-ARRAY ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFCIPHER BLOWFISH ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/blowfish-tmpEWG5XJ53.fasl ; compilation finished in 0:00:04.747 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/camellia.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCONST +CAMELLIA-SBOX1+ ...) ; processing (DEFCONST +CAMELLIA-SBOX2+ ...) ; processing (DEFCONST +CAMELLIA-SBOX3+ ...) ; processing (DEFCONST +CAMELLIA-SBOX4+ ...) ; processing (DEFCONST +CAMELLIA-SIGMA+ ...) ; processing (DEFCONST +CAMELLIA-KSFT1+ ...) ; processing (DEFCONST +CAMELLIA-KIDX1+ ...) ; processing (DEFCONST +CAMELLIA-KSFT2+ ...) ; processing (DEFCONST +CAMELLIA-KIDX2+ ...) ; processing (DECLAIM (FTYPE # ...) ...) ; processing (DEFUN CAMELLIA-FEISTEL ...) ; processing (DEFCLASS CAMELLIA ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFINE-BLOCK-ENCRYPTOR CAMELLIA ...) ; processing (DEFINE-BLOCK-DECRYPTOR CAMELLIA ...) ; processing (DEFCIPHER CAMELLIA ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/camellia-tmpXHL60MUV.fasl ; compilation finished in 0:00:03.019 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/cast5.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (IN-IRONCLAD-READTABLE) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFCONST +CAST5-SBOX0+ ...) ; processing (DEFCONST +CAST5-SBOX1+ ...) ; processing (DEFCONST +CAST5-SBOX2+ ...) ; processing (DEFCONST +CAST5-SBOX3+ ...) ; processing (DEFCONST +CAST5-SBOX4+ ...) ; processing (DEFCONST +CAST5-SBOX5+ ...) ; processing (DEFCONST +CAST5-SBOX6+ ...) ; processing (DEFCONST +CAST5-SBOX7+ ...) ; processing (DEFTYPE CAST5-MASK-VECTOR ...) ; processing (DEFTYPE CAST5-ROTATE-VECTOR ...) ; processing (DEFCLASS CAST5 ...) ; processing (DECLAIM (INLINE CAST5-F1 ...)) ; processing (DEFUN CAST5-F1 ...) ; processing (DEFUN CAST5-F2 ...) ; processing (DEFUN CAST5-F3 ...) ; processing (DEFINE-BLOCK-ENCRYPTOR CAST5 ...) ; processing (DEFINE-BLOCK-DECRYPTOR CAST5 ...) ; processing (DEFUN GENERATE-CAST5-KEY-SCHEDULE ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFCIPHER CAST5 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/cast5-tmpB7NPDQCW.fasl ; compilation finished in 0:00:03.827 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/chacha.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFCONST CHACHA-SIGMA ...) ; processing (DEFCONST CHACHA-TAU ...) ; processing (DEFTYPE CHACHA-STATE ...) ; processing (DEFTYPE CHACHA-KEYSTREAM-BUFFER ...) ; processing (DECLAIM (INLINE CHACHA-CORE)) ; processing (DEFUN CHACHA-CORE ...) ; processing (DEFUN CHACHA/8-CORE ...) ; processing (DEFUN CHACHA/12-CORE ...) ; processing (DEFUN CHACHA/20-CORE ...) ; processing (DEFCLASS CHACHA ...) ; processing (DEFCLASS CHACHA/12 ...) ; processing (DEFCLASS CHACHA/8 ...) ; processing (DEFUN CHACHA-KEYIFY ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFINE-STREAM-CRYPTOR CHACHA ...) ; processing (DEFCIPHER CHACHA ...) ; processing (DEFCIPHER CHACHA/12 ...) ; processing (DEFCIPHER CHACHA/8 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/chacha-tmpGZ70QILE.fasl ; compilation finished in 0:00:00.619 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/xchacha.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS XCHACHA ...) ; processing (DEFCLASS XCHACHA/12 ...) ; processing (DEFCLASS XCHACHA/8 ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFCIPHER XCHACHA ...) ; processing (DEFCIPHER XCHACHA/12 ...) ; processing (DEFCIPHER XCHACHA/8 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/xchacha-tmpKYD38Q95.fasl ; compilation finished in 0:00:00.595 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/des.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (IN-IRONCLAD-READTABLE) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFCONST DES-SBOX0 ...) ; processing (DEFCONST DES-SBOX1 ...) ; processing (DEFCONST DES-SBOX2 ...) ; processing (DEFCONST DES-SBOX3 ...) ; processing (DEFCONST DES-SBOX4 ...) ; processing (DEFCONST DES-SBOX5 ...) ; processing (DEFCONST DES-SBOX6 ...) ; processing (DEFCONST DES-SBOX7 ...) ; processing (DEFCONST PERMUTATION1 ...) ; processing (DEFCONST TOTAL-ROTATIONS ...) ; processing (DEFCONST PERMUTATION2 ...) ; processing (DEFTYPE DES-ROUND-KEYS ...) ; processing (DEFUN DES-MUNGE-BLOCK ...) ; processing (DEFUN 3DES-MUNGE-BLOCK ...) ; processing (DEFCLASS DES ...) ; processing (DEFINE-BLOCK-ENCRYPTOR DES ...) ; processing (DEFINE-BLOCK-DECRYPTOR DES ...) ; processing (DEFCLASS 3DES ...) ; processing (DEFINE-BLOCK-ENCRYPTOR 3DES ...) ; processing (DEFINE-BLOCK-DECRYPTOR 3DES ...) ; processing (DEFUN DES-COOK-KEY-SCHEDULE ...) ; processing (DEFUN COMPUTE-DES-ENCRYPTION-KEYS ...) ; processing (DEFUN COMPUTE-ROUND-KEYS-FOR-DES-KEY ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFCIPHER DES ...) ; processing (DEFCIPHER 3DES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/des-tmpV4YQ0HKA.fasl ; compilation finished in 0:00:01.159 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/idea.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFUN IDEA-MUL ...) ; processing (DEFUN IDEA-MUL-INV ...) ; processing (DEFTYPE IDEA-ROUND-KEYS ...) ; processing (DEFUN IDEA-MUNGE-BLOCK ...) ; processing (DEFCLASS IDEA ...) ; processing (DEFINE-BLOCK-ENCRYPTOR IDEA ...) ; processing (DEFINE-BLOCK-DECRYPTOR IDEA ...) ; processing (DEFUN IDEA-INVERT-KEY ...) ; processing (DEFUN IDEA-KEY-SCHEDULE ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFCIPHER IDEA ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/idea-tmpJXWE1HN2.fasl ; compilation finished in 0:00:00.623 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCONST +KALYNA-T+ ...) ; processing (DEFCONST +KALYNA-IT+ ...) ; processing (DEFCONST +KALYNA-S+ ...) ; processing (DEFCONST +KALYNA-IS+ ...) ; processing (DECLAIM (TYPE # ...) ...) ; processing (DECLAIM (INLINE KALYNA-MAKE-ODD-KEY)) ; processing (DEFUN KALYNA-MAKE-ODD-KEY ...) ; processing (DECLAIM (INLINE KALYNA-SWAP-BLOCKS)) ; processing (DEFUN KALYNA-SWAP-BLOCKS ...) ; processing (DEFMACRO KALYNA-ADD-KEY ...) ; processing (DEFMACRO KALYNA-SUB-KEY ...) ; processing (DEFMACRO KALYNA-ADD-CONSTANT ...) ; processing (DECLAIM (INLINE KALYNA-G0128)) ; processing (DEFUN KALYNA-G0128 ...) ; processing (DECLAIM (INLINE KALYNA-GL128)) ; processing (DEFUN KALYNA-GL128 ...) ; processing (DECLAIM (INLINE KALYNA-IMC128)) ; processing (DEFUN KALYNA-IMC128 ...) ; processing (DECLAIM (INLINE KALYNA-IG128)) ; processing (DEFUN KALYNA-IG128 ...) ; processing (DECLAIM (INLINE KALYNA-IGL128)) ; processing (DEFUN KALYNA-IGL128 ...) ; processing (DECLAIM (INLINE KALYNA-G128)) ; processing (DEFUN KALYNA-G128 ...) ; processing (DEFCLASS KALYNA128 ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFINE-BLOCK-ENCRYPTOR KALYNA128 ...) ; processing (DEFINE-BLOCK-DECRYPTOR KALYNA128 ...) ; processing (DEFCIPHER KALYNA128 ...) ; processing (DECLAIM (INLINE KALYNA-G0256)) ; processing (DEFUN KALYNA-G0256 ...) ; processing (DECLAIM (INLINE KALYNA-GL256)) ; processing (DEFUN KALYNA-GL256 ...) ; processing (DECLAIM (INLINE KALYNA-IMC256)) ; processing (DEFUN KALYNA-IMC256 ...) ; processing (DECLAIM (INLINE KALYNA-IG256)) ; processing (DEFUN KALYNA-IG256 ...) ; processing (DECLAIM (INLINE KALYNA-IGL256)) ; processing (DEFUN KALYNA-IGL256 ...) ; processing (DECLAIM (INLINE KALYNA-G256)) ; processing (DEFUN KALYNA-G256 ...) ; processing (DEFCLASS KALYNA256 ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFINE-BLOCK-ENCRYPTOR KALYNA256 ...) ; processing (DEFINE-BLOCK-DECRYPTOR KALYNA256 ...) ; processing (DEFCIPHER KALYNA256 ...) ; processing (DECLAIM (INLINE KALYNA-G0512)) ; processing (DEFUN KALYNA-G0512 ...) ; processing (DECLAIM (INLINE KALYNA-GL512)) ; processing (DEFUN KALYNA-GL512 ...) ; processing (DECLAIM (INLINE KALYNA-IMC512)) ; processing (DEFUN KALYNA-IMC512 ...) ; processing (DECLAIM (INLINE KALYNA-IG512)) ; processing (DEFUN KALYNA-IG512 ...) ; processing (DECLAIM (INLINE KALYNA-IGL512)) ; processing (DEFUN KALYNA-IGL512 ...) ; processing (DECLAIM (INLINE KALYNA-G512)) ; processing (DEFUN KALYNA-G512 ...) ; processing (DEFCLASS KALYNA512 ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFINE-BLOCK-ENCRYPTOR KALYNA512 ...) ; processing (DEFINE-BLOCK-DECRYPTOR KALYNA512 ...) ; processing (DEFCIPHER KALYNA512 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/kalyna-tmpMNC5LX5B.fasl ; compilation finished in 0:02:03.502 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/kuznyechik.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (IN-IRONCLAD-READTABLE) ; processing (DEFCONST +KUZNYECHIK-S+ ...) ; processing (DEFCONST +KUZNYECHIK-IS+ ...) ; processing (DEFCONST +KUZNYECHIK-T+ ...) ; processing (DEFCONST +KUZNYECHIK-IT+ ...) ; processing (DEFCONST +KUZNYECHIK-C+ ...) ; processing (DEFMACRO KUZNYECHIK-REFT ...) ; processing (DEFMACRO KUZNYECHIK-LS ...) ; processing (DEFMACRO KUZNYECHIK-REFIT ...) ; processing (DEFMACRO KUZNYECHIK-ILS ...) ; processing (DEFMACRO KUZNYECHIK-REFITS ...) ; processing (DEFMACRO KUZNYECHIK-ILSS ...) ; processing (DEFMACRO KUZNYECHIK-ISI ...) ; processing (DEFMACRO KUZNYECHIK-F ...) ; processing (DEFMACRO KUZNYECHIK-FK ...) ; processing (DEFCLASS KUZNYECHIK ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFINE-BLOCK-ENCRYPTOR KUZNYECHIK ...) ; processing (DEFINE-BLOCK-DECRYPTOR KUZNYECHIK ...) ; processing (DEFCIPHER KUZNYECHIK ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/kuznyechik-tmp4RNSVVC1.fasl ; compilation finished in 0:00:02.699 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/misty1.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (IN-IRONCLAD-READTABLE) ; processing (DEFCONST +MISTY1-S7TABLE+ ...) ; processing (DEFCONST +MISTY1-S9TABLE+ ...) ; processing (DEFTYPE MISTY1-ROUND-KEYS ...) ; processing (DEFCLASS MISTY1 ...) ; processing (DECLAIM (NOTINLINE FI ...)) ; processing (DEFUN FI ...) ; processing (DEFUN FL ...) ; processing (DEFUN FL-INV ...) ; processing (DEFUN FO ...) ; processing (DEFINE-BLOCK-ENCRYPTOR MISTY1 ...) ; processing (DEFINE-BLOCK-DECRYPTOR MISTY1 ...) ; processing (DEFUN MISTY1-EXPAND-KEY ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFCIPHER MISTY1 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/misty1-tmpN626KU7B.fasl ; compilation finished in 0:00:00.151 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/rc2.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (IN-IRONCLAD-READTABLE) ; processing (DEFCONST +RC2-PITABLE+ ...) ; processing (DEFTYPE RC2-ROUND-KEYS ...) ; processing (DEFCLASS RC2 ...) ; processing (DECLAIM (INLINE ROL16) ...) ; processing (DEFUN ROL16 ...) ; processing (DEFUN RC2-SCHEDULE-KEY ...) ; processing (DEFINE-BLOCK-ENCRYPTOR RC2 ...) ; processing (DEFINE-BLOCK-DECRYPTOR RC2 ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFCIPHER RC2 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/rc2-tmpOO0K1B0C.fasl ; compilation finished in 0:00:00.315 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/rc5.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :IRONCLAD) ; processing (DEFCONSTANT +RC5/32-P+ ...) ; processing (DEFCONSTANT +RC5/32-Q+ ...) ; processing (DEFCONSTANT +RC5-W+ ...) ; processing (DEFCONSTANT +RC5-WW+ ...) ; processing (DEFCONSTANT +RC5-B+ ...) ; processing (DEFCONSTANT +RC5-BB+ ...) ; processing (DEFTYPE RC5-N-ROUNDS ...) ; processing (DEFTYPE RC5-ROUND-KEYS ...) ; processing (DEFCLASS RC5 ...) ; processing (DEFINE-BLOCK-ENCRYPTOR RC5 ...) ; processing (DEFINE-BLOCK-DECRYPTOR RC5 ...) ; processing (DEFUN RC5-EXPAND-KEY ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFCIPHER RC5 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/rc5-tmpVFL7JAFK.fasl ; compilation finished in 0:00:00.063 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/rc6.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :IRONCLAD) ; processing (DEFCONSTANT +RC6/32-P+ ...) ; processing (DEFCONSTANT +RC6/32-Q+ ...) ; processing (DEFTYPE RC6-N-ROUNDS ...) ; processing (DEFCLASS RC6 ...) ; processing (DEFUN GENERATE-UNROLLED-RC6-ENCRYPTION ...) ; processing (DEFUN GENERATE-UNROLLED-RC6-DECRYPTION ...) ; processing (DEFINE-BLOCK-ENCRYPTOR RC6 ...) ; processing (DEFINE-BLOCK-DECRYPTOR RC6 ...) ; processing (DEFUN RC6-EXPAND-KEY ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFCIPHER RC6 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/rc6-tmpU45RTF.fasl ; compilation finished in 0:00:00.303 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/salsa20.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFCONST SALSA20-SIGMA ...) ; processing (DEFCONST SALSA20-TAU ...) ; processing (DEFTYPE SALSA20-STATE ...) ; processing (DEFTYPE SALSA20-KEYSTREAM-BUFFER ...) ; processing (DECLAIM (INLINE SALSA-CORE)) ; processing (DEFUN SALSA-CORE ...) ; processing (DEFUN SALSA20/8-CORE ...) ; processing (DEFUN SALSA20/12-CORE ...) ; processing (DEFUN SALSA20/20-CORE ...) ; processing (DEFCLASS SALSA20 ...) ; processing (DEFCLASS SALSA20/12 ...) ; processing (DEFCLASS SALSA20/8 ...) ; processing (DEFUN SALSA20-KEYIFY ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFINE-STREAM-CRYPTOR SALSA20 ...) ; processing (DEFCIPHER SALSA20 ...) ; processing (DEFCIPHER SALSA20/12 ...) ; processing (DEFCIPHER SALSA20/8 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/salsa20-tmpZTS6G7ND.fasl ; compilation finished in 0:00:00.067 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/xsalsa20.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS XSALSA20 ...) ; processing (DEFCLASS XSALSA20/12 ...) ; processing (DEFCLASS XSALSA20/8 ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFCIPHER XSALSA20 ...) ; processing (DEFCIPHER XSALSA20/12 ...) ; processing (DEFCIPHER XSALSA20/8 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/xsalsa20-tmp5TNBATEG.fasl ; compilation finished in 0:00:00.039 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/seed.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCONST +SEED-SBOX0+ ...) ; processing (DEFCONST +SEED-SBOX1+ ...) ; processing (DEFCONST +SEED-SBOX2+ ...) ; processing (DEFCONST +SEED-SBOX3+ ...) ; processing (DEFCONST +SEED-KC+ ...) ; processing (DEFMACRO SEED-G ...) ; processing (DEFMACRO SEED-F ...) ; processing (DEFCLASS SEED ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFINE-BLOCK-ENCRYPTOR SEED ...) ; processing (DEFINE-BLOCK-DECRYPTOR SEED ...) ; processing (DEFCIPHER SEED ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/seed-tmpJL6JXW7Z.fasl ; compilation finished in 0:00:00.511 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/serpent.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFMACRO SERPENT-SBOX0 ...) ; processing (DEFMACRO SERPENT-SBOX0-INVERSE ...) ; processing (DEFMACRO SERPENT-SBOX1 ...) ; processing (DEFMACRO SERPENT-SBOX1-INVERSE ...) ; processing (DEFMACRO SERPENT-SBOX2 ...) ; processing (DEFMACRO SERPENT-SBOX2-INVERSE ...) ; processing (DEFMACRO SERPENT-SBOX3 ...) ; processing (DEFMACRO SERPENT-SBOX3-INVERSE ...) ; processing (DEFMACRO SERPENT-SBOX4 ...) ; processing (DEFMACRO SERPENT-SBOX4-INVERSE ...) ; processing (DEFMACRO SERPENT-SBOX5 ...) ; processing (DEFMACRO SERPENT-SBOX5-INVERSE ...) ; processing (DEFMACRO SERPENT-SBOX6 ...) ; processing (DEFMACRO SERPENT-SBOX6-INVERSE ...) ; processing (DEFMACRO SERPENT-SBOX7 ...) ; processing (DEFMACRO SERPENT-SBOX7-INVERSE ...) ; processing (DEFMACRO SERPENT-LINEAR-TRANSFORMATION ...) ; processing (DEFMACRO SERPENT-LINEAR-TRANSFORMATION-INVERSE ...) ; processing (DEFCONSTANT +SERPENT-PHI+ ...) ; processing (DEFCLASS SERPENT ...) ; processing (DEFUN SERPENT-PAD-KEY ...) ; processing (DEFUN SERPENT-GENERATE-SUBKEYS ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFINE-BLOCK-ENCRYPTOR SERPENT ...) ; processing (DEFINE-BLOCK-DECRYPTOR SERPENT ...) ; processing (DEFCIPHER SERPENT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/serpent-tmp5PQ00DH7.fasl ; compilation finished in 0:00:11.775 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/sm4.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (IN-IRONCLAD-READTABLE) ; processing (DEFCONST +SM4-S+ ...) ; processing (DEFCONST +SM4-CK+ ...) ; processing (DEFMACRO SM4-H ...) ; processing (DEFMACRO SM4-G ...) ; processing (DEFMACRO SM4-F ...) ; processing (DEFMACRO SM4-ROUND ...) ; processing (DEFCLASS SM4 ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFINE-BLOCK-ENCRYPTOR SM4 ...) ; processing (DEFINE-BLOCK-DECRYPTOR SM4 ...) ; processing (DEFCIPHER SM4 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/sm4-tmp5R1KP4O2.fasl ; compilation finished in 0:00:00.823 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/sosemanuk.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCONST +SOSEMANUK-MUL-A+ ...) ; processing (DEFCONST +SOSEMANUK-MUL-IA+ ...) ; processing (DEFMACRO SOSEMANUK-S0 ...) ; processing (DEFMACRO SOSEMANUK-S1 ...) ; processing (DEFMACRO SOSEMANUK-S2 ...) ; processing (DEFMACRO SOSEMANUK-S3 ...) ; processing (DEFMACRO SOSEMANUK-S4 ...) ; processing (DEFMACRO SOSEMANUK-S5 ...) ; processing (DEFMACRO SOSEMANUK-S6 ...) ; processing (DEFMACRO SOSEMANUK-S7 ...) ; processing (DEFMACRO SOSEMANUK-LT ...) ; processing (DEFMACRO SOSEMANUK-MKNAME ...) ; processing (DEFCLASS SOSEMANUK ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFUN SOSEMANUK-COMPUTE-BLOCK ...) ; processing (DEFINE-STREAM-CRYPTOR SOSEMANUK ...) ; processing (DEFCIPHER SOSEMANUK ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/sosemanuk-tmpXQDKKJYI.fasl ; compilation finished in 0:00:06.131 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/square.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (IN-IRONCLAD-READTABLE) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFCONST ALOGTABLE ...) ; processing (DEFCONST LOGTABLE ...) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFCONST G-MATRIX ...) ; processing (DEFCONST INVERSE-G-MATRIX ...) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFCONST S-ENCRYPTION-TABLE ...) ; processing (DEFCONST S-DECRYPTION-TABLE ...) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFCONST T-ENCRYPTION-TABLE ...) ; processing (DEFCONST T-DECRYPTION-TABLE ...) ; processing (DECLAIM (INLINE MUL8)) ; processing (DEFUN MUL8 ...) ; processing (DEFUN TRANSFORM ...) ; processing (DEFUN GENERATE-ROUND-KEYS ...) ; processing (DECLAIM (INLINE SQUARE-MUNGE-BLOCK)) ; processing (DEFUN SQUARE-MUNGE-BLOCK ...) ; processing (DEFCLASS SQUARE ...) ; processing (DEFINE-BLOCK-ENCRYPTOR SQUARE ...) ; processing (DEFINE-BLOCK-DECRYPTOR SQUARE ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFCIPHER SQUARE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/square-tmpGJ3P31TF.fasl ; compilation finished in 0:00:03.343 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/tea.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCONSTANT +TEA-N-ROUNDS+ ...) ; processing (DEFCONSTANT +TEA-DELTA+ ...) ; processing (DEFCLASS TEA ...) ; processing (DEFINE-BLOCK-ENCRYPTOR TEA ...) ; processing (DEFINE-BLOCK-DECRYPTOR TEA ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFCIPHER TEA ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/tea-tmpT2P2LFJI.fasl ; compilation finished in 0:00:00.371 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/threefish.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCONSTANT +THREEFISH-KEY-SCHEDULE-CONSTANT+ ...) ; processing (DEFUN THREEFISH-SET-KEY ...) ; processing (DEFUN THREEFISH-SET-TWEAK ...) ; processing (DEFCLASS THREEFISH256 ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFINE-BLOCK-ENCRYPTOR THREEFISH256 ...) ; processing (DEFINE-BLOCK-DECRYPTOR THREEFISH256 ...) ; processing (DEFCIPHER THREEFISH256 ...) ; processing (DEFCLASS THREEFISH512 ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFINE-BLOCK-ENCRYPTOR THREEFISH512 ...) ; processing (DEFINE-BLOCK-DECRYPTOR THREEFISH512 ...) ; processing (DEFCIPHER THREEFISH512 ...) ; processing (DEFCLASS THREEFISH1024 ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFINE-BLOCK-ENCRYPTOR THREEFISH1024 ...) ; processing (DEFINE-BLOCK-DECRYPTOR THREEFISH1024 ...) ; processing (DEFCIPHER THREEFISH1024 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/threefish-tmpKOV75BS9.fasl ; compilation finished in 0:01:04.728 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/twofish.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (IN-IRONCLAD-READTABLE) ; processing (DECLAIM (TYPE # ...)) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFCONST +TWOFISH-Q0+ ...) ; processing (DEFCONST +TWOFISH-Q1+ ...) ; processing (DEFCONST +TWOFISH-RS+ ...) ; processing (DEFCONST +TWOFISH-EXP-TO-POLY+ ...) ; processing (DEFCONST +TWOFISH-POLY-TO-EXP+ ...) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFCONST +TWOFISH-MDS0+ ...) ; processing (DEFCONST +TWOFISH-MDS1+ ...) ; processing (DEFCONST +TWOFISH-MDS2+ ...) ; processing (DEFCONST +TWOFISH-MDS3+ ...) ; processing (DEFTYPE TWOFISH-S-BOXES ...) ; processing (DEFTYPE TWOFISH-ROUND-KEYS ...) ; processing (DEFCLASS TWOFISH ...) ; processing (DEFUN REED-SOLOMON-MULTIPLY ...) ; processing (DEFUN TWOFISH-KEY-SCHEDULE ...) ; processing (DEFUN TWOFISH-SCHEDULE-16-BYTE-KEY ...) ; processing (DEFUN TWOFISH-SCHEDULE-24-BYTE-KEY ...) ; processing (DEFUN TWOFISH-SCHEDULE-32-BYTE-KEY ...) ; processing (DEFINE-BLOCK-ENCRYPTOR TWOFISH ...) ; processing (DEFINE-BLOCK-DECRYPTOR TWOFISH ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFCIPHER TWOFISH ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/twofish-tmpP07HWIXP.fasl ; compilation finished in 0:00:03.499 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/xor.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCONSTANT +XOR-BLOCK-LENGTH+ ...) ; processing (DEFCLASS XOR ...) ; processing (DEFUN XOR-CRYPT-BLOCK ...) ; processing (DEFINE-BLOCK-ENCRYPTOR XOR ...) ; processing (DEFINE-BLOCK-DECRYPTOR XOR ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFCIPHER XOR ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/xor-tmpURW0SA3C.fasl ; compilation finished in 0:00:00.303 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/xtea.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCONSTANT +XTEA-N-ROUNDS+ ...) ; processing (DEFCONSTANT +XTEA-DELTA+ ...) ; processing (DEFCLASS XTEA ...) ; processing (DEFINE-BLOCK-ENCRYPTOR XTEA ...) ; processing (DEFINE-BLOCK-DECRYPTOR XTEA ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFCIPHER XTEA ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/xtea-tmp627QKRZN.fasl ; compilation finished in 0:00:00.603 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/keystream.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFUN KEYSTREAM-POSITION ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/ciphers/keystream-tmpK8OFNZFV.fasl ; compilation finished in 0:00:00.179 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/digest.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCONSTANT +BUFFER-SIZE+ ...) ; processing (DEFTYPE BUFFER-INDEX ...) ; processing (DEFUN UPDATE-DIGEST-FROM-STREAM ...) ; processing (DECLAIM (INLINE STORE-DATA-LENGTH)) ; processing (DEFUN STORE-DATA-LENGTH ...) ; processing (DEFMACRO DEFINE-DIGEST-REGISTERS ...) ; processing (DEFMACRO DEFINE-DIGEST-UPDATER ...) ; processing (DEFMACRO DEFINE-DIGEST-FINALIZER ...) ; processing (DEFSTRUCT (MDX # ...) ...) ; processing (DECLAIM (INLINE MDX-UPDATER)) ; processing (DEFUN MDX-UPDATER ...) ; processing (DECLAIM (NOTINLINE MDX-UPDATER)) ; processing (DEFMETHOD DIGEST-FILE ...) ; processing (DEFMETHOD DIGEST-FILE ...) ; processing (DEFMETHOD DIGEST-FILE ...) ; processing (DEFMETHOD DIGEST-STREAM ...) ; processing (DEFMETHOD DIGEST-STREAM ...) ; processing (DEFMETHOD DIGEST-STREAM ...) ; processing (DEFMETHOD DIGEST-SEQUENCE ...) ; processing (DEFMETHOD DIGEST-SEQUENCE ...) ; processing (DEFUN MAKE-DIGEST ...) ; processing (DEFUN DIGESTP ...) ; processing (DEFUN LIST-ALL-DIGESTS ...) ; processing (DEFUN DIGEST-SUPPORTED-P ...) ; processing (DEFMETHOD DIGEST-LENGTH ...) ; processing (DEFMETHOD DIGEST-LENGTH ...) ; processing (DEFMETHOD UPDATE-DIGEST ...) ; processing (DEFUN OPTIMIZED-MAKER-NAME ...) ; processing (DEFMACRO DEFDIGEST ...) ; processing (DEFINE-COMPILER-MACRO MAKE-DIGEST ...) ; processing (DEFUN MAYBE-EXPAND-ONE-SHOT-CALL ...) ; processing (DEFINE-COMPILER-MACRO DIGEST-SEQUENCE ...) ; processing (DEFINE-COMPILER-MACRO DIGEST-STREAM ...) ; processing (DEFINE-COMPILER-MACRO DIGEST-FILE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/digests/digest-tmpRMCY5COB.fasl ; compilation finished in 0:00:02.127 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/adler32.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCONSTANT ADLER32-MODULO ...) ; processing (DEFSTRUCT (ADLER32 # ...) ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFINE-DIGEST-UPDATER ADLER32 ...) ; processing (DEFINE-DIGEST-FINALIZER (ADLER32 4) ...) ; processing (DEFDIGEST ADLER32 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/digests/adler32-tmp9TN1FOJ6.fasl ; compilation finished in 0:00:00.375 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/blake2.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCONSTANT +BLAKE2-ROUNDS+ ...) ; processing (DEFCONSTANT +BLAKE2-BLOCK-SIZE+ ...) ; processing (DEFCONST +BLAKE2-SIGMA+ ...) ; processing (DEFCONST +BLAKE2-IV+ ...) ; processing (DEFUN BLAKE2-MAKE-INITIAL-STATE ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN BLAKE2-ROUNDS ...) ; processing (DEFSTRUCT (BLAKE2 # ...) ...) ; processing (DEFSTRUCT (BLAKE2/384 # ...)) ; processing (DEFSTRUCT (BLAKE2/256 # ...)) ; processing (DEFSTRUCT (BLAKE2/160 # ...)) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFUN BLAKE2-UPDATE ...) ; processing (DEFUN BLAKE2-FINALIZE ...) ; processing (DEFINE-DIGEST-UPDATER BLAKE2 ...) ; processing (DEFINE-DIGEST-FINALIZER (# # ...) ...) ; processing (DEFDIGEST BLAKE2 ...) ; processing (DEFDIGEST BLAKE2/384 ...) ; processing (DEFDIGEST BLAKE2/256 ...) ; processing (DEFDIGEST BLAKE2/160 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/digests/blake2-tmpEID7NJG3.fasl ; compilation finished in 0:00:08.371 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/blake2s.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCONSTANT +BLAKE2S-ROUNDS+ ...) ; processing (DEFCONSTANT +BLAKE2S-BLOCK-SIZE+ ...) ; processing (DEFCONST +BLAKE2S-SIGMA+ ...) ; processing (DEFCONST +BLAKE2S-IV+ ...) ; processing (DEFUN BLAKE2S-MAKE-INITIAL-STATE ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN BLAKE2S-ROUNDS ...) ; processing (DEFSTRUCT (BLAKE2S # ...) ...) ; processing (DEFSTRUCT (BLAKE2S/224 # ...)) ; processing (DEFSTRUCT (BLAKE2S/160 # ...)) ; processing (DEFSTRUCT (BLAKE2S/128 # ...)) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFUN BLAKE2S-UPDATE ...) ; processing (DEFUN BLAKE2S-FINALIZE ...) ; processing (DEFINE-DIGEST-UPDATER BLAKE2S ...) ; processing (DEFINE-DIGEST-FINALIZER (# # ...) ...) ; processing (DEFDIGEST BLAKE2S ...) ; processing (DEFDIGEST BLAKE2S/224 ...) ; processing (DEFDIGEST BLAKE2S/160 ...) ; processing (DEFDIGEST BLAKE2S/128 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/digests/blake2s-tmp8CJLVG9R.fasl ; compilation finished in 0:00:13.231 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/crc24.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (IN-IRONCLAD-READTABLE) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFCONST +CRC24-TABLE+ ...) ; processing (DEFSTRUCT (CRC24 # ...) ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFINE-DIGEST-UPDATER CRC24 ...) ; processing (DEFINE-DIGEST-FINALIZER (CRC24 3) ...) ; processing (DEFDIGEST CRC24 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/digests/crc24-tmpZCJK45JG.fasl ; compilation finished in 0:00:00.355 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/crc32.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (IN-IRONCLAD-READTABLE) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFCONST +CRC32-TABLE+ ...) ; processing (DEFSTRUCT (CRC32 # ...) ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFINE-DIGEST-UPDATER CRC32 ...) ; processing (DEFINE-DIGEST-FINALIZER (CRC32 4) ...) ; processing (DEFDIGEST CRC32 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/digests/crc32-tmpQC4TENAZ.fasl ; compilation finished in 0:00:00.303 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/groestl.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCONSTANT +GROESTL-ROWS+ ...) ; processing (DEFCONSTANT +GROESTL-LENGTH-FIELD-LENGTH+ ...) ; processing (DEFCONSTANT +GROESTL-COLS-512+ ...) ; processing (DEFCONSTANT +GROESTL-COLS-1024+ ...) ; processing (DEFCONSTANT +GROESTL-SIZE-512+ ...) ; processing (DEFCONSTANT +GROESTL-SIZE-1024+ ...) ; processing (DEFCONSTANT +GROESTL-ROUNDS-512+ ...) ; processing (DEFCONSTANT +GROESTL-ROUNDS-1024+ ...) ; processing (DEFCONST +GROESTL-TABLE+ ...) ; processing (DECLAIM (INLINE GROESTL-TABLE) ...) ; processing (DEFUN GROESTL-TABLE ...) ; processing (DEFMACRO GROESTL-EXT-BYTE ...) ; processing (DEFMACRO GROESTL-COLUMN ...) ; processing (DECLAIM (INLINE GROESTL-RND512P) ...) ; processing (DEFUN GROESTL-RND512P ...) ; processing (DECLAIM (INLINE GROESTL-RND512Q) ...) ; processing (DEFUN GROESTL-RND512Q ...) ; processing (DECLAIM (INLINE GROESTL-RND1024P) ...) ; processing (DEFUN GROESTL-RND1024P ...) ; processing (DECLAIM (INLINE GROESTL-RND1024Q) ...) ; processing (DEFUN GROESTL-RND1024Q ...) ; processing (DEFUN GROESTL-F512 ...) ; processing (DEFUN GROESTL-F1024 ...) ; processing (DEFUN GROESTL-MAKE-INITIAL-STATE ...) ; processing (DEFSTRUCT (GROESTL # ...) ...) ; processing (DEFSTRUCT (GROESTL/384 # ...)) ; processing (DEFSTRUCT (GROESTL/256 # ...)) ; processing (DEFSTRUCT (GROESTL/224 # ...)) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFUN GROESTL-UPDATE ...) ; processing (DEFUN GROESTL-FINALIZE ...) ; processing (DEFINE-DIGEST-UPDATER GROESTL ...) ; processing (DEFINE-DIGEST-FINALIZER (# # ...) ...) ; processing (DEFDIGEST GROESTL ...) ; processing (DEFDIGEST GROESTL/384 ...) ; processing (DEFDIGEST GROESTL/256 ...) ; processing (DEFDIGEST GROESTL/224 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/digests/groestl-tmp4HJFFDY3.fasl ; compilation finished in 0:00:44.101 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/jh.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCONSTANT +JH-ROUNDS+ ...) ; processing (DEFCONSTANT +JH-BLOCK-SIZE+ ...) ; processing (DEFCONST +JH224-H0+ ...) ; processing (DEFCONST +JH256-H0+ ...) ; processing (DEFCONST +JH384-H0+ ...) ; processing (DEFCONST +JH512-H0+ ...) ; processing (DEFCONST +JH-ROUND-CONSTANTS+ ...) ; processing (DEFMACRO JH-SWAP-1 ...) ; processing (DEFMACRO JH-SWAP-2 ...) ; processing (DEFMACRO JH-SWAP-4 ...) ; processing (DEFMACRO JH-SWAP-8 ...) ; processing (DEFMACRO JH-SWAP-16 ...) ; processing (DEFMACRO JH-SWAP-32 ...) ; processing (DEFMACRO JH-L ...) ; processing (DEFMACRO JH-SS ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN JH-E8 ...) ; processing (DEFUN JH-F8 ...) ; processing (DEFSTRUCT (JH # ...) ...) ; processing (DEFSTRUCT (JH/384 # ...)) ; processing (DEFSTRUCT (JH/256 # ...)) ; processing (DEFSTRUCT (JH/224 # ...)) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFUN JH-UPDATE ...) ; processing (DEFUN JH-FINALIZE ...) ; processing (DEFINE-DIGEST-UPDATER JH ...) ; processing (DEFINE-DIGEST-FINALIZER (# # ...) ...) ; processing (DEFDIGEST JH ...) ; processing (DEFDIGEST JH/384 ...) ; processing (DEFDIGEST JH/256 ...) ; processing (DEFDIGEST JH/224 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/digests/jh-tmp78H81ZL.fasl ; compilation finished in 0:00:08.283 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/kupyna.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCONST +KUPYNA-T+ ...) ; processing (DECLAIM (TYPE # ...)) ; processing (DECLAIM (INLINE KUPYNA-G256)) ; processing (DEFUN KUPYNA-G256 ...) ; processing (DECLAIM (INLINE KUPYNA-ROUND-P256)) ; processing (DEFUN KUPYNA-ROUND-P256 ...) ; processing (DECLAIM (INLINE KUPYNA-ROUND-Q256)) ; processing (DEFUN KUPYNA-ROUND-Q256 ...) ; processing (DEFUN KUPYNA-OUTPUT-TRANSFORM256 ...) ; processing (DEFUN KUPYNA-TRANSFORM256 ...) ; processing (DECLAIM (INLINE KUPYNA-G512)) ; processing (DEFUN KUPYNA-G512 ...) ; processing (DECLAIM (INLINE KUPYNA-ROUND-P512)) ; processing (DEFUN KUPYNA-ROUND-P512 ...) ; processing (DECLAIM (INLINE KUPYNA-ROUND-Q512)) ; processing (DEFUN KUPYNA-ROUND-Q512 ...) ; processing (DEFUN KUPYNA-OUTPUT-TRANSFORM512 ...) ; processing (DEFUN KUPYNA-TRANSFORM512 ...) ; processing (DEFSTRUCT (KUPYNA # ...) ...) ; processing (DEFSTRUCT (KUPYNA/256 # ...)) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFINE-DIGEST-UPDATER KUPYNA ...) ; processing (DEFINE-DIGEST-FINALIZER (# #) ...) ; processing (DEFDIGEST KUPYNA ...) ; processing (DEFDIGEST KUPYNA/256 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/digests/kupyna-tmp86K6JU7V.fasl ; compilation finished in 0:00:45.489 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/md2.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (IN-IRONCLAD-READTABLE) ; processing (DEFCONST +MD2-PERMUTATION+ ...) ; processing (DEFUN UPDATE-MD2-REGS ...) ; processing (DECLAIM (INLINE MD2REGS-DIGEST)) ; processing (DEFUN MD2REGS-DIGEST ...) ; processing (DEFSTRUCT (MD2 # ...) ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFINE-DIGEST-UPDATER MD2 ...) ; processing (DEFINE-DIGEST-FINALIZER (MD2 16) ...) ; processing (DEFDIGEST MD2 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/digests/md2-tmp2L6X9BVQ.fasl ; compilation finished in 0:00:00.211 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/md4.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFINE-DIGEST-REGISTERS (MD4 :ENDIAN ...) ...) ; processing (DEFCONST +PRISTINE-MD4-REGISTERS+ ...) ; processing (DEFUN UPDATE-MD4-BLOCK ...) ; processing (DEFSTRUCT (MD4 # ...) ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFINE-DIGEST-UPDATER MD4 ...) ; processing (DEFINE-DIGEST-FINALIZER (MD4 16) ...) ; processing (DEFDIGEST MD4 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/digests/md4-tmpES5DCUFN.fasl ; compilation finished in 0:00:00.399 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/md5.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFPARAMETER *T* ...) ; processing (DEFINE-DIGEST-REGISTERS (MD5 :ENDIAN ...) ...) ; processing (DEFCONST +PRISTINE-MD5-REGISTERS+ ...) ; processing (DEFUN UPDATE-MD5-BLOCK ...) ; processing (DEFSTRUCT (MD5 # ...) ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFINE-DIGEST-UPDATER MD5 ...) ; processing (DEFINE-DIGEST-FINALIZER (MD5 16) ...) ; processing (DEFDIGEST MD5 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/digests/md5-tmpDVKOEP6R.fasl ; compilation finished in 0:00:00.507 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/md5-lispworks-int32.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CL-USER) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/digests/md5-lispworks-int32-tmp4TWTKS75.fasl ; compilation finished in 0:00:00.015 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/ripemd-128.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFINE-DIGEST-REGISTERS (RIPEMD-128 :ENDIAN ...) ...) ; processing (DEFCONST +PRISTINE-RIPEMD-128-REGISTERS+ ...) ; processing (DEFUN UPDATE-RIPEMD-128-BLOCK ...) ; processing (DEFSTRUCT (RIPEMD-128 # ...) ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFINE-DIGEST-UPDATER RIPEMD-128 ...) ; processing (DEFINE-DIGEST-FINALIZER (RIPEMD-128 16) ...) ; processing (DEFDIGEST RIPEMD-128 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/digests/ripemd-128-tmpXSOQ2I78.fasl ; compilation finished in 0:00:03.795 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/ripemd-160.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFINE-DIGEST-REGISTERS (RIPEMD-160 :ENDIAN ...) ...) ; processing (DEFCONST +PRISTINE-RIPEMD-160-REGISTERS+ ...) ; processing (DEFUN UPDATE-RIPEMD-160-BLOCK ...) ; processing (DEFSTRUCT (RIPEMD-160 # ...) ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFINE-DIGEST-UPDATER RIPEMD-160 ...) ; processing (DEFINE-DIGEST-FINALIZER (RIPEMD-160 20) ...) ; processing (DEFDIGEST RIPEMD-160 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/digests/ripemd-160-tmpUA03GLW1.fasl ; compilation finished in 0:00:19.943 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/sha1.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCONSTANT +K1+ ...) ; processing (DEFCONSTANT +K2+ ...) ; processing (DEFCONSTANT +K3+ ...) ; processing (DEFCONSTANT +K4+ ...) ; processing (DEFINE-DIGEST-REGISTERS (SHA1 :ENDIAN ...) ...) ; processing (DEFCONST +PRISTINE-SHA1-REGISTERS+ ...) ; processing (DEFUN UPDATE-SHA1-BLOCK ...) ; processing (DEFUN EXPAND-BLOCK ...) ; processing (DEFSTRUCT (SHA1 # ...) ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFINE-DIGEST-UPDATER SHA1 ...) ; processing (DEFINE-DIGEST-FINALIZER (SHA1 20) ...) ; processing (DEFDIGEST SHA1 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/digests/sha1-tmpO0OW34V4.fasl ; compilation finished in 0:00:01.623 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/sha256.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (IN-IRONCLAD-READTABLE) ; processing (DEFINE-DIGEST-REGISTERS (SHA224 :ENDIAN ...) ...) ; processing (DEFCONST +PRISTINE-SHA224-REGISTERS+ ...) ; processing (DEFINE-DIGEST-REGISTERS (SHA256 :ENDIAN ...) ...) ; processing (DEFCONST +PRISTINE-SHA256-REGISTERS+ ...) ; processing (DEFCONST +SHA256-ROUND-CONSTANTS+ ...) ; processing (DEFUN UPDATE-SHA256-BLOCK ...) ; processing (DEFUN SHA256-EXPAND-BLOCK ...) ; processing (DEFSTRUCT (SHA256 # ...) ...) ; processing (DEFSTRUCT (SHA224 # ...)) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFINE-DIGEST-UPDATER SHA256 ...) ; processing (DEFINE-DIGEST-FINALIZER (# #) ...) ; processing (DEFDIGEST SHA256 ...) ; processing (DEFDIGEST SHA224 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/digests/sha256-tmpU8KQLETJ.fasl ; compilation finished in 0:00:18.591 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/sha3.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCONSTANT +KECCAK-STATE-COLUMNS+ ...) ; processing (DEFCONSTANT +KECCAK-STATE-ROWS+ ...) ; processing (DEFCONSTANT +KECCAK-STATE-LANES+ ...) ; processing (DEFCONSTANT +KECCAK-LANE-WIDTH+ ...) ; processing (DEFCONSTANT +KECCAK-LANE-BYTE-WIDTH+ ...) ; processing (DEFCONSTANT +KECCAK-ROUNDS+ ...) ; processing (DEFTYPE KECCAK-LANE ...) ; processing (DEFTYPE KECCAK-STATE ...) ; processing (DEFCONST +KECCAK-ROTATE-OFFSETS+ ...) ; processing (DEFCONST +KECCAK-ROUND-CONSTANTS+ ...) ; processing (DEFMACRO GET-KECCAK-ROTATE-OFFSET ...) ; processing (DECLAIM (INLINE GET-KECCAK-ROUND-CONSTANT) ...) ; processing (DEFUN GET-KECCAK-ROUND-CONSTANT ...) ; processing (DECLAIM (INLINE MAKE-KECCAK-STATE) ...) ; processing (DEFUN MAKE-KECCAK-STATE ...) ; processing (DEFUN KECCAK-STATE-MERGE-INPUT ...) ; processing (DEFUN KECCAK-STATE-EXTRACT-OUTPUT ...) ; processing (DEFMACRO WITH-KECCAK-STATE-ACCESSORS ...) ; processing (DEFMACRO WITH-TEMP-KECCAK-STATE ...) ; processing (DEFMACRO WITH-TEMP-KECCAK-ROWS ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN KECCAK-ROUNDS ...) ; processing (DEFUN PAD-MESSAGE-TO-WIDTH ...) ; processing (DEFSTRUCT (SHA3 # ...) ...) ; processing (DEFSTRUCT (SHA3/384 # ...)) ; processing (DEFSTRUCT (SHA3/256 # ...)) ; processing (DEFSTRUCT (SHA3/224 # ...)) ; processing (DEFSTRUCT (KECCAK # ...)) ; processing (DEFSTRUCT (KECCAK/384 # ...)) ; processing (DEFSTRUCT (KECCAK/256 # ...)) ; processing (DEFSTRUCT (KECCAK/224 # ...)) ; processing (DEFSTRUCT (SHAKE256 # ...)) ; processing (DEFSTRUCT (SHAKE128 # ...)) ; processing (DEFUN %MAKE-SHAKE256-DIGEST ...) ; processing (DEFUN %MAKE-SHAKE128-DIGEST ...) ; processing (DEFMETHOD BLOCK-LENGTH ...) ; processing (DEFMETHOD BLOCK-LENGTH ...) ; processing (DEFMETHOD DIGEST-LENGTH ...) ; processing (DEFMETHOD DIGEST-LENGTH ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFUN SHA3-UPDATE ...) ; processing (DEFUN SHA3-FINALIZE ...) ; processing (DEFINE-DIGEST-UPDATER SHA3 ...) ; processing (DEFINE-DIGEST-FINALIZER (# # ...) ...) ; processing (DEFDIGEST SHA3 ...) ; processing (DEFDIGEST SHA3/384 ...) ; processing (DEFDIGEST SHA3/256 ...) ; processing (DEFDIGEST SHA3/224 ...) ; processing (DEFDIGEST KECCAK ...) ; processing (DEFDIGEST KECCAK/384 ...) ; processing (DEFDIGEST KECCAK/256 ...) ; processing (DEFDIGEST KECCAK/224 ...) ; processing (DEFMETHOD PRODUCE-DIGEST ...) ; processing (DEFMETHOD PRODUCE-DIGEST ...) ; processing (SETF (GET # ...) ...) ; processing (SETF (GET # ...) ...) ; processing (SETF (GET # ...) ...) ; processing (SETF (GET # ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/digests/sha3-tmpLBWGBOTB.fasl ; compilation finished in 0:00:04.723 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/sha512.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (IN-IRONCLAD-READTABLE) ; processing (DEFINE-DIGEST-REGISTERS (SHA384 :ENDIAN ...) ...) ; processing (DEFCONST +PRISTINE-SHA384-REGISTERS+ ...) ; processing (DEFINE-DIGEST-REGISTERS (SHA512 :ENDIAN ...) ...) ; processing (DEFCONST +PRISTINE-SHA512-REGISTERS+ ...) ; processing (DEFCONST +SHA512-ROUND-CONSTANTS+ ...) ; processing (DEFUN UPDATE-SHA512-BLOCK ...) ; processing (DEFUN SHA512-EXPAND-BLOCK ...) ; processing (DEFSTRUCT (SHA512 # ...) ...) ; processing (DEFSTRUCT (SHA384 # ...)) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFINE-DIGEST-UPDATER SHA512 ...) ; processing (DEFINE-DIGEST-FINALIZER (# #) ...) ; processing (DEFDIGEST SHA512 ...) ; processing (DEFDIGEST SHA384 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/digests/sha512-tmpRX2XGI9U.fasl ; compilation finished in 0:00:13.431 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/skein.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (IN-IRONCLAD-READTABLE) ; processing (DEFCONSTANT +SKEIN-KEY+ ...) ; processing (DEFCONSTANT +SKEIN-CFG+ ...) ; processing (DEFCONSTANT +SKEIN-PRS+ ...) ; processing (DEFCONSTANT +SKEIN-PK+ ...) ; processing (DEFCONSTANT +SKEIN-KDF+ ...) ; processing (DEFCONSTANT +SKEIN-NON+ ...) ; processing (DEFCONSTANT +SKEIN-MSG+ ...) ; processing (DEFCONSTANT +SKEIN-OUT+ ...) ; processing (DECLAIM (TYPE # ...)) ; processing (DECLAIM (TYPE # ...)) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFCONST +SKEIN256-IV-128+ ...) ; processing (DEFCONST +SKEIN256-IV-160+ ...) ; processing (DEFCONST +SKEIN256-IV-224+ ...) ; processing (DEFCONST +SKEIN256-IV-256+ ...) ; processing (DEFCONST +SKEIN512-IV-128+ ...) ; processing (DEFCONST +SKEIN512-IV-160+ ...) ; processing (DEFCONST +SKEIN512-IV-224+ ...) ; processing (DEFCONST +SKEIN512-IV-256+ ...) ; processing (DEFCONST +SKEIN512-IV-384+ ...) ; processing (DEFCONST +SKEIN512-IV-512+ ...) ; processing (DEFCONST +SKEIN1024-IV-384+ ...) ; processing (DEFCONST +SKEIN1024-IV-512+ ...) ; processing (DEFCONST +SKEIN1024-IV-1024+ ...) ; processing (DEFUN SKEIN-GET-IV ...) ; processing (DECLAIM (INLINE SKEIN-INCREMENT-COUNTER)) ; processing (DEFUN SKEIN-INCREMENT-COUNTER ...) ; processing (DEFUN SKEIN-UPDATE-TWEAK ...) ; processing (DEFUN SKEIN-MAKE-TWEAK ...) ; processing (DEFUN SKEIN-MAKE-CONFIGURATION-STRING ...) ; processing (DEFGENERIC SKEIN-VALUE ...) ; processing (DEFGENERIC SKEIN-TWEAK ...) ; processing (DEFGENERIC SKEIN-CFG ...) ; processing (DEFGENERIC SKEIN-BUFFER ...) ; processing (DEFGENERIC SKEIN-BUFFER-LENGTH ...) ; processing (DEFGENERIC SKEIN-CIPHER ...) ; processing (DECLAIM (INLINE SKEIN-UPDATE-CIPHER)) ; processing (DEFUN SKEIN-UPDATE-CIPHER ...) ; processing (DEFUN SKEIN-UBI ...) ; processing (DEFUN SKEIN-FINALIZE ...) ; processing (DEFUN SKEIN-COPY-CIPHER ...) ; processing (DEFSTRUCT (SKEIN256 # ...) ...) ; processing (DEFSTRUCT (SKEIN256/128 # ...)) ; processing (DEFSTRUCT (SKEIN256/160 # ...)) ; processing (DEFSTRUCT (SKEIN256/224 # ...)) ; processing (DEFMETHOD SKEIN-VALUE ...) ; processing (DEFMETHOD SKEIN-TWEAK ...) ; processing (DEFMETHOD SKEIN-CFG ...) ; processing (DEFMETHOD SKEIN-BUFFER ...) ; processing (DEFMETHOD SKEIN-BUFFER-LENGTH ...) ; processing (DEFMETHOD (SETF SKEIN-BUFFER-LENGTH) ...) ; processing (DEFMETHOD SKEIN-CIPHER ...) ; processing (DEFMETHOD (SETF SKEIN-CIPHER) ...) ; processing (DEFUN %REINITIALIZE-SKEIN256 ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFINE-DIGEST-UPDATER SKEIN256 ...) ; processing (DEFINE-DIGEST-FINALIZER (# # ...) ...) ; processing (DEFDIGEST SKEIN256 ...) ; processing (DEFDIGEST SKEIN256/128 ...) ; processing (DEFDIGEST SKEIN256/160 ...) ; processing (DEFDIGEST SKEIN256/224 ...) ; processing (DEFSTRUCT (SKEIN512 # ...) ...) ; processing (DEFSTRUCT (SKEIN512/128 # ...)) ; processing (DEFSTRUCT (SKEIN512/160 # ...)) ; processing (DEFSTRUCT (SKEIN512/224 # ...)) ; processing (DEFSTRUCT (SKEIN512/256 # ...)) ; processing (DEFSTRUCT (SKEIN512/384 # ...)) ; processing (DEFMETHOD SKEIN-VALUE ...) ; processing (DEFMETHOD SKEIN-TWEAK ...) ; processing (DEFMETHOD SKEIN-CFG ...) ; processing (DEFMETHOD SKEIN-BUFFER ...) ; processing (DEFMETHOD SKEIN-BUFFER-LENGTH ...) ; processing (DEFMETHOD (SETF SKEIN-BUFFER-LENGTH) ...) ; processing (DEFMETHOD SKEIN-CIPHER ...) ; processing (DEFMETHOD (SETF SKEIN-CIPHER) ...) ; processing (DEFUN %REINITIALIZE-SKEIN512 ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFINE-DIGEST-UPDATER SKEIN512 ...) ; processing (DEFINE-DIGEST-FINALIZER (# # ...) ...) ; processing (DEFDIGEST SKEIN512 ...) ; processing (DEFDIGEST SKEIN512/128 ...) ; processing (DEFDIGEST SKEIN512/160 ...) ; processing (DEFDIGEST SKEIN512/224 ...) ; processing (DEFDIGEST SKEIN512/256 ...) ; processing (DEFDIGEST SKEIN512/384 ...) ; processing (DEFSTRUCT (SKEIN1024 # ...) ...) ; processing (DEFSTRUCT (SKEIN1024/384 # ...)) ; processing (DEFSTRUCT (SKEIN1024/512 # ...)) ; processing (DEFMETHOD SKEIN-VALUE ...) ; processing (DEFMETHOD SKEIN-TWEAK ...) ; processing (DEFMETHOD SKEIN-CFG ...) ; processing (DEFMETHOD SKEIN-BUFFER ...) ; processing (DEFMETHOD SKEIN-BUFFER-LENGTH ...) ; processing (DEFMETHOD (SETF SKEIN-BUFFER-LENGTH) ...) ; processing (DEFMETHOD SKEIN-CIPHER ...) ; processing (DEFMETHOD (SETF SKEIN-CIPHER) ...) ; processing (DEFUN %REINITIALIZE-SKEIN1024 ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFINE-DIGEST-UPDATER SKEIN1024 ...) ; processing (DEFINE-DIGEST-FINALIZER (# # ...) ...) ; processing (DEFDIGEST SKEIN1024 ...) ; processing (DEFDIGEST SKEIN1024/384 ...) ; processing (DEFDIGEST SKEIN1024/512 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/digests/skein-tmpT2A3PQL9.fasl ; compilation finished in 0:00:00.679 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/sm3.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (IN-IRONCLAD-READTABLE) ; processing (DEFCONST +SM3-INITIAL-STATE+ ...) ; processing (DEFMACRO SM3-P0 ...) ; processing (DEFMACRO SM3-P1 ...) ; processing (DEFMACRO SM3-EE ...) ; processing (DEFMACRO SM3-FF ...) ; processing (DEFMACRO SM3-GG ...) ; processing (DEFMACRO SM3-R1 ...) ; processing (DEFMACRO SM3-R2 ...) ; processing (DEFUN SM3-HASH ...) ; processing (DEFSTRUCT (SM3 # ...) ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFINE-DIGEST-UPDATER SM3 ...) ; processing (DEFINE-DIGEST-FINALIZER (SM3 32) ...) ; processing (DEFDIGEST SM3 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/digests/sm3-tmpOVHYA3BO.fasl ; compilation finished in 0:00:15.011 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/streebog.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (IN-IRONCLAD-READTABLE) ; processing (DEFCONST +STREEBOG-BUFFER0+ ...) ; processing (DEFCONST +STREEBOG-BUFFER512+ ...) ; processing (DEFCONST +STREEBOG-C+ ...) ; processing (DEFCONST +STREEBOG-AX+ ...) ; processing (DECLAIM (INLINE STREEBOG-AX) ...) ; processing (DEFUN STREEBOG-AX ...) ; processing (DEFMACRO STREEBOG-X ...) ; processing (DEFMACRO STREEBOG-XLPS ...) ; processing (DEFMACRO STREEBOG-ROUND ...) ; processing (DEFUN STREEBOG-ADD512 ...) ; processing (DEFUN STREEBOG-G ...) ; processing (DEFSTRUCT (STREEBOG # ...) ...) ; processing (DEFSTRUCT (STREEBOG/256 # ...)) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFUN STREEBOG-STAGE2 ...) ; processing (DEFUN STREEBOG-PAD ...) ; processing (DEFUN STREEBOG-STAGE3 ...) ; processing (DEFINE-DIGEST-UPDATER STREEBOG ...) ; processing (DEFINE-DIGEST-FINALIZER (# #) ...) ; processing (DEFDIGEST STREEBOG ...) ; processing (DEFDIGEST STREEBOG/256 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/digests/streebog-tmpLT3TYWCE.fasl ; compilation finished in 0:00:16.223 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/tiger.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCONSTANT +TIGER-WORDSIZE+ ...) ; processing (DEFCONSTANT +TIGER-BLOCK-N-WORDS+ ...) ; processing (DEFCONSTANT +TIGER-BLOCK-COPY-FN+ ...) ; processing (DEFTYPE TIGER-STATE-BLOCK ...) ; processing (DEFTYPE TIGER-SBOX ...) ; processing (DEFINE-DIGEST-REGISTERS (TIGER :ENDIAN ...) ...) ; processing (DEFCONST +PRISTINE-TIGER-REGISTERS+ ...) ; processing (DECLAIM (TYPE TIGER-SBOX ...)) ; processing (DEFUN MAKE-TIGER-SBOX ...) ; processing (DEFCONST TIGER-T1 ...) ; processing (DEFCONST TIGER-T2 ...) ; processing (DEFCONST TIGER-T3 ...) ; processing (DEFCONST TIGER-T4 ...) ; processing (DEFUN UPDATE-TIGER-BLOCK ...) ; processing (DEFSTRUCT (TIGER # ...) ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFINE-DIGEST-UPDATER TIGER ...) ; processing (DEFINE-DIGEST-FINALIZER (TIGER 24) ...) ; processing (DEFDIGEST TIGER ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/digests/tiger-tmp3YF2HENI.fasl ; compilation finished in 0:00:04.179 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/tree-hash.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFPARAMETER *LEAF-BYTE* ...) ; processing (DEFPARAMETER *INTERNAL-BYTE* ...) ; processing (DEFUN MAKE-TREE-HASH-LEAF-DIGEST ...) ; processing (DEFSTRUCT (TREE-HASH # ...) ...) ; processing (DEFUN %MAKE-TREE-HASH-DIGEST ...) ; processing (DEFUN MAKE-TIGER-TREE-HASH ...) ; processing (DEFMETHOD BLOCK-LENGTH ...) ; processing (DEFMETHOD DIGEST-LENGTH ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFINE-DIGEST-UPDATER TREE-HASH ...) ; processing (DEFUN UPDATE-TREE-HASH-BRANCH ...) ; processing (DEFUN MERGE-TREE-HASH-BRANCH ...) ; processing (DEFUN COMBINE-HASH-TREE-DIGESTS ...) ; processing (DEFMETHOD PRODUCE-DIGEST ...) ; processing (SETF (GET # ...) ...) ; processing (SETF (GET # ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/digests/tree-hash-tmp9EEV8FN4.fasl ; compilation finished in 0:00:01.091 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/whirlpool.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFTYPE WHIRLPOOL-REGS ...) ; processing (DEFUN INITIAL-WHIRLPOOL-REGS ...) ; processing (DEFCONSTANT +WHIRLPOOL-REGS-HASH-OFFSET+ ...) ; processing (DEFCONSTANT +WHIRLPOOL-REGS-K-OFFSET+ ...) ; processing (DEFCONSTANT +WHIRLPOOL-REGS-STATE-OFFSET+ ...) ; processing (DEFCONSTANT +WHIRLPOOL-REGS-L-OFFSET+ ...) ; processing (DEFCONST +PRISTINE-WHIRLPOOL-REGISTERS+ ...) ; processing (DEFUN WHIRLPOOLREGS-DIGEST ...) ; processing (DEFCONSTANT +WHIRLPOOL-ROUNDS+ ...) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFCONST +RC+ ...) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFCONST +C-EVEN+ ...) ; processing (DEFCONST +C-ODD+ ...) ; processing (DEFUN EXTRACT-BYTE ...) ; processing (DEFUN SPLIT ...) ; processing (DEFUN GENERATE-XOR ...) ; processing (DEFUN ONE-SLICE ...) ; processing (DEFMACRO LOOKUP-IN-C ...) ; processing (DEFUN UPDATE-WHIRLPOOL-BLOCK ...) ; processing (DEFSTRUCT (WHIRLPOOL # ...) ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFINE-DIGEST-UPDATER WHIRLPOOL ...) ; processing (DEFINE-DIGEST-FINALIZER (WHIRLPOOL 64) ...) ; processing (DEFDIGEST WHIRLPOOL ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/digests/whirlpool-tmpDK25NJJO.fasl ; compilation finished in 0:00:07.551 ; compiling file "/usr/share/common-lisp/source/ironclad/src/macs/mac.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS MAC ...) ; processing (DEFUN MACP ...) ; processing (DEFUN LIST-ALL-MACS ...) ; processing (DEFUN MAC-SUPPORTED-P ...) ; processing (DEFMACRO DEFMAC ...) ; processing (DEFUN MAKE-MAC ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/macs/mac-tmpNMZ5RT9R.fasl ; compilation finished in 0:00:00.259 ; compiling file "/usr/share/common-lisp/source/ironclad/src/macs/blake2-mac.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS BLAKE2-MAC ...) ; processing (DEFUN MAKE-BLAKE2-MAC ...) ; processing (DEFMETHOD COPY-BLAKE2-MAC ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFUN UPDATE-BLAKE2-MAC ...) ; processing (DEFUN BLAKE2-MAC-DIGEST ...) ; processing (DEFMAC BLAKE2-MAC ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/macs/blake2-mac-tmp8K51P1O1.fasl ; compilation finished in 0:00:00.695 ; compiling file "/usr/share/common-lisp/source/ironclad/src/macs/blake2s-mac.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS BLAKE2S-MAC ...) ; processing (DEFUN MAKE-BLAKE2S-MAC ...) ; processing (DEFMETHOD COPY-BLAKE2S-MAC ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFUN UPDATE-BLAKE2S-MAC ...) ; processing (DEFUN BLAKE2S-MAC-DIGEST ...) ; processing (DEFMAC BLAKE2S-MAC ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/macs/blake2s-mac-tmpXAVJ8WEV.fasl ; compilation finished in 0:00:00.719 ; compiling file "/usr/share/common-lisp/source/ironclad/src/macs/cmac.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS CMAC ...) ; processing (DEFUN MAKE-CMAC ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFUN UPDATE-CMAC ...) ; processing (DEFUN CMAC-DIGEST ...) ; processing (DEFMAC CMAC ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/macs/cmac-tmpOZHFIU2N.fasl ; compilation finished in 0:00:00.611 ; compiling file "/usr/share/common-lisp/source/ironclad/src/macs/hmac.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS HMAC ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN MAKE-HMAC ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFUN UPDATE-HMAC ...) ; processing (DEFUN HMAC-DIGEST ...) ; processing (DEFMAC HMAC ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/macs/hmac-tmpJD9SCIW3.fasl ; compilation finished in 0:00:00.471 ; compiling file "/usr/share/common-lisp/source/ironclad/src/macs/gmac.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS GMAC ...) ; processing (DEFUN MAKE-GMAC ...) ; processing (DECLAIM (INLINE GMAC-SWAP-16)) ; processing (DEFUN GMAC-SWAP-16 ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFUN GMAC-MUL ...) ; processing (DEFUN UPDATE-GMAC ...) ; processing (DEFUN GMAC-DIGEST ...) ; processing (DEFMAC GMAC ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/macs/gmac-tmpICVK4HSI.fasl ; compilation finished in 0:00:19.595 ; compiling file "/usr/share/common-lisp/source/ironclad/src/macs/poly1305.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS POLY1305 ...) ; processing (DEFUN MAKE-POLY1305 ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFUN POLY1305-PROCESS-FULL-BLOCKS ...) ; processing (DEFUN UPDATE-POLY1305 ...) ; processing (DEFUN POLY1305-DIGEST ...) ; processing (DEFMAC POLY1305 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/macs/poly1305-tmpA5CK3QHN.fasl ; compilation finished in 0:00:01.211 ; compiling file "/usr/share/common-lisp/source/ironclad/src/macs/siphash.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS SIPHASH ...) ; processing (DEFUN MAKE-SIPHASH ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFMACRO SIPHASH-ROUND ...) ; processing (DEFUN SIPHASH-COMPRESS ...) ; processing (DEFUN SIPHASH-FINALIZE ...) ; processing (DEFUN UPDATE-SIPHASH ...) ; processing (DEFUN SIPHASH-DIGEST ...) ; processing (DEFMAC SIPHASH ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/macs/siphash-tmp5KE6HXAY.fasl ; compilation finished in 0:00:01.623 ; compiling file "/usr/share/common-lisp/source/ironclad/src/macs/skein-mac.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS SKEIN-MAC ...) ; processing (DEFUN MAKE-SKEIN-MAC ...) ; processing (DEFMETHOD COPY-SKEIN-MAC ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFUN UPDATE-SKEIN-MAC ...) ; processing (DEFUN SKEIN-MAC-DIGEST ...) ; processing (DEFMAC SKEIN-MAC ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/macs/skein-mac-tmp5UBS1APN.fasl ; compilation finished in 0:00:01.039 ; compiling file "/usr/share/common-lisp/source/ironclad/src/prng/prng.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFVAR *PRNG* ...) ; processing (DEFUN LIST-ALL-PRNGS ...) ; processing (DEFMETHOD MAKE-PRNG ...) ; processing (DEFUN RANDOM-DATA ...) ; processing (DEFUN READ-OS-RANDOM-SEED ...) ; processing (DEFUN RANDOM-BITS ...) ; processing (DEFUN STRONG-RANDOM ...) ; processing (DEFUN OS-RANDOM-SEED ...) ; processing (DEFUN READ-SEED ...) ; processing (DEFUN WRITE-SEED ...) ; processing (DEFUN FEED-FIFO ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/prng/prng-tmpSI9E4AQB.fasl ; compilation finished in 0:00:00.647 ; compiling file "/usr/share/common-lisp/source/ironclad/src/prng/os-prng.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFPARAMETER *OS-PRNG-STREAM* ...) ; processing (DEFPARAMETER *OS-PRNG-STREAM-LOCK* ...) ; processing (DEFCLASS OS-PRNG ...) ; processing (DEFMETHOD PRNG-RANDOM-DATA ...) ; processing (DEFMETHOD MAKE-PRNG ...) ; processing (SETF *PRNG* ...) ; processing (PUSHNEW (QUOTE #) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/prng/os-prng-tmpID7X8UGC.fasl ; compilation finished in 0:00:00.139 ; compiling file "/usr/share/common-lisp/source/ironclad/src/prng/generator.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFVAR +FORTUNA-CIPHER-BLOCK-SIZE+ ...) ; processing (DEFCLASS FORTUNA-GENERATOR ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD PRNG-RESEED ...) ; processing (DEFUN %GENERATE-BLOCKS ...) ; processing (DEFMETHOD PRNG-RANDOM-DATA ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/prng/generator-tmpFYN8G5D1.fasl ; compilation finished in 0:00:00.327 ; compiling file "/usr/share/common-lisp/source/ironclad/src/prng/fortuna.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFPARAMETER +MIN-POOL-SIZE+ ...) ; processing (DEFPARAMETER +FORTUNA-SEED-LENGTH+ ...) ; processing (DEFCLASS FORTUNA-POOL ...) ; processing (DEFCLASS FORTUNA-PRNG ...) ; processing (DEFMETHOD PRNG-RANDOM-DATA ...) ; processing (DEFUN ADD-RANDOM-EVENT ...) ; processing (DEFMETHOD PRNG-SEED-LENGTH ...) ; processing (DEFMETHOD PRNG-RESEED ...) ; processing (DEFUN MAKE-FORTUNA ...) ; processing (DEFMETHOD MAKE-PRNG ...) ; processing (DEFMETHOD MAKE-PRNG ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/prng/fortuna-tmpG1VNK6NW.fasl ; compilation finished in 0:00:00.347 ; compiling file "/usr/share/common-lisp/source/ironclad/src/math.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFUN EGCD ...) ; processing (DEFUN JACOBI ...) ; processing (DEFUN POWER-MOD-TAB ...) ; processing (DEFUN POWER-MOD ...) ; processing (DEFUN MILLER-RABIN-DECOMPOSITION ...) ; processing (DEFUN MILLER-RABIN-KERNEL ...) ; processing (DEFUN LUCAS-SEQUENCE ...) ; processing (DEFUN PRIMEP-LUCAS ...) ; processing (DEFUN MODULAR-INVERSE ...) ; processing (DEFUN MODULAR-INVERSE-WITH-BLINDING ...) ; processing (DEFUN EXPT-MOD ...) ; processing (DEFUN EXPT-MOD/UNSAFE ...) ; processing (DEFCONST +SMALL-PRIMES+ ...) ; processing (DEFCONSTANT +LAST-SMALL-PRIME+ ...) ; processing (DEFUN GENERATE-SMALL-PRIMES ...) ; processing (DEFPARAMETER *NUMBER-OF-MILLER-RABIN-TESTS* ...) ; processing (DEFUN PRIME-P ...) ; processing (DEFUN GENERATE-PRIME-IN-RANGE ...) ; processing (DEFUN GENERATE-PRIME ...) ; processing (DEFUN GENERATE-SAFE-PRIME ...) ; processing (DEFUN FIND-GENERATOR ...) ; processing (DEFUN FIND-SUBGROUP-GENERATOR ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/math-tmpV4YWE7CS.fasl ; compilation finished in 0:00:01.487 ; compiling file "/usr/share/common-lisp/source/ironclad/src/octet-stream.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFVAR *BINARY-INPUT-STREAM-CLASS* ...) ; processing (DEFVAR *BINARY-OUTPUT-STREAM-CLASS* ...) ; processing (DEFVAR *STREAM-ELEMENT-TYPE-FUNCTION* ...) ; processing (DEFVAR *STREAM-READ-BYTE-FUNCTION* ...) ; processing (DEFVAR *STREAM-WRITE-BYTE-FUNCTION* ...) ; processing (DEFVAR *STREAM-READ-SEQUENCE-FUNCTION* ...) ; processing (DEFVAR *STREAM-WRITE-SEQUENCE-FUNCTION* ...) ; processing (DEFVAR *STREAM-FINISH-OUTPUT-FUNCTION* ...) ; processing (DEFVAR *STREAM-FORCE-OUTPUT-FUNCTION* ...) ; processing (DEFVAR *STREAM-CLEAR-OUTPUT-FUNCTION* ...) ; processing (DEFCLASS OCTET-STREAM ...) ; processing (DEFMETHOD STREAM-ELEMENT-TYPE ...) ; processing (DEFMACRO DEFINE-STREAM-READ-SEQUENCE ...) ; processing (DEFMACRO DEFINE-STREAM-WRITE-SEQUENCE ...) ; processing (DEFCLASS OCTET-INPUT-STREAM ...) ; processing (DEFMETHOD SB-GRAY:STREAM-READ-BYTE ...) ; processing (DEFINE-STREAM-READ-SEQUENCE OCTET-INPUT-STREAM ...) ; processing (DEFUN MAKE-OCTET-INPUT-STREAM ...) ; processing (DEFMACRO WITH-OCTET-INPUT-STREAM ...) ; processing (DEFCLASS OCTET-OUTPUT-STREAM ...) ; processing (DEFMETHOD SB-GRAY:STREAM-WRITE-BYTE ...) ; processing (DEFINE-STREAM-WRITE-SEQUENCE OCTET-OUTPUT-STREAM ...) ; processing (DEFMETHOD SB-GRAY:STREAM-CLEAR-OUTPUT ...) ; processing (DEFUN GET-OUTPUT-STREAM-OCTETS ...) ; processing (DEFUN MAKE-OCTET-OUTPUT-STREAM ...) ; processing (DEFMACRO WITH-OCTET-OUTPUT-STREAM ...) ; processing (DEFCLASS DIGESTING-STREAM ...) ; processing (DEFMETHOD STREAM-ELEMENT-TYPE ...) ; processing (DEFUN MAKE-DIGESTING-STREAM ...) ; processing (DEFMETHOD SB-GRAY:STREAM-WRITE-BYTE ...) ; processing (DEFINE-STREAM-WRITE-SEQUENCE DIGESTING-STREAM ...) ; processing (DEFMETHOD SB-GRAY:STREAM-CLEAR-OUTPUT ...) ; processing (DEFMETHOD PRODUCE-DIGEST ...) ; processing (DEFUN EXECUTE-WITH-DIGESTING-STREAM ...) ; processing (DEFMACRO WITH-DIGESTING-STREAM ...) ; processing (DEFCLASS CRYPTING-STREAM ...) ; processing (DEFMETHOD STREAM-ELEMENT-TYPE ...) ; processing (DEFCLASS ENCRYPTING-INPUT-STREAM ...) ; processing (DEFCLASS ENCRYPTING-OUTPUT-STREAM ...) ; processing (DEFCLASS DECRYPTING-INPUT-STREAM ...) ; processing (DEFCLASS DECRYPTING-OUTPUT-STREAM ...) ; processing (DEFTYPE STREAM-DIRECTION ...) ; processing (DEFUN MAKE-ENCRYPTING-STREAM ...) ; processing (DEFUN MAKE-DECRYPTING-STREAM ...) ; processing (DEFMETHOD SB-GRAY:STREAM-READ-BYTE ...) ; processing (DEFMETHOD SB-GRAY:STREAM-READ-BYTE ...) ; processing (DEFMETHOD SB-GRAY:STREAM-WRITE-BYTE ...) ; processing (DEFMETHOD SB-GRAY:STREAM-WRITE-BYTE ...) ; processing (DEFINE-STREAM-READ-SEQUENCE ENCRYPTING-INPUT-STREAM ...) ; processing (DEFINE-STREAM-READ-SEQUENCE DECRYPTING-INPUT-STREAM ...) ; processing (DEFINE-STREAM-WRITE-SEQUENCE ENCRYPTING-OUTPUT-STREAM ...) ; processing (DEFINE-STREAM-WRITE-SEQUENCE DECRYPTING-OUTPUT-STREAM ...) ; processing (DEFMACRO WITH-ENCRYPTING-STREAM ...) ; processing (DEFMACRO WITH-DECRYPTING-STREAM ...) ; processing (DEFCLASS AUTHENTICATING-STREAM ...) ; processing (DEFMETHOD STREAM-ELEMENT-TYPE ...) ; processing (DEFUN MAKE-AUTHENTICATING-STREAM ...) ; processing (DEFMETHOD SB-GRAY:STREAM-WRITE-BYTE ...) ; processing (DEFINE-STREAM-WRITE-SEQUENCE AUTHENTICATING-STREAM ...) ; processing (DEFMETHOD PRODUCE-MAC ...) ; processing (DEFMACRO WITH-AUTHENTICATING-STREAM ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/octet-stream-tmpC487WU3K.fasl ; compilation finished in 0:00:02.579 ; compiling file "/usr/share/common-lisp/source/ironclad/src/aead/aead.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS AEAD-MODE ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFUN AEADP ...) ; processing (DEFUN LIST-ALL-AUTHENTICATED-ENCRYPTION-MODES ...) ; processing (DEFUN AUTHENTICATED-ENCRYPTION-MODE-SUPPORTED-P ...) ; processing (DEFMACRO DEFAEAD ...) ; processing (DEFUN MAKE-AUTHENTICATED-ENCRYPTION-MODE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/aead/aead-tmpKMQH3GP.fasl ; compilation finished in 0:00:00.119 ; compiling file "/usr/share/common-lisp/source/ironclad/src/aead/eax.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS EAX ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFMETHOD PROCESS-ASSOCIATED-DATA ...) ; processing (DEFMETHOD PRODUCE-TAG ...) ; processing (DEFMETHOD ENCRYPT ...) ; processing (DEFMETHOD DECRYPT ...) ; processing (DEFMETHOD ENCRYPT-MESSAGE ...) ; processing (DEFMETHOD DECRYPT-MESSAGE ...) ; processing (DEFAEAD EAX) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/aead/eax-tmp8N0WO2QA.fasl ; compilation finished in 0:00:00.467 ; compiling file "/usr/share/common-lisp/source/ironclad/src/aead/etm.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS ETM ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFMETHOD PROCESS-ASSOCIATED-DATA ...) ; processing (DEFMETHOD PRODUCE-TAG ...) ; processing (DEFMETHOD ENCRYPT ...) ; processing (DEFMETHOD DECRYPT ...) ; processing (DEFMETHOD ENCRYPT-MESSAGE ...) ; processing (DEFMETHOD DECRYPT-MESSAGE ...) ; processing (DEFAEAD ETM) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/aead/etm-tmpZ9QI367A.fasl ; compilation finished in 0:00:00.611 ; compiling file "/usr/share/common-lisp/source/ironclad/src/aead/gcm.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS GCM ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFMETHOD PROCESS-ASSOCIATED-DATA ...) ; processing (DEFMETHOD PRODUCE-TAG ...) ; processing (DEFMETHOD ENCRYPT ...) ; processing (DEFMETHOD DECRYPT ...) ; processing (DEFMETHOD ENCRYPT-MESSAGE ...) ; processing (DEFMETHOD DECRYPT-MESSAGE ...) ; processing (DEFAEAD GCM) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/aead/gcm-tmpRD10QMAI.fasl ; compilation finished in 0:00:00.851 ; compiling file "/usr/share/common-lisp/source/ironclad/src/kdf/kdf.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFUN LIST-ALL-KDFS ...) ; processing (DEFUN MAKE-KDF ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/kdf/kdf-tmp2L2R3A8M.fasl ; compilation finished in 0:00:00.271 ; compiling file "/usr/share/common-lisp/source/ironclad/src/kdf/argon2.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS ARGON2 ...) ; processing (DEFCLASS ARGON2I ...) ; processing (DEFCLASS ARGON2D ...) ; processing (DEFCONSTANT +ARGON2-BLOCK-SIZE+ ...) ; processing (DEFTYPE ARGON2-BLOCK ...) ; processing (DEFUN ARGON2-LOAD-BLOCK ...) ; processing (DEFUN ARGON2-STORE-BLOCK ...) ; processing (DEFUN ARGON2-COPY-BLOCK ...) ; processing (DEFUN ARGON2-XOR-BLOCK ...) ; processing (DEFUN ARGON2-UPDATE-DIGESTER-32 ...) ; processing (DEFUN ARGON2-EXTENDED-HASH ...) ; processing (DEFMACRO ARGON2-G ...) ; processing (DEFMACRO ARGON2-ROUND ...) ; processing (DEFUN ARGON2-G-ROUNDS ...) ; processing (DEFUN ARGON2-G-COPY ...) ; processing (DEFUN ARGON2-G-XOR ...) ; processing (DEFUN ARGON2-UNARY-G ...) ; processing (DEFUN ARGON2I-GIDX-REFRESH ...) ; processing (DEFUN ARGON2I-GIDX-INIT ...) ; processing (DEFUN ARGON2I-GIDX-NEXT ...) ; processing (DEFUN ARGON2D-GIDX-INIT ...) ; processing (DEFUN ARGON2D-GIDX-NEXT ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFMETHOD DERIVE-KEY ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/kdf/argon2-tmp1CJ2OZ96.fasl ; compilation finished in 0:00:08.267 ; compiling file "/usr/share/common-lisp/source/ironclad/src/kdf/bcrypt.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS BCRYPT ...) ; processing (DEFCONST +BCRYPT-INITIAL-HASH+ ...) ; processing (DEFUN BCRYPT-EXPAND-KEY ...) ; processing (DEFUN BCRYPT-EKSBLOWFISH ...) ; processing (DEFMETHOD DERIVE-KEY ...) ; processing (DEFCLASS BCRYPT-PBKDF ...) ; processing (DEFCONST +BCRYPT-PBKDF-INITIAL-HASH+ ...) ; processing (DEFUN BCRYPT-HASH ...) ; processing (DEFMETHOD DERIVE-KEY ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/kdf/bcrypt-tmpDKS9KGUG.fasl ; compilation finished in 0:00:00.571 ; compiling file "/usr/share/common-lisp/source/ironclad/src/kdf/hmac.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS HMAC-KDF ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFUN HKDF-EXTRACT ...) ; processing (DEFUN HKDF-EXPAND ...) ; processing (DEFUN HMAC-DERIVE-KEY ...) ; processing (DEFMETHOD DERIVE-KEY ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/kdf/hmac-tmp3E37X9HX.fasl ; compilation finished in 0:00:00.119 ; compiling file "/usr/share/common-lisp/source/ironclad/src/kdf/pkcs5.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS PBKDF1 ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFMETHOD DERIVE-KEY ...) ; processing (DEFCLASS PBKDF2 ...) ; processing (DEFUN PBKDF2-DERIVE-KEY ...) ; processing (DEFMETHOD DERIVE-KEY ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/kdf/pkcs5-tmpXPWOLC8S.fasl ; compilation finished in 0:00:00.287 ; compiling file "/usr/share/common-lisp/source/ironclad/src/kdf/password-hash.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFUN MAKE-RANDOM-SALT ...) ; processing (DEFUN PBKDF2-HASH-PASSWORD ...) ; processing (DEFUN PBKDF2-HASH-PASSWORD-TO-COMBINED-STRING ...) ; processing (DEFUN PBKDF2-CHECK-PASSWORD ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/kdf/password-hash-tmpUSWNVC8E.fasl ; compilation finished in 0:00:00.267 ; compiling file "/usr/share/common-lisp/source/ironclad/src/kdf/scrypt.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS SCRYPT-KDF ...) ; processing (DEFUN SCRYPT-VECTOR-SALSA ...) ; processing (DEFUN BLOCK-MIX ...) ; processing (DEFUN SMIX ...) ; processing (DEFMETHOD DERIVE-KEY ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/kdf/scrypt-tmp68FKQK8H.fasl ; compilation finished in 0:00:00.595 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/public-key.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFUN LIST-ALL-KEY-PAIR-KINDS ...) ; processing (DEFCLASS DISCRETE-LOGARITHM-GROUP ...) ; processing (DEFPARAMETER *SIGNATURE-NONCE-FOR-TEST* ...) ; processing (DEFUN OCTETS-TO-INTEGER ...) ; processing (DEFUN INTEGER-TO-OCTETS ...) ; processing (DEFUN MAYBE-INTEGERIZE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/public-key/public-key-tmpMU3D23G2.fasl ; compilation finished in 0:00:00.187 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/pkcs1.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFUN MGF ...) ; processing (DECLAIM (NOTINLINE OAEP-ENCODE)) ; processing (DEFUN OAEP-ENCODE ...) ; processing (DEFUN OAEP-DECODE ...) ; processing (DECLAIM (NOTINLINE PSS-ENCODE)) ; processing (DEFUN PSS-ENCODE ...) ; processing (DEFUN PSS-VERIFY ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/public-key/pkcs1-tmpP7RRFRW4.fasl ; compilation finished in 0:00:00.423 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/dsa.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS DSA-KEY ...) ; processing (DEFCLASS DSA-PUBLIC-KEY ...) ; processing (DEFCLASS DSA-PRIVATE-KEY ...) ; processing (DEFUN DSA-KEY-P ...) ; processing (DEFUN DSA-KEY-Q ...) ; processing (DEFUN DSA-KEY-G ...) ; processing (DEFMETHOD MAKE-PUBLIC-KEY ...) ; processing (DEFMETHOD DESTRUCTURE-PUBLIC-KEY ...) ; processing (DEFMETHOD MAKE-PRIVATE-KEY ...) ; processing (DEFMETHOD DESTRUCTURE-PRIVATE-KEY ...) ; processing (DEFMETHOD GENERATE-KEY-PAIR ...) ; processing (DEFMETHOD GENERATE-SIGNATURE-NONCE ...) ; processing (DEFMETHOD MAKE-SIGNATURE ...) ; processing (DEFMETHOD DESTRUCTURE-SIGNATURE ...) ; processing (DEFMETHOD SIGN-MESSAGE ...) ; processing (DEFMETHOD VERIFY-SIGNATURE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/public-key/dsa-tmp11AFZINB.fasl ; compilation finished in 0:00:00.443 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/rsa.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS RSA-KEY ...) ; processing (DEFCLASS RSA-PUBLIC-KEY ...) ; processing (DEFCLASS RSA-PRIVATE-KEY ...) ; processing (DEFMETHOD MAKE-PUBLIC-KEY ...) ; processing (DEFMETHOD DESTRUCTURE-PUBLIC-KEY ...) ; processing (DEFMETHOD MAKE-PRIVATE-KEY ...) ; processing (DEFMETHOD DESTRUCTURE-PRIVATE-KEY ...) ; processing (DEFMETHOD GENERATE-KEY-PAIR ...) ; processing (DEFUN RSA-CORE ...) ; processing (DEFMETHOD MAKE-MESSAGE ...) ; processing (DEFMETHOD DESTRUCTURE-MESSAGE ...) ; processing (DEFMETHOD ENCRYPT-MESSAGE ...) ; processing (DEFMETHOD DECRYPT-MESSAGE ...) ; processing (DEFMETHOD MAKE-SIGNATURE ...) ; processing (DEFMETHOD DESTRUCTURE-SIGNATURE ...) ; processing (DEFMETHOD SIGN-MESSAGE ...) ; processing (DEFMETHOD VERIFY-SIGNATURE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/public-key/rsa-tmpN84Z1F4D.fasl ; compilation finished in 0:00:00.347 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/elgamal.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS ELGAMAL-KEY ...) ; processing (DEFCLASS ELGAMAL-PUBLIC-KEY ...) ; processing (DEFCLASS ELGAMAL-PRIVATE-KEY ...) ; processing (DEFUN ELGAMAL-KEY-P ...) ; processing (DEFUN ELGAMAL-KEY-G ...) ; processing (DEFMETHOD MAKE-PUBLIC-KEY ...) ; processing (DEFMETHOD DESTRUCTURE-PUBLIC-KEY ...) ; processing (DEFMETHOD MAKE-PRIVATE-KEY ...) ; processing (DEFMETHOD DESTRUCTURE-PRIVATE-KEY ...) ; processing (DEFMETHOD GENERATE-KEY-PAIR ...) ; processing (DEFMETHOD GENERATE-SIGNATURE-NONCE ...) ; processing (DEFMETHOD GENERATE-SIGNATURE-NONCE ...) ; processing (DEFMETHOD MAKE-MESSAGE ...) ; processing (DEFMETHOD DESTRUCTURE-MESSAGE ...) ; processing (DEFMETHOD ENCRYPT-MESSAGE ...) ; processing (DEFMETHOD DECRYPT-MESSAGE ...) ; processing (DEFMETHOD MAKE-SIGNATURE ...) ; processing (DEFMETHOD DESTRUCTURE-SIGNATURE ...) ; processing (DEFMETHOD SIGN-MESSAGE ...) ; processing (DEFMETHOD VERIFY-SIGNATURE ...) ; processing (DEFMETHOD DIFFIE-HELLMAN ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/public-key/elgamal-tmpHX0IAQ8A.fasl ; compilation finished in 0:00:00.523 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/elliptic-curve.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFGENERIC EC-POINT-ON-CURVE-P ...) ; processing (DEFGENERIC EC-POINT-EQUAL ...) ; processing (DEFGENERIC EC-DOUBLE ...) ; processing (DEFGENERIC EC-ADD ...) ; processing (DEFGENERIC EC-SCALAR-MULT ...) ; processing (DEFGENERIC EC-SCALAR-INV ...) ; processing (DEFGENERIC EC-ENCODE-SCALAR ...) ; processing (DEFGENERIC EC-DECODE-SCALAR ...) ; processing (DEFGENERIC EC-ENCODE-POINT ...) ; processing (DEFGENERIC EC-DECODE-POINT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/public-key/elliptic-curve-tmp8MQVZGT.fasl ; compilation finished in 0:00:00.011 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/curve25519.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS CURVE25519-PUBLIC-KEY ...) ; processing (DEFCLASS CURVE25519-PRIVATE-KEY ...) ; processing (DEFCLASS CURVE25519-POINT ...) ; processing (DEFMETHOD MAKE-LOAD-FORM ...) ; processing (DEFCONSTANT +CURVE25519-BITS+ ...) ; processing (DEFCONSTANT +CURVE25519-P+ ...) ; processing (DEFCONSTANT +CURVE25519-A24+ ...) ; processing (DEFCONST +CURVE25519-G+ ...) ; processing (DEFMETHOD EC-SCALAR-INV ...) ; processing (DEFUN CURVE25519-DOUBLE-AND-ADD ...) ; processing (DEFMETHOD EC-SCALAR-MULT ...) ; processing (DEFMETHOD EC-ENCODE-SCALAR ...) ; processing (DEFMETHOD EC-DECODE-SCALAR ...) ; processing (DEFMETHOD EC-ENCODE-POINT ...) ; processing (DEFMETHOD EC-DECODE-POINT ...) ; processing (DEFUN CURVE25519-PUBLIC-KEY ...) ; processing (DEFMETHOD MAKE-PUBLIC-KEY ...) ; processing (DEFMETHOD DESTRUCTURE-PUBLIC-KEY ...) ; processing (DEFMETHOD MAKE-PRIVATE-KEY ...) ; processing (DEFMETHOD DESTRUCTURE-PRIVATE-KEY ...) ; processing (DEFMETHOD GENERATE-KEY-PAIR ...) ; processing (DEFMETHOD DIFFIE-HELLMAN ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/public-key/curve25519-tmp88LUAVGW.fasl ; compilation finished in 0:00:00.451 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/curve448.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS CURVE448-PUBLIC-KEY ...) ; processing (DEFCLASS CURVE448-PRIVATE-KEY ...) ; processing (DEFCLASS CURVE448-POINT ...) ; processing (DEFMETHOD MAKE-LOAD-FORM ...) ; processing (DEFCONSTANT +CURVE448-BITS+ ...) ; processing (DEFCONSTANT +CURVE448-P+ ...) ; processing (DEFCONSTANT +CURVE448-A24+ ...) ; processing (DEFCONST +CURVE448-G+ ...) ; processing (DEFMETHOD EC-SCALAR-INV ...) ; processing (DEFUN CURVE448-DOUBLE-AND-ADD ...) ; processing (DEFMETHOD EC-SCALAR-MULT ...) ; processing (DEFMETHOD EC-ENCODE-SCALAR ...) ; processing (DEFMETHOD EC-DECODE-SCALAR ...) ; processing (DEFMETHOD EC-ENCODE-POINT ...) ; processing (DEFMETHOD EC-DECODE-POINT ...) ; processing (DEFUN CURVE448-PUBLIC-KEY ...) ; processing (DEFMETHOD MAKE-PUBLIC-KEY ...) ; processing (DEFMETHOD DESTRUCTURE-PUBLIC-KEY ...) ; processing (DEFMETHOD MAKE-PRIVATE-KEY ...) ; processing (DEFMETHOD DESTRUCTURE-PRIVATE-KEY ...) ; processing (DEFMETHOD GENERATE-KEY-PAIR ...) ; processing (DEFMETHOD DIFFIE-HELLMAN ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/public-key/curve448-tmpM5RP096T.fasl ; compilation finished in 0:00:00.779 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/ed25519.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS ED25519-PUBLIC-KEY ...) ; processing (DEFCLASS ED25519-PRIVATE-KEY ...) ; processing (DEFCLASS ED25519-POINT ...) ; processing (DEFMETHOD MAKE-LOAD-FORM ...) ; processing (DEFCONSTANT +ED25519-BITS+ ...) ; processing (DEFCONSTANT +ED25519-Q+ ...) ; processing (DEFCONSTANT +ED25519-L+ ...) ; processing (DEFCONSTANT +ED25519-D+ ...) ; processing (DEFCONSTANT +ED25519-I+ ...) ; processing (DEFCONST +ED25519-B+ ...) ; processing (DEFCONST +ED25519-POINT-AT-INFINITY+ ...) ; processing (DEFMETHOD EC-SCALAR-INV ...) ; processing (DEFUN ED25519-RECOVER-X ...) ; processing (DEFMETHOD EC-ADD ...) ; processing (DEFMETHOD EC-DOUBLE ...) ; processing (DEFMETHOD EC-SCALAR-MULT ...) ; processing (DEFMETHOD EC-POINT-ON-CURVE-P ...) ; processing (DEFMETHOD EC-POINT-EQUAL ...) ; processing (DEFMETHOD EC-ENCODE-SCALAR ...) ; processing (DEFMETHOD EC-DECODE-SCALAR ...) ; processing (DEFMETHOD EC-ENCODE-POINT ...) ; processing (DEFMETHOD EC-DECODE-POINT ...) ; processing (DEFUN ED25519-HASH ...) ; processing (DEFUN ED25519-PUBLIC-KEY ...) ; processing (DEFMETHOD MAKE-SIGNATURE ...) ; processing (DEFMETHOD DESTRUCTURE-SIGNATURE ...) ; processing (DEFUN ED25519-SIGN ...) ; processing (DEFUN ED25519-VERIFY ...) ; processing (DEFMETHOD MAKE-PUBLIC-KEY ...) ; processing (DEFMETHOD DESTRUCTURE-PUBLIC-KEY ...) ; processing (DEFMETHOD MAKE-PRIVATE-KEY ...) ; processing (DEFMETHOD DESTRUCTURE-PRIVATE-KEY ...) ; processing (DEFMETHOD SIGN-MESSAGE ...) ; processing (DEFMETHOD VERIFY-SIGNATURE ...) ; processing (DEFMETHOD GENERATE-KEY-PAIR ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/public-key/ed25519-tmpRHTB3TH1.fasl ; compilation finished in 0:00:01.303 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/ed448.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS ED448-PUBLIC-KEY ...) ; processing (DEFCLASS ED448-PRIVATE-KEY ...) ; processing (DEFCLASS ED448-POINT ...) ; processing (DEFMETHOD MAKE-LOAD-FORM ...) ; processing (DEFCONSTANT +ED448-BITS+ ...) ; processing (DEFCONSTANT +ED448-Q+ ...) ; processing (DEFCONSTANT +ED448-L+ ...) ; processing (DEFCONSTANT +ED448-D+ ...) ; processing (DEFCONST +ED448-B+ ...) ; processing (DEFCONST +ED448-POINT-AT-INFINITY+ ...) ; processing (DEFUN ED448-DOM ...) ; processing (DEFCONST +ED448-DOM+ ...) ; processing (DEFMETHOD EC-SCALAR-INV ...) ; processing (DEFUN ED448-RECOVER-X ...) ; processing (DEFMETHOD EC-ADD ...) ; processing (DEFMETHOD EC-DOUBLE ...) ; processing (DEFMETHOD EC-SCALAR-MULT ...) ; processing (DEFMETHOD EC-POINT-ON-CURVE-P ...) ; processing (DEFMETHOD EC-POINT-EQUAL ...) ; processing (DEFMETHOD EC-ENCODE-SCALAR ...) ; processing (DEFMETHOD EC-DECODE-SCALAR ...) ; processing (DEFMETHOD EC-ENCODE-POINT ...) ; processing (DEFMETHOD EC-DECODE-POINT ...) ; processing (DEFUN ED448-HASH ...) ; processing (DEFUN ED448-PUBLIC-KEY ...) ; processing (DEFMETHOD MAKE-SIGNATURE ...) ; processing (DEFMETHOD DESTRUCTURE-SIGNATURE ...) ; processing (DEFUN ED448-SIGN ...) ; processing (DEFUN ED448-VERIFY ...) ; processing (DEFMETHOD MAKE-PUBLIC-KEY ...) ; processing (DEFMETHOD DESTRUCTURE-PUBLIC-KEY ...) ; processing (DEFMETHOD MAKE-PRIVATE-KEY ...) ; processing (DEFMETHOD DESTRUCTURE-PRIVATE-KEY ...) ; processing (DEFMETHOD SIGN-MESSAGE ...) ; processing (DEFMETHOD VERIFY-SIGNATURE ...) ; processing (DEFMETHOD GENERATE-KEY-PAIR ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/public-key/ed448-tmp4YJPLPB8.fasl ; compilation finished in 0:00:02.207 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/secp256k1.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS SECP256K1-PUBLIC-KEY ...) ; processing (DEFCLASS SECP256K1-PRIVATE-KEY ...) ; processing (DEFCLASS SECP256K1-POINT ...) ; processing (DEFMETHOD MAKE-LOAD-FORM ...) ; processing (DEFCONSTANT +SECP256K1-BITS+ ...) ; processing (DEFCONSTANT +SECP256K1-P+ ...) ; processing (DEFCONSTANT +SECP256K1-B+ ...) ; processing (DEFCONSTANT +SECP256K1-L+ ...) ; processing (DEFCONSTANT +SECP256K1-I+ ...) ; processing (DEFCONST +SECP256K1-G+ ...) ; processing (DEFCONST +SECP256K1-POINT-AT-INFINITY+ ...) ; processing (DEFMETHOD EC-SCALAR-INV ...) ; processing (DEFMETHOD EC-POINT-EQUAL ...) ; processing (DEFMETHOD EC-DOUBLE ...) ; processing (DEFMETHOD EC-ADD ...) ; processing (DEFMETHOD EC-SCALAR-MULT ...) ; processing (DEFMETHOD EC-POINT-ON-CURVE-P ...) ; processing (DEFMETHOD EC-ENCODE-SCALAR ...) ; processing (DEFMETHOD EC-DECODE-SCALAR ...) ; processing (DEFMETHOD EC-ENCODE-POINT ...) ; processing (DEFMETHOD EC-DECODE-POINT ...) ; processing (DEFUN SECP256K1-PUBLIC-KEY ...) ; processing (DEFMETHOD MAKE-SIGNATURE ...) ; processing (DEFMETHOD DESTRUCTURE-SIGNATURE ...) ; processing (DEFMETHOD GENERATE-SIGNATURE-NONCE ...) ; processing (DEFMETHOD SIGN-MESSAGE ...) ; processing (DEFMETHOD VERIFY-SIGNATURE ...) ; processing (DEFMETHOD MAKE-PUBLIC-KEY ...) ; processing (DEFMETHOD DESTRUCTURE-PUBLIC-KEY ...) ; processing (DEFMETHOD MAKE-PRIVATE-KEY ...) ; processing (DEFMETHOD DESTRUCTURE-PRIVATE-KEY ...) ; processing (DEFMETHOD GENERATE-KEY-PAIR ...) ; processing (DEFMETHOD DIFFIE-HELLMAN ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/public-key/secp256k1-tmp6202QBVV.fasl ; compilation finished in 0:00:02.655 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/secp256r1.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS SECP256R1-PUBLIC-KEY ...) ; processing (DEFCLASS SECP256R1-PRIVATE-KEY ...) ; processing (DEFCLASS SECP256R1-POINT ...) ; processing (DEFMETHOD MAKE-LOAD-FORM ...) ; processing (DEFCONSTANT +SECP256R1-BITS+ ...) ; processing (DEFCONSTANT +SECP256R1-P+ ...) ; processing (DEFCONSTANT +SECP256R1-B+ ...) ; processing (DEFCONSTANT +SECP256R1-L+ ...) ; processing (DEFCONSTANT +SECP256R1-I+ ...) ; processing (DEFCONST +SECP256R1-G+ ...) ; processing (DEFCONST +SECP256R1-POINT-AT-INFINITY+ ...) ; processing (DEFMETHOD EC-SCALAR-INV ...) ; processing (DEFMETHOD EC-POINT-EQUAL ...) ; processing (DEFMETHOD EC-DOUBLE ...) ; processing (DEFMETHOD EC-ADD ...) ; processing (DEFMETHOD EC-SCALAR-MULT ...) ; processing (DEFMETHOD EC-POINT-ON-CURVE-P ...) ; processing (DEFMETHOD EC-ENCODE-SCALAR ...) ; processing (DEFMETHOD EC-DECODE-SCALAR ...) ; processing (DEFMETHOD EC-ENCODE-POINT ...) ; processing (DEFMETHOD EC-DECODE-POINT ...) ; processing (DEFUN SECP256R1-PUBLIC-KEY ...) ; processing (DEFMETHOD MAKE-SIGNATURE ...) ; processing (DEFMETHOD DESTRUCTURE-SIGNATURE ...) ; processing (DEFMETHOD GENERATE-SIGNATURE-NONCE ...) ; processing (DEFMETHOD SIGN-MESSAGE ...) ; processing (DEFMETHOD VERIFY-SIGNATURE ...) ; processing (DEFMETHOD MAKE-PUBLIC-KEY ...) ; processing (DEFMETHOD DESTRUCTURE-PUBLIC-KEY ...) ; processing (DEFMETHOD MAKE-PRIVATE-KEY ...) ; processing (DEFMETHOD DESTRUCTURE-PRIVATE-KEY ...) ; processing (DEFMETHOD GENERATE-KEY-PAIR ...) ; processing (DEFMETHOD DIFFIE-HELLMAN ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/public-key/secp256r1-tmp8COQHEZO.fasl ; compilation finished in 0:00:01.487 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/secp384r1.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS SECP384R1-PUBLIC-KEY ...) ; processing (DEFCLASS SECP384R1-PRIVATE-KEY ...) ; processing (DEFCLASS SECP384R1-POINT ...) ; processing (DEFMETHOD MAKE-LOAD-FORM ...) ; processing (DEFCONSTANT +SECP384R1-BITS+ ...) ; processing (DEFCONSTANT +SECP384R1-P+ ...) ; processing (DEFCONSTANT +SECP384R1-B+ ...) ; processing (DEFCONSTANT +SECP384R1-L+ ...) ; processing (DEFCONSTANT +SECP384R1-I+ ...) ; processing (DEFCONST +SECP384R1-G+ ...) ; processing (DEFCONST +SECP384R1-POINT-AT-INFINITY+ ...) ; processing (DEFMETHOD EC-SCALAR-INV ...) ; processing (DEFMETHOD EC-POINT-EQUAL ...) ; processing (DEFMETHOD EC-DOUBLE ...) ; processing (DEFMETHOD EC-ADD ...) ; processing (DEFMETHOD EC-SCALAR-MULT ...) ; processing (DEFMETHOD EC-POINT-ON-CURVE-P ...) ; processing (DEFMETHOD EC-ENCODE-SCALAR ...) ; processing (DEFMETHOD EC-DECODE-SCALAR ...) ; processing (DEFMETHOD EC-ENCODE-POINT ...) ; processing (DEFMETHOD EC-DECODE-POINT ...) ; processing (DEFUN SECP384R1-PUBLIC-KEY ...) ; processing (DEFMETHOD MAKE-SIGNATURE ...) ; processing (DEFMETHOD DESTRUCTURE-SIGNATURE ...) ; processing (DEFMETHOD GENERATE-SIGNATURE-NONCE ...) ; processing (DEFMETHOD SIGN-MESSAGE ...) ; processing (DEFMETHOD VERIFY-SIGNATURE ...) ; processing (DEFMETHOD MAKE-PUBLIC-KEY ...) ; processing (DEFMETHOD DESTRUCTURE-PUBLIC-KEY ...) ; processing (DEFMETHOD MAKE-PRIVATE-KEY ...) ; processing (DEFMETHOD DESTRUCTURE-PRIVATE-KEY ...) ; processing (DEFMETHOD GENERATE-KEY-PAIR ...) ; processing (DEFMETHOD DIFFIE-HELLMAN ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/public-key/secp384r1-tmpQYBBS7QC.fasl ; compilation finished in 0:00:01.415 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/secp521r1.lisp" (written 06 JAN 2021 01:15:53 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS SECP521R1-PUBLIC-KEY ...) ; processing (DEFCLASS SECP521R1-PRIVATE-KEY ...) ; processing (DEFCLASS SECP521R1-POINT ...) ; processing (DEFMETHOD MAKE-LOAD-FORM ...) ; processing (DEFCONSTANT +SECP521R1-BITS+ ...) ; processing (DEFCONSTANT +SECP521R1-P+ ...) ; processing (DEFCONSTANT +SECP521R1-B+ ...) ; processing (DEFCONSTANT +SECP521R1-L+ ...) ; processing (DEFCONSTANT +SECP521R1-I+ ...) ; processing (DEFCONST +SECP521R1-G+ ...) ; processing (DEFCONST +SECP521R1-POINT-AT-INFINITY+ ...) ; processing (DEFMETHOD EC-SCALAR-INV ...) ; processing (DEFMETHOD EC-POINT-EQUAL ...) ; processing (DEFMETHOD EC-DOUBLE ...) ; processing (DEFMETHOD EC-ADD ...) ; processing (DEFMETHOD EC-SCALAR-MULT ...) ; processing (DEFMETHOD EC-POINT-ON-CURVE-P ...) ; processing (DEFMETHOD EC-ENCODE-SCALAR ...) ; processing (DEFMETHOD EC-DECODE-SCALAR ...) ; processing (DEFMETHOD EC-ENCODE-POINT ...) ; processing (DEFMETHOD EC-DECODE-POINT ...) ; processing (DEFUN SECP521R1-PUBLIC-KEY ...) ; processing (DEFMETHOD MAKE-SIGNATURE ...) ; processing (DEFMETHOD DESTRUCTURE-SIGNATURE ...) ; processing (DEFMETHOD GENERATE-SIGNATURE-NONCE ...) ; processing (DEFMETHOD SIGN-MESSAGE ...) ; processing (DEFMETHOD VERIFY-SIGNATURE ...) ; processing (DEFMETHOD MAKE-PUBLIC-KEY ...) ; processing (DEFMETHOD DESTRUCTURE-PUBLIC-KEY ...) ; processing (DEFMETHOD MAKE-PRIVATE-KEY ...) ; processing (DEFMETHOD DESTRUCTURE-PRIVATE-KEY ...) ; processing (DEFMETHOD GENERATE-KEY-PAIR ...) ; processing (DEFMETHOD DIFFIE-HELLMAN ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ironclad/src/public-key/secp521r1-tmpAMQ7AMSJ.fasl ; compilation finished in 0:00:01.447 ; compiling file "/usr/share/common-lisp/source/asdf-finalizers/list-of.lisp" (written 26 MAR 2017 05:20:19 PM): ; processing (DEFPACKAGE :LIST-OF ...) ; processing (IN-PACKAGE :LIST-OF) ; processing (DEFUN SEQUENCE-OF-PREDICATE-FOR ...) ; processing (DEFUN LIST-OF-PREDICATE-FOR ...) ; processing (DEFUN VECTOR-OF-PREDICATE-FOR ...) ; processing (DEFUN LIST-OF-TYPE-PREDICATE ...) ; processing (DEFUN VECTOR-OF-TYPE-PREDICATE ...) ; processing (DEFUN ENSURE-LIST-OF-PREDICATE ...) ; processing (DEFUN ENSURE-VECTOR-OF-PREDICATE ...) ; processing (DEFTYPE LIST-OF ...) ; processing (DEFTYPE VECTOR-OF ...) ; processing (DEFMACRO DECLARE-LIST-OF ...) ; processing (DEFMACRO DECLARE-VECTOR-OF ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/asdf-finalizers/list-of-tmpQSC8Z7I4.fasl ; compilation finished in 0:00:00.403 ; compiling file "/usr/share/common-lisp/source/chipz/package.lisp" (written 21 JAN 2019 01:34:02 AM): ; processing (DEFPACKAGE :CHIPZ ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/chipz/package-tmpNGMCS43U.fasl ; compilation finished in 0:00:00.016 ; compiling file "/usr/share/common-lisp/source/chipz/constants.lisp" (written 21 JAN 2019 01:34:02 AM): ; processing (IN-PACKAGE :CHIPZ) ; processing (DEFMACRO DEFINE-CONSTANT ...) ; processing (DEFINE-CONSTANT +BLOCK-NO-COMPRESS+ ...) ; processing (DEFINE-CONSTANT +BLOCK-FIXED-CODES+ ...) ; processing (DEFINE-CONSTANT +BLOCK-DYNAMIC-CODES+ ...) ; processing (DEFINE-CONSTANT +BLOCK-INVALID+ ...) ; processing (DEFINE-CONSTANT +MAX-CODE-LENGTH+ ...) ; processing (DEFINE-CONSTANT +MAX-CODES+ ...) ; processing (DEFINE-CONSTANT +MAX-N-CODE-LENGTHS+ ...) ; processing (DEFINE-CONSTANT +DEFLATE-MAX-BITS+ ...) ; processing (DEFINE-CONSTANT +LENGTH-CODE-EXTRA-BITS+ ...) ; processing (DEFINE-CONSTANT +LENGTH-CODE-BASE-LENGTHS+ ...) ; processing (DEFCONSTANT +BZ-HEADER-B+ ...) ; processing (DEFCONSTANT +BZ-HEADER-Z+ ...) ; processing (DEFCONSTANT +BZ-HEADER-H+ ...) ; processing (DEFCONSTANT +BZ-HEADER-0+ ...) ; processing (DEFCONSTANT +100K+ ...) ; processing (DEFCONSTANT +MTFA-SIZE+ ...) ; processing (DEFCONSTANT +MTFL-SIZE+ ...) ; processing (DEFCONSTANT +BZ-MAX-ALPHA-SIZE+ ...) ; processing (DEFCONSTANT +BZ-MAX-CODE-LEN+ ...) ; processing (DEFCONSTANT +BZ-RUNA+ ...) ; processing (DEFCONSTANT +BZ-RUNB+ ...) ; processing (DEFCONSTANT +BZ-N-GROUPS+ ...) ; processing (DEFCONSTANT +BZ-G-SIZE+ ...) ; processing (DEFCONSTANT +BZ-N-ITERS+ ...) ; processing (DEFCONSTANT +BZ-MAX-SELECTORS+ ...) ; processing (DEFCONSTANT +DEFAULT-BUFFER-SIZE+ ...) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFINE-CONSTANT +CRC32-TABLE+ ...) ; processing (DEFINE-CONSTANT +BZIP2-CRC32-TABLE+ ...) ; processing (DEFCONSTANT ADLER32-MODULO ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/chipz/constants-tmp5EM0MAXI.fasl ; compilation finished in 0:00:00.107 ; compiling file "/usr/share/common-lisp/source/chipz/types-and-tables.lisp" (written 21 JAN 2019 01:34:02 AM): ; processing (IN-PACKAGE :CHIPZ) ; processing (DEFTYPE INDEX ...) ; processing (DEFTYPE SIMPLE-OCTET-VECTOR ...) ; processing (DEFTYPE DEFLATE-CODE-LENGTH ...) ; processing (DEFTYPE DEFLATE-CODE ...) ; processing (DEFTYPE DEFLATE-CODE-VALUE ...) ; processing (DEFPARAMETER *DISTANCE-CODE-EXTRA-BITS* ...) ; processing (DEFPARAMETER *DISTANCE-CODE-BASE-DISTANCES* ...) ; processing (DECLAIM (INLINE N-LENGTH-EXTRA-BITS ...)) ; processing (DEFUN N-LENGTH-EXTRA-BITS ...) ; processing (DEFUN N-DISTANCE-EXTRA-BITS ...) ; processing (DEFUN LENGTH-BASE ...) ; processing (DEFUN DISTANCE-BASE ...) ; processing (DEFPARAMETER *CODE-LENGTH-CODE-ORDER* ...) ; processing (DEFSTRUCT (CODE-RANGE-DESCRIPTOR # ...) ...) ; processing (DEFSTRUCT (HUFFMAN-DECODE-TABLE # ...) ...) ; processing (DEFUN CONSTRUCT-HUFFMAN-DECODE-TABLE ...) ; processing (DEFPARAMETER *FIXED-BLOCK-CODE-LENGTHS* ...) ; processing (DEFPARAMETER *FIXED-BLOCK-DISTANCE-LENGTHS* ...) ; processing (DEFUN CODE-N-VALUES ...) ; processing (DEFUN COMPUTE-HUFFMAN-DECODE-STRUCTURE ...) ; processing (DEFPARAMETER *FIXED-LITERAL/LENGTH-TABLE* ...) ; processing (DEFPARAMETER *FIXED-DISTANCE-TABLE* ...) ; processing (DEFMACRO PROBABLY-THE-FIXNUM ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/chipz/types-and-tables-tmpPO1KM2UM.fasl ; compilation finished in 0:00:00.983 ; compiling file "/usr/share/common-lisp/source/chipz/crc32.lisp" (written 21 JAN 2019 01:34:02 AM): ; processing (IN-PACKAGE :CHIPZ) ; processing (DEFSTRUCT (CRC32 #) ...) ; processing (DEFUN UPDATE-CRC32 ...) ; processing (DEFUN PRODUCE-CRC32 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/chipz/crc32-tmp9MJ8K0GA.fasl ; compilation finished in 0:00:00.171 ; compiling file "/usr/share/common-lisp/source/chipz/adler32.lisp" (written 21 JAN 2019 01:34:02 AM): ; processing (IN-PACKAGE :CHIPZ) ; processing (DEFSTRUCT (ADLER32 #) ...) ; processing (DEFUN UPDATE-ADLER32 ...) ; processing (DEFUN PRODUCE-ADLER32 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/chipz/adler32-tmpDNAAZUQ1.fasl ; compilation finished in 0:00:00.151 ; compiling file "/usr/share/common-lisp/source/chipz/conditions.lisp" (written 21 JAN 2019 01:34:02 AM): ; processing (IN-PACKAGE :CHIPZ) ; processing (DEFINE-CONDITION CHIPZ-ERROR ...) ; processing (DEFINE-CONDITION DECOMPRESSION-ERROR ...) ; processing (DEFINE-CONDITION INVALID-FORMAT-ERROR ...) ; processing (DEFINE-CONDITION INVALID-CHECKSUM-ERROR ...) ; processing (DEFINE-CONDITION PREMATURE-END-OF-STREAM ...) ; processing (DEFINE-CONDITION INFLATE-ERROR ...) ; processing (DEFINE-CONDITION INVALID-ZLIB-HEADER-ERROR ...) ; processing (DEFINE-CONDITION INVALID-GZIP-HEADER-ERROR ...) ; processing (DEFINE-CONDITION RESERVED-BLOCK-TYPE-ERROR ...) ; processing (DEFINE-CONDITION INVALID-STORED-BLOCK-LENGTH-ERROR ...) ; processing (DEFINE-CONDITION BZIP2-ERROR ...) ; processing (DEFINE-CONDITION INVALID-BZIP2-DATA ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/chipz/conditions-tmpSFHGUSI2.fasl ; compilation finished in 0:00:00.131 ; compiling file "/usr/share/common-lisp/source/chipz/dstate.lisp" (written 21 JAN 2019 01:34:02 AM): ; processing (IN-PACKAGE :CHIPZ) ; processing (DEFSTRUCT (DECOMPRESSION-STATE # ...) ...) ; processing (DEFUN MAKE-DSTATE ...) ; processing (DEFUN FINISH-DSTATE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/chipz/dstate-tmpJEMJHCAQ.fasl ; compilation finished in 0:00:00.379 ; compiling file "/usr/share/common-lisp/source/chipz/inflate-state.lisp" (written 21 JAN 2019 01:34:02 AM): ; processing (IN-PACKAGE :CHIPZ) ; processing (DEFTYPE SLIDING-WINDOW ...) ; processing (DEFSTRUCT (INFLATE-STATE # ...) ...) ; processing (DEFUN MAKE-INFLATE-STATE ...) ; processing (DEFUN FINISH-INFLATE-STATE ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/chipz/inflate-state-tmpJV5SBQ61.fasl ; compilation finished in 0:00:00.615 ; compiling file "/usr/share/common-lisp/source/chipz/gzip.lisp" (written 21 JAN 2019 01:34:02 AM): ; processing (IN-PACKAGE :CHIPZ) ; processing (DEFCLASS GZIP-HEADER ...) ; processing (DEFCONSTANT +GZIP-FLAG-TEXT+ ...) ; processing (DEFCONSTANT +GZIP-FLAG-CRC+ ...) ; processing (DEFCONSTANT +GZIP-FLAG-EXTRA+ ...) ; processing (DEFCONSTANT +GZIP-FLAG-NAME+ ...) ; processing (DEFCONSTANT +GZIP-FLAG-COMMENT+ ...) ; processing (DEFCONSTANT +GZIP-DEFLATE-METHOD+ ...) ; processing (DEFCONSTANT +GZIP-XFL-MAX-COMPRESSION+ ...) ; processing (DEFCONSTANT +GZIP-XFL-FAST-COMPRESSION+ ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/chipz/gzip-tmpFHSB04A0.fasl ; compilation finished in 0:00:00.015 ; compiling file "/usr/share/common-lisp/source/chipz/zlib.lisp" (written 21 JAN 2019 01:34:02 AM): ; processing (IN-PACKAGE :CHIPZ) ; processing (DEFCLASS ZLIB-HEADER ...) ; processing (DEFCONSTANT +ZLIB-COMPRESSION-METHOD+ ...) ; processing (DEFUN ZLIB-COMPRESSION-METHOD ...) ; processing (DEFUN ZLIB-COMPRESSION-INFO ...) ; processing (DEFCONSTANT +ZLIB-FLAG-FDICT+ ...) ; processing (DEFUN ZLIB-FLAG-FCHECK ...) ; processing (DEFCONSTANT +ZLIB-FLEVEL-FASTEST+ ...) ; processing (DEFCONSTANT +ZLIB-FLEVEL-FAST+ ...) ; processing (DEFCONSTANT +ZLIB-FLEVEL-DEFAULT+ ...) ; processing (DEFCONSTANT +ZLIB-FLEVEL-MAXIMUM+ ...) ; processing (DEFUN ZLIB-FLAG-FLEVEL ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/chipz/zlib-tmpQQZWJZI3.fasl ; compilation finished in 0:00:00.039 ; compiling file "/usr/share/common-lisp/source/chipz/inflate.lisp" (written 21 JAN 2019 01:34:02 AM): ; processing (IN-PACKAGE :CHIPZ) ; processing (DEFUN UPDATE-WINDOW ...) ; processing (DEFUN %INFLATE ...) ; processing (DEFUN RECORD-CODE-LENGTH ...) ; processing (DEFUN %INFLATE-STATE-MACHINE ...) ; file: /usr/share/common-lisp/source/chipz/inflate.lisp ; in: DEFUN %INFLATE-STATE-MACHINE ; (* (CHIPZ::CMF CHIPZ::HEADER) 256) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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. ; (+ (* (CHIPZ::CMF CHIPZ::HEADER) 256) CHIPZ::FLAGS-BYTE) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; (MOD (+ (* (CHIPZ::CMF CHIPZ::HEADER) 256) CHIPZ::FLAGS-BYTE) 31) ; ; 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). ; (ZEROP (MOD (+ (* (CHIPZ::CMF CHIPZ::HEADER) 256) CHIPZ::FLAGS-BYTE) 31)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL 0 (31)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (MOD (+ (* (CHIPZ::CMF CHIPZ::HEADER) 256) CHIPZ::FLAGS-BYTE) 31) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL (-31) (31)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a (OR (RATIONAL (-31) (31)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR (RATIONAL (-31) (31)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (= CHIPZ::STORED (CHIPZ::PRODUCE-CRC32 CHIPZ::CRC32)) ; ; note: unable to open code because: The operands might not be the same type. ; (COERCE (FUNCALL CHIPZ::SLOT CHIPZ::HEADER) '(VECTOR (UNSIGNED-BYTE 8))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS NULL ; (AND (NOT (VECTOR (UNSIGNED-BYTE 8))) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; (FUNCALL (CHIPZ::INFLATE-STATE-STATE CHIPZ::STATE) CHIPZ::STATE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (DECF (CHIPZ::INFLATE-STATE-LENGTH CHIPZ::STATE) CHIPZ::N-COPIED-BYTES) ; --> LET* ; ==> ; (SB-IMPL::XSUBTRACT CHIPZ::N-COPIED-BYTES ; (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:INFLATE-STATE #:OBJ) ; 15)) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a REAL, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a REAL, not a SINGLE-FLOAT. ; (ZEROP (CHIPZ::INFLATE-STATE-LENGTH CHIPZ::STATE)) ; ; 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. ; (ZEROP CHIPZ::N-COPIED-BYTES) ; ; 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 because: The operands might not be the same type. ; (+ (CHIPZ::INFLATE-STATE-OUTPUT-INDEX CHIPZ::STATE) CHIPZ::N-COPIED-BYTES) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The second argument is a REAL, not a FLOAT. ; (+ (CHIPZ::INFLATE-STATE-INPUT-INDEX CHIPZ::STATE) CHIPZ::N-COPIED-BYTES) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The second argument is a REAL, not a FLOAT. ; (INCF (CHIPZ::INFLATE-STATE-INPUT-INDEX CHIPZ::STATE) CHIPZ::N-COPIED-BYTES) ; --> LET* ; ==> ; (+ CHIPZ::N-COPIED-BYTES ; (SB-KERNEL:THE* ((AND FIXNUM (INTEGER 0 *)) :DERIVE-TYPE-ONLY T) ; (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:INFLATE-STATE #:OBJ) ; 4))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (INCF (CHIPZ::INFLATE-STATE-OUTPUT-INDEX CHIPZ::STATE) CHIPZ::N-COPIED-BYTES) ; --> LET* ; ==> ; (+ CHIPZ::N-COPIED-BYTES ; (SB-KERNEL:THE* ((AND FIXNUM (INTEGER 0 *)) :DERIVE-TYPE-ONLY T) ; (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:INFLATE-STATE #:OBJ) ; 8))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (< (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE) ; (CHIPZ::INFLATE-STATE-N-CODES CHIPZ::STATE)) ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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. ; (< (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE) ; CHIPZ::+MAX-N-CODE-LENGTHS+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (DECF (CHIPZ::INFLATE-STATE-LENGTH CHIPZ::STATE) CHIPZ::N-BYTES-TO-COPY) ; --> LET* ; ==> ; (SB-IMPL::XSUBTRACT CHIPZ::N-BYTES-TO-COPY ; (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:INFLATE-STATE #:OBJ) ; 15)) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a REAL, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a REAL, not a SINGLE-FLOAT. ; (INCF (CHIPZ::INFLATE-STATE-OUTPUT-INDEX CHIPZ::STATE) CHIPZ::N-BYTES-TO-COPY) ; --> LET* ; ==> ; (+ CHIPZ::N-BYTES-TO-COPY ; (SB-KERNEL:THE* ((AND FIXNUM (INTEGER 0 *)) :DERIVE-TYPE-ONLY T) ; (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:INFLATE-STATE #:OBJ) ; 8))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (+ CHIPZ::INDEX CHIPZ::N-BYTES-TO-COPY) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The second argument is a REAL, not a FLOAT. ; (+ CHIPZ::COPY-INDEX CHIPZ::N-BYTES-TO-COPY) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a RATIONAL. ; The second argument is a REAL, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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. ; (- CHIPZ::INDEX CHIPZ::DISTANCE) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The second argument is a REAL, not a FLOAT. ; (- CHIPZ::WINDOW-INDEX CHIPZ::DISTANCE) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The second argument is a (OR (DOUBLE-FLOAT -4.611686018427388d18) ; (SINGLE-FLOAT -4.611686e18) ; (RATIONAL -4611686018427387903)), not a FLOAT. ; (+ (- CHIPZ::WINDOW-INDEX CHIPZ::DISTANCE) (- CHIPZ::INDEX CHIPZ::START)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a (OR (RATIONAL * 4611686018427420670) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427421d18)), not a FLOAT. ; (MINUSP CHIPZ::COPY-INDEX) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (DOUBLE-FLOAT * 9.223372036854809d18) ; (SINGLE-FLOAT * 9.223372e18) ; (RATIONAL * 9223372036854808573)), not a FLOAT. ; (- CHIPZ::WINDOW-INDEX CHIPZ::COPY-INDEX) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The second argument is a (OR (DOUBLE-FLOAT 0.0d0 9.223372036854809d18) ; (SINGLE-FLOAT 0.0 9.223372e18) ; (RATIONAL 0 9223372036854808573)), not a FLOAT. ; (+ CHIPZ::COPY-INDEX (LENGTH (CHIPZ::INFLATE-STATE-WINDOW CHIPZ::STATE))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a (OR (DOUBLE-FLOAT * (0.0d0)) (SINGLE-FLOAT * (0.0)) ; (RATIONAL * (0))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR (DOUBLE-FLOAT * (0.0d0)) (SINGLE-FLOAT * (0.0)) ; (RATIONAL * (0))), not a RATIONAL. ; (- (LENGTH (CHIPZ::INFLATE-STATE-WINDOW CHIPZ::STATE)) CHIPZ::COPY-INDEX) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The second argument is a (OR (RATIONAL * (32768)) (SINGLE-FLOAT * 32768.0) ; (DOUBLE-FLOAT * 32768.0d0)), not a FLOAT. ; (ZEROP (CHIPZ::INFLATE-STATE-LENGTH CHIPZ::STATE)) ; ; 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. ; (ZEROP CHIPZ::BITS) ; ; 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. ; (+ (CHIPZ::DISTANCE-BASE (CHIPZ::INFLATE-STATE-DISTANCE CHIPZ::STATE)) ; CHIPZ::DISTANCE-EXTRA) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; (MIN LENGTH (- CHIPZ::END CHIPZ::INDEX)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (DOUBLE-FLOAT -4.611686018427388d18) ; (SINGLE-FLOAT -4.611686e18) ; (RATIONAL -4611686018427387903)), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (LOOP CHIPZ::WITH CHIPZ::OUTPUT = (CHIPZ::INFLATE-STATE-OUTPUT CHIPZ::STATE) ; CHIPZ::FOR CHIPZ::I CHIPZ::FROM CHIPZ::INDEX CHIPZ::BELOW (THE FIXNUM ; (+ ; CHIPZ::INDEX ; CHIPZ::N-BYTES-TO-COPY)) ; CHIPZ::FOR ...) ; --> BLOCK LET LET LET TAGBODY WHEN IF ; ==> ; (>= CHIPZ::J #:LOOP-LIMIT-18) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (DOUBLE-FLOAT * 4.611686018427388d18) ; (SINGLE-FLOAT * 4.611686e18) ; (RATIONAL * 4611686018427387903)), 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. ; (= CHIPZ::STORED (CHIPZ::PRODUCE-ADLER32 CHIPZ::ADLER32)) ; ; note: unable to open code because: The operands might not be the same type. ; (< (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE) CHIPZ::N-VALUES) ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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. ; (+ (CHIPZ::HDT-BITS CHIPZ::DECODER) 7) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; (INCF (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE)) ; --> LET* ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:INFLATE-STATE #:OBJ) 22)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; (1- (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; (+ (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE) CHIPZ::LEN) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; (INCF (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE) CHIPZ::LEN) ; --> LET* ; ==> ; (+ CHIPZ::LEN (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:INFLATE-STATE #:OBJ) 22)) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-(COMPLEX FLOAT) numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; (ASSERT (= CHIPZ::N-VALUES (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE))) ; --> TAGBODY LET WHEN IF ; ==> ; (= #:TEMP5 #:TEMP6) ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to open code because: The operands might not be the same type. ; (MIN LENGTH (- CHIPZ::END CHIPZ::INDEX)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (<= CHIPZ::DISTANCE (- CHIPZ::INDEX CHIPZ::START)) ; ; 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 -4.611686018427388d18) ; (SINGLE-FLOAT -4.611686e18) ; (RATIONAL -4611686018427387903)), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (MIN CHIPZ::N-BYTES-TO-COPY (- CHIPZ::WINDOW-INDEX CHIPZ::COPY-INDEX)) ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a (OR (RATIONAL -9223372036854808573 32767) ; (SINGLE-FLOAT -9.223372e18 32767.0) ; (DOUBLE-FLOAT -9.223372036854809d18 ; 32767.0d0)), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a (OR (RATIONAL -9223372036854808573 32767) ; (SINGLE-FLOAT -9.223372e18 32767.0) ; (DOUBLE-FLOAT -9.223372036854809d18 ; 32767.0d0)), 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 (OR (RATIONAL -9223372036854808573 32767) ; (SINGLE-FLOAT -9.223372e18 32767.0) ; (DOUBLE-FLOAT -9.223372036854809d18 ; 32767.0d0)), not a RATIONAL. ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a (OR (RATIONAL -9223372036854808573 32767) ; (SINGLE-FLOAT -9.223372e18 32767.0) ; (DOUBLE-FLOAT -9.223372036854809d18 ; 32767.0d0)), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a (OR (RATIONAL -9223372036854808573 32767) ; (SINGLE-FLOAT -9.223372e18 32767.0) ; (DOUBLE-FLOAT -9.223372036854809d18 ; 32767.0d0)), 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 (OR (RATIONAL -9223372036854808573 32767) ; (SINGLE-FLOAT -9.223372e18 32767.0) ; (DOUBLE-FLOAT -9.223372036854809d18 ; 32767.0d0)), not a RATIONAL. ; ; note: unable to open code because: The operands might not be the same type. ; (MIN CHIPZ::N-BYTES-TO-COPY ; (- (LENGTH (CHIPZ::INFLATE-STATE-WINDOW CHIPZ::STATE)) ; CHIPZ::COPY-INDEX)) ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0) ; (RATIONAL (0))), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0) ; (RATIONAL (0))), 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 (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0) ; (RATIONAL (0))), not a RATIONAL. ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0) ; (RATIONAL (0))), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0) ; (RATIONAL (0))), 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 (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0) ; (RATIONAL (0))), not a RATIONAL. ; ; note: unable to open code because: The operands might not be the same type. ; (MIN (CHIPZ::INFLATE-STATE-LENGTH CHIPZ::STATE) ; (- (CHIPZ::INFLATE-STATE-INPUT-END CHIPZ::STATE) ; (CHIPZ::INFLATE-STATE-INPUT-INDEX CHIPZ::STATE)) ; (- (CHIPZ::INFLATE-STATE-OUTPUT-END CHIPZ::STATE) ; (CHIPZ::INFLATE-STATE-OUTPUT-INDEX CHIPZ::STATE))) ; ; 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 -4.611686018427388d18) ; (SINGLE-FLOAT -4.611686e18) ; (RATIONAL -4611686018427387903)), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (DECF (CHIPZ::INFLATE-STATE-LENGTH CHIPZ::STATE) CHIPZ::N-BYTES-TO-COPY) ; --> LET* ; ==> ; (SB-IMPL::XSUBTRACT CHIPZ::N-BYTES-TO-COPY ; (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:INFLATE-STATE #:OBJ) ; 15)) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do #1=inline float arithmetic (cost 2) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; (INCF (CHIPZ::INFLATE-STATE-OUTPUT-INDEX CHIPZ::STATE) CHIPZ::N-BYTES-TO-COPY) ; --> LET* ; ==> ; (+ CHIPZ::N-BYTES-TO-COPY ; (SB-KERNEL:THE* ((AND FIXNUM (INTEGER 0 *)) :DERIVE-TYPE-ONLY T) ; (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:INFLATE-STATE #:OBJ) ; 8))) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) &REST ; T). ; etc. ; (+ CHIPZ::INDEX CHIPZ::N-BYTES-TO-COPY) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The second argument is a REAL, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) &REST ; T). ; etc. ; (+ CHIPZ::COPY-INDEX CHIPZ::N-BYTES-TO-COPY) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline float arithmetic (cost 2) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; The result is a (VALUES REAL . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT &REST ; T). ; unable to do #1# (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; (LOOP CHIPZ::WITH CHIPZ::OUTPUT = (CHIPZ::INFLATE-STATE-OUTPUT CHIPZ::STATE) ; CHIPZ::FOR CHIPZ::I CHIPZ::FROM CHIPZ::INDEX CHIPZ::BELOW (THE FIXNUM ; (+ ; CHIPZ::INDEX ; CHIPZ::N-BYTES-TO-COPY)) ; CHIPZ::FOR ...) ; --> BLOCK LET LET LET TAGBODY WHEN IF ; ==> ; (>= CHIPZ::J #:LOOP-LIMIT-18) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; (< (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE) CHIPZ::N-VALUES) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=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 #1# (cost 3) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; etc. ; (+ (CHIPZ::HDT-BITS CHIPZ::DECODER) 7) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (INCF (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE)) ; --> LET* ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:INFLATE-STATE #:OBJ) 22)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (1- (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE)) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (+ (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE) CHIPZ::LEN) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&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 . #1#), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; etc. ; (INCF (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE) CHIPZ::LEN) ; --> LET* ; ==> ; (+ CHIPZ::LEN (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:INFLATE-STATE #:OBJ) 22)) ; ; 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 . #1=(&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 . #1#), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; etc. ; (ASSERT (= CHIPZ::N-VALUES (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE))) ; --> TAGBODY LET WHEN IF ; ==> ; (= #:TEMP5 #:TEMP6) ; ; note: forced to do GENERIC-= (cost 10) ; unable to do #1=inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a T, not a (COMPLEX DOUBLE-FLOAT). ; unable to do #1# (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; etc. ; (* (CHIPZ::CMF CHIPZ::HEADER) 256) ; ; note: forced to do GENERIC-* (cost 30) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (+ (* (CHIPZ::CMF CHIPZ::HEADER) 256) CHIPZ::FLAGS-BYTE) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; etc. ; (MOD (+ (* (CHIPZ::CMF CHIPZ::HEADER) 256) CHIPZ::FLAGS-BYTE) 31) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a (OR (RATIONAL #2=(-31) #3=(31)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a FIXNUM. ; The result is a (VALUES ; (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL #4=(0) #5=(62))) ; . #6=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (OR (RATIONAL #2# #3#) DOUBLE-FLOAT SINGLE-FLOAT), not a FIXNUM. ; The result is a (VALUES (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL #4# #5#)) ; . #6#), not a (VALUES FIXNUM &REST T). ; etc. ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a (RATIONAL #2=(-31) #3=(62)), not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a (RATIONAL #2# #3#), not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a (RATIONAL 0 #2=(62)), not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a (RATIONAL 0 #2#), not a FIXNUM. ; etc. ; (< (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE) ; (CHIPZ::INFLATE-STATE-N-CODES CHIPZ::STATE)) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=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 #1# (cost 3) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; etc. ; (< (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE) ; CHIPZ::+MAX-N-CODE-LENGTHS+) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a T, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a T, not a FIXNUM. ; etc. ; (+ (CHIPZ::DISTANCE-BASE (CHIPZ::INFLATE-STATE-DISTANCE CHIPZ::STATE)) ; CHIPZ::DISTANCE-EXTRA) ; ; 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 . #1=(&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 . #1#), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; etc. ; (MIN LENGTH (- CHIPZ::END CHIPZ::INDEX)) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; (<= CHIPZ::DISTANCE (- CHIPZ::INDEX CHIPZ::START)) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; (- CHIPZ::WINDOW-INDEX CHIPZ::DISTANCE) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a (OR (DOUBLE-FLOAT -4.611686018427388d18) ; (SINGLE-FLOAT -4.611686e18) ; (RATIONAL -4611686018427387903)), not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL * 4611686018427420670) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * 4.611686018427421d18)) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The second argument is a (OR (DOUBLE-FLOAT -4.611686018427388d18) ; (SINGLE-FLOAT -4.611686e18) ; (RATIONAL -4611686018427387903)), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (OR (RATIONAL * 4611686018427420670) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * 4.611686018427421d18)) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; (+ (- CHIPZ::WINDOW-INDEX CHIPZ::DISTANCE) (- CHIPZ::INDEX CHIPZ::START)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (RATIONAL * 4611686018427420670) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * 4.611686018427421d18)), not a FIXNUM. ; The result is a (VALUES ; (OR (DOUBLE-FLOAT * 9.223372036854809d18) ; (SINGLE-FLOAT * 9.223372e18) ; (RATIONAL * 9223372036854808573)) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a (OR (RATIONAL * 4611686018427420670) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * 4.611686018427421d18)), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (OR (DOUBLE-FLOAT * 9.223372036854809d18) ; (SINGLE-FLOAT * 9.223372e18) ; (RATIONAL * 9223372036854808573)) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; (MINUSP CHIPZ::COPY-INDEX) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a (OR (DOUBLE-FLOAT * 9.223372036854809d18) ; (SINGLE-FLOAT * 9.223372e18) ; (RATIONAL * 9223372036854808573)), not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a (OR (DOUBLE-FLOAT * 9.223372036854809d18) ; (SINGLE-FLOAT * 9.223372e18) ; (RATIONAL * 9223372036854808573)), not a FIXNUM. ; etc. ; (- CHIPZ::WINDOW-INDEX CHIPZ::COPY-INDEX) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a (OR (DOUBLE-FLOAT 0.0d0 9.223372036854809d18) ; (SINGLE-FLOAT 0.0 9.223372e18) ; (RATIONAL 0 9223372036854808573)), not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL -9223372036854808573 32767) ; (SINGLE-FLOAT -9.223372e18 32767.0) ; (DOUBLE-FLOAT -9.223372036854809d18 32767.0d0)) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The second argument is a (OR (DOUBLE-FLOAT 0.0d0 9.223372036854809d18) ; (SINGLE-FLOAT 0.0 9.223372e18) ; (RATIONAL 0 9223372036854808573)), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (OR (RATIONAL -9223372036854808573 32767) ; (SINGLE-FLOAT -9.223372e18 32767.0) ; (DOUBLE-FLOAT -9.223372036854809d18 32767.0d0)) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; (MIN CHIPZ::N-BYTES-TO-COPY (- CHIPZ::WINDOW-INDEX CHIPZ::COPY-INDEX)) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a (OR (RATIONAL -9223372036854808573 32767) ; (SINGLE-FLOAT -9.223372e18 32767.0) ; (DOUBLE-FLOAT -9.223372036854809d18 ; 32767.0d0)), not a SINGLE-FLOAT. ; unable to do #1# (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a (OR (RATIONAL -9223372036854808573 32767) ; (SINGLE-FLOAT -9.223372e18 32767.0) ; (DOUBLE-FLOAT -9.223372036854809d18 ; 32767.0d0)), not a DOUBLE-FLOAT. ; etc. ; ; note: forced to do GENERIC-= (cost 10) ; unable to do #1=inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a (OR (RATIONAL -9223372036854808573 32767) ; (SINGLE-FLOAT -9.223372e18 32767.0) ; (DOUBLE-FLOAT -9.223372036854809d18 ; 32767.0d0)), not a DOUBLE-FLOAT. ; unable to do #1# (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a (OR (RATIONAL -9223372036854808573 32767) ; (SINGLE-FLOAT -9.223372e18 32767.0) ; (DOUBLE-FLOAT -9.223372036854809d18 ; 32767.0d0)), not a SINGLE-FLOAT. ; (+ CHIPZ::COPY-INDEX (LENGTH (CHIPZ::INFLATE-STATE-WINDOW CHIPZ::STATE))) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a (OR (DOUBLE-FLOAT * #2=(0.0d0)) ; (SINGLE-FLOAT * #3=(0.0)) (RATIONAL * #4=(0))), not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL * #5=(32768)) (SINGLE-FLOAT * 32768.0) ; (DOUBLE-FLOAT * 32768.0d0)) ; . #6=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (OR (DOUBLE-FLOAT * #2#) (SINGLE-FLOAT * #3#) ; (RATIONAL * #4#)), not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL * #5#) (SINGLE-FLOAT * 32768.0) ; (DOUBLE-FLOAT * 32768.0d0)) ; . #6#), not a (VALUES FIXNUM &REST T). ; etc. ; (- (LENGTH (CHIPZ::INFLATE-STATE-WINDOW CHIPZ::STATE)) CHIPZ::COPY-INDEX) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a (OR (RATIONAL * #1=(32768)) ; (SINGLE-FLOAT * 32768.0) ; (DOUBLE-FLOAT * 32768.0d0)), not a FIXNUM. ; The result is a (VALUES ; (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0) ; (RATIONAL #2=(0))) ; . #3=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The second argument is a (OR (RATIONAL * #1#) (SINGLE-FLOAT * 32768.0) ; (DOUBLE-FLOAT * 32768.0d0)), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0) ; (RATIONAL #2#)) ; . #3#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; (MIN CHIPZ::N-BYTES-TO-COPY ; (- (LENGTH (CHIPZ::INFLATE-STATE-WINDOW CHIPZ::STATE)) ; CHIPZ::COPY-INDEX)) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0) ; (RATIONAL #2=(0))), not a SINGLE-FLOAT. ; unable to do #1# (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0) ; (RATIONAL #2#)), not a DOUBLE-FLOAT. ; etc. ; ; note: forced to do GENERIC-= (cost 10) ; unable to do #1=inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0) ; (RATIONAL #2=(0))), not a DOUBLE-FLOAT. ; unable to do #1# (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a (OR (DOUBLE-FLOAT 0.0d0) (SINGLE-FLOAT 0.0) ; (RATIONAL #2#)), not a SINGLE-FLOAT. ; (- CHIPZ::INDEX CHIPZ::DISTANCE) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The second argument is a REAL, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) &REST ; T). ; etc. ; (MIN (CHIPZ::INFLATE-STATE-LENGTH CHIPZ::STATE) ; (- (CHIPZ::INFLATE-STATE-INPUT-END CHIPZ::STATE) ; (CHIPZ::INFLATE-STATE-INPUT-INDEX CHIPZ::STATE)) ; (- (CHIPZ::INFLATE-STATE-OUTPUT-END CHIPZ::STATE) ; (CHIPZ::INFLATE-STATE-OUTPUT-INDEX CHIPZ::STATE))) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; (+ (CHIPZ::INFLATE-STATE-OUTPUT-INDEX CHIPZ::STATE) CHIPZ::N-COPIED-BYTES) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The second argument is a REAL, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) &REST ; T). ; etc. ; (+ (CHIPZ::INFLATE-STATE-INPUT-INDEX CHIPZ::STATE) CHIPZ::N-COPIED-BYTES) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The second argument is a REAL, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) &REST ; T). ; etc. ; (INCF (CHIPZ::INFLATE-STATE-INPUT-INDEX CHIPZ::STATE) CHIPZ::N-COPIED-BYTES) ; --> LET* ; ==> ; (+ CHIPZ::N-COPIED-BYTES ; (SB-KERNEL:THE* ((AND FIXNUM (INTEGER 0 *)) :DERIVE-TYPE-ONLY T) ; (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:INFLATE-STATE #:OBJ) ; 4))) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) &REST ; T). ; etc. ; (INCF (CHIPZ::INFLATE-STATE-OUTPUT-INDEX CHIPZ::STATE) CHIPZ::N-COPIED-BYTES) ; --> LET* ; ==> ; (+ CHIPZ::N-COPIED-BYTES ; (SB-KERNEL:THE* ((AND FIXNUM (INTEGER 0 *)) :DERIVE-TYPE-ONLY T) ; (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:INFLATE-STATE #:OBJ) ; 8))) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) &REST ; T). ; etc. ; (DECF (CHIPZ::INFLATE-STATE-LENGTH CHIPZ::STATE) CHIPZ::N-COPIED-BYTES) ; --> LET* ; ==> ; (SB-IMPL::XSUBTRACT CHIPZ::N-COPIED-BYTES ; (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:INFLATE-STATE #:OBJ) ; 15)) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do #1=inline float arithmetic (cost 2) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/chipz/inflate-tmpPHMA69WA.fasl ; compilation finished in 0:00:01.283 ; compiling file "/usr/share/common-lisp/source/chipz/bzip2.lisp" (written 21 JAN 2019 01:34:02 AM): ; processing (IN-PACKAGE :CHIPZ) ; processing (DEFUN REVERSE-UB4 ...) ; processing (DEFUN REVERSE-UB8 ...) ; processing (DEFUN REVERSE-UB16 ...) ; processing (DEFVAR *DUMMY-VEC* ...) ; processing (DEFSTRUCT (BZIP2-STATE # ...) ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN MAKE-MAPS ...) ; processing (DEFUN MAKE-DECODE-TABLES ...) ; processing (DEFUN UNDO-RLE-OBUF-TO-OUTPUT ...) ; processing (DEFUN %BZIP2-STATE-MACHINE ...) ; file: /usr/share/common-lisp/source/chipz/bzip2.lisp ; in: DEFUN %BZIP2-STATE-MACHINE ; 'CHIPZ:INVALID-BZIP2-DATA ; ; note: deleting unreachable code ; (MINUSP (CHIPZ::BZIP2-STATE-ORIGINAL-POINTER CHIPZ::STATE)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (>= (CHIPZ::BZIP2-STATE-ORIGINAL-POINTER CHIPZ::STATE) ; (CHIPZ::BZIP2-STATE-NBLOCK CHIPZ::STATE)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (INCF (CHIPZ::BZIP2-STATE-N-BLOCKS-USED CHIPZ::STATE)) ; --> LET* ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 26)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; (>= (CHIPZ::BZIP2-STATE-ORIGINAL-POINTER CHIPZ::STATE) ; (CHIPZ::BZIP2-STATE-NBLOCK CHIPZ::STATE)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (DOUBLE-FLOAT * 899999.0d0) ; (SINGLE-FLOAT * 899999.0) ; (RATIONAL * 899999)), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (= (CHIPZ::BZIP2-STATE-N-BLOCKS-USED CHIPZ::STATE) ; (1+ (CHIPZ::BZIP2-STATE-NBLOCK CHIPZ::STATE))) ; ; 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. ; (INCF (CHIPZ::BZIP2-STATE-I CHIPZ::STATE)) ; --> LET* ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 48)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; (< (INCF (CHIPZ::BZIP2-STATE-I CHIPZ::STATE)) ; (CHIPZ::BZIP2-STATE-ALPHA-SIZE CHIPZ::STATE)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (INCF (CHIPZ::BZIP2-STATE-J CHIPZ::STATE)) ; --> LET* ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 49)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; (< (CHIPZ::BZIP2-STATE-J CHIPZ::STATE) ; (CHIPZ::BZIP2-STATE-N-GROUPS CHIPZ::STATE)) ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 (CHIPZ::BZIP2-STATE-I CHIPZ::STATE)) ; --> LET* ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 48)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; (< (INCF (CHIPZ::BZIP2-STATE-I CHIPZ::STATE)) ; (CHIPZ::BZIP2-STATE-N-SELECTORS CHIPZ::STATE)) ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 (CHIPZ::BZIP2-STATE-J CHIPZ::STATE)) ; --> LET* ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 49)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; (< (CHIPZ::BZIP2-STATE-I CHIPZ::STATE) 16) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (* (CHIPZ::BZIP2-STATE-I CHIPZ::STATE) 16) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX 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. ; (+ (* (CHIPZ::BZIP2-STATE-I CHIPZ::STATE) 16) CHIPZ::I) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; (INCF (CHIPZ::BZIP2-STATE-I CHIPZ::STATE)) ; --> LET* ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 48)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; (INCF (CHIPZ::BZIP2-STATE-CURRENT-BLOCK-NUMBER CHIPZ::STATE)) ; --> LET* ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 21)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; (LDB (BYTE CHIPZ::N 0) ; (ASH (CHIPZ::BZIP2-STATE-BITS CHIPZ::STATE) ; (THE (INTEGER -31 0) ; (- CHIPZ::N (CHIPZ::BZIP2-STATE-N-BITS CHIPZ::STATE))))) ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; (>= (INCF (CHIPZ::BZIP2-STATE-J CHIPZ::STATE)) ; (CHIPZ::BZIP2-STATE-N-GROUPS CHIPZ::STATE)) ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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. ; (LOOP CHIPZ::WITH CHIPZ::N-GROUPS = (CHIPZ::BZIP2-STATE-N-GROUPS ; CHIPZ::STATE) ; CHIPZ::WITH CHIPZ::LEN = (CHIPZ::BZIP2-STATE-LEN CHIPZ::STATE) ; CHIPZ::FOR CHIPZ::X CHIPZ::FROM ...) ; --> BLOCK LET LET LET TAGBODY WHEN IF ; ==> ; (>= CHIPZ::X #:LOOP-LIMIT-36) ; ; note: unable to open code because: The operands might not be the same type. ; (MAX CHIPZ::MAXLEN CHIPZ::XY) ; ; 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 * 255.0d0) (SINGLE-FLOAT * 255.0) ; (RATIONAL * 255)), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (MIN CHIPZ::MINLEN CHIPZ::XY) ; ; 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 0.0d0) (SINGLE-FLOAT 0.0) ; (RATIONAL 0)), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (>= (INCF (CHIPZ::BZIP2-STATE-J CHIPZ::STATE)) ; (CHIPZ::BZIP2-STATE-N-GROUPS CHIPZ::STATE)) ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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. ; (>= (INCF (CHIPZ::BZIP2-STATE-GROUP-NUMBER CHIPZ::STATE)) ; (CHIPZ::BZIP2-STATE-N-SELECTORS CHIPZ::STATE)) ; ; note: unable to open code because: The operands might not be the same type. ; (< CHIPZ::N-BITS CHIPZ::N) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (INCF CHIPZ::N-BITS 8) ; --> SETQ THE ; ==> ; (+ 8 CHIPZ::N-BITS) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 8) . #2=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 8) . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (INCF (CHIPZ::BZIP2-STATE-I CHIPZ::STATE)) ; --> LET* ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 48)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (< (INCF (CHIPZ::BZIP2-STATE-I CHIPZ::STATE)) ; (CHIPZ::BZIP2-STATE-ALPHA-SIZE CHIPZ::STATE)) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a NUMBER, not a FIXNUM. ; (INCF (CHIPZ::BZIP2-STATE-J CHIPZ::STATE)) ; --> LET* ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 49)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (< (CHIPZ::BZIP2-STATE-J CHIPZ::STATE) ; (CHIPZ::BZIP2-STATE-N-GROUPS CHIPZ::STATE)) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=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 #1# (cost 3) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; etc. ; (LOOP CHIPZ::WITH CHIPZ::N-GROUPS = (CHIPZ::BZIP2-STATE-N-GROUPS ; CHIPZ::STATE) ; CHIPZ::WITH CHIPZ::LEN = (CHIPZ::BZIP2-STATE-LEN CHIPZ::STATE) ; CHIPZ::FOR CHIPZ::X CHIPZ::FROM ...) ; --> BLOCK LET LET LET TAGBODY WHEN IF ; ==> ; (>= CHIPZ::X #:LOOP-LIMIT-36) ; ; 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. ; (MAX CHIPZ::MAXLEN CHIPZ::XY) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; (MIN CHIPZ::MINLEN CHIPZ::XY) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; (INCF (CHIPZ::BZIP2-STATE-CURRENT-BLOCK-NUMBER CHIPZ::STATE)) ; --> LET* ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 21)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (ASH CHIPZ::CRC32-HI 16) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #2=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do #1# (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #2#), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; (LOGIOR (ASH CHIPZ::CRC32-HI 16) CHIPZ::CRC32-LO) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The second argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The second argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (<= 0 CHIPZ::ORIGINAL-POINTER ; (+ 10 ; (* (CHIPZ::BZIP2-STATE-100K-BLOCK-SIZE CHIPZ::STATE) CHIPZ::+100K+))) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (< (CHIPZ::BZIP2-STATE-I CHIPZ::STATE) 16) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a T, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a T, not a FIXNUM. ; etc. ; (LOGBITP (CHIPZ::BZIP2-STATE-I CHIPZ::STATE) CHIPZ::IN-USE-16) ; --> MULTIPLE-VALUE-BIND LET UNLESS IF AND IF LOCALLY AND THE ; ==> ; (>= (TRULY-THE INTEGER #:G429) 0) ; ; note: forced to do FAST-IF-<-ZERO (cost 9) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a INTEGER, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; (* (CHIPZ::BZIP2-STATE-I CHIPZ::STATE) 16) ; ; note: forced to do GENERIC-* (cost 30) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (+ (* (CHIPZ::BZIP2-STATE-I CHIPZ::STATE) 16) CHIPZ::I) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; etc. ; (INCF (CHIPZ::BZIP2-STATE-I CHIPZ::STATE)) ; --> LET* ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 48)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (<= 2 CHIPZ::N-GROUPS 6) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a (INTEGER 2), not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a (INTEGER 2), not a FIXNUM. ; etc. ; (PLUSP CHIPZ::N-SELECTORS) ; ; note: forced to do FAST-IF->-ZERO (cost 8) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (INCF (CHIPZ::BZIP2-STATE-J CHIPZ::STATE)) ; --> LET* ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 49)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (>= (INCF (CHIPZ::BZIP2-STATE-J CHIPZ::STATE)) ; (CHIPZ::BZIP2-STATE-N-GROUPS CHIPZ::STATE)) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do #1=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 #1# (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 #1=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 #1# (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; (INCF (CHIPZ::BZIP2-STATE-I CHIPZ::STATE)) ; --> LET* ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 48)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (< (INCF (CHIPZ::BZIP2-STATE-I CHIPZ::STATE)) ; (CHIPZ::BZIP2-STATE-N-SELECTORS CHIPZ::STATE)) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; unable to do #1# (cost 3) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; etc. ; (DOTIMES (CHIPZ::I CHIPZ::N-GROUPS) ; (SETF (AREF CHIPZ::POS CHIPZ::I) CHIPZ::I)) ; --> DO BLOCK LET TAGBODY UNLESS IF ; ==> ; (>= CHIPZ::I #:G17) ; ; 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. ; (DOTIMES (CHIPZ::I CHIPZ::N-SELECTORS) ; (LET* ((CHIPZ::V (AREF CHIPZ::SELECTOR-MTF CHIPZ::I)) ; (CHIPZ::TMP (AREF CHIPZ::POS CHIPZ::V))) ; (LOOP CHIPZ::UNTIL (ZEROP CHIPZ::V) ; DO (SETF # #) (DECF CHIPZ::V)) ; (SETF (AREF CHIPZ::POS 0) CHIPZ::TMP) ; (SETF (AREF CHIPZ::SELECTOR-TABLE CHIPZ::I) CHIPZ::TMP))) ; --> DO BLOCK LET TAGBODY UNLESS IF ; ==> ; (>= CHIPZ::I #:G22) ; ; 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. ; (MINUSP (CHIPZ::BZIP2-STATE-ORIGINAL-POINTER CHIPZ::STATE)) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a T, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a T, not a FIXNUM. ; etc. ; (>= (CHIPZ::BZIP2-STATE-ORIGINAL-POINTER CHIPZ::STATE) ; (CHIPZ::BZIP2-STATE-NBLOCK CHIPZ::STATE)) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; (INCF (CHIPZ::BZIP2-STATE-N-BLOCKS-USED CHIPZ::STATE)) ; --> LET* ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 26)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (INCF (CHIPZ::BZIP2-STATE-ES CHIPZ::STATE) ; (* (CHIPZ::BZIP2-STATE-N CHIPZ::STATE) 2)) ; --> LET* ; ==> ; (+ (* (CHIPZ::BZIP2-STATE-N CHIPZ::STATE) 2) ; (SB-KERNEL:THE* (FIXNUM :DERIVE-TYPE-ONLY T) ; (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) ; 59))) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163712 13835058055282163709) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The result is a (VALUES ; (INTEGER -13835058055282163712 13835058055282163709) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; (>= (INCF (CHIPZ::BZIP2-STATE-GROUP-NUMBER CHIPZ::STATE)) ; (CHIPZ::BZIP2-STATE-N-SELECTORS CHIPZ::STATE)) ; ; 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. ; (LOGIOR (ASH (CHIPZ::BZIP2-STATE-ZVEC CHIPZ::STATE) 1) CHIPZ::ZJ) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because: ; The second argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; (INCF (CHIPZ::BZIP2-STATE-ES CHIPZ::STATE) ; (* (CHIPZ::BZIP2-STATE-N CHIPZ::STATE) 2)) ; --> LET* ; ==> ; (+ (* (CHIPZ::BZIP2-STATE-N CHIPZ::STATE) 2) ; (SB-KERNEL:THE* (FIXNUM :DERIVE-TYPE-ONLY T) ; (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) ; 59))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-+ ; processing (DEFUN %BZIP2-DECOMPRESS ...) ; processing (DEFUN MAKE-BZIP2-STATE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/chipz/bzip2-tmpXFTEJBZU.fasl ; compilation finished in 0:00:08.095 ; compiling file "/usr/share/common-lisp/source/chipz/decompress.lisp" (written 21 JAN 2019 01:34:02 AM): ; processing (IN-PACKAGE :CHIPZ) ; processing (DEFGENERIC DECOMPRESS ...) ; processing (DEFUN %DECOMPRESS ...) ; processing (DEFUN MAYBE-SUBSEQ ...) ; processing (DEFUN DECOMPRESS-FUN-FOR-STATE ...) ; processing (DEFUN %DECOMPRESS-FROM-PATHNAME ...) ; processing (DEFMETHOD DECOMPRESS ...) ; processing (DEFMETHOD DECOMPRESS ...) ; processing (DEFMETHOD DECOMPRESS ...) ; processing (DEFUN %DECOMPRESS/NULL-VECTOR ...) ; processing (DEFMETHOD DECOMPRESS ...) ; processing (DEFUN %DECOMPRESS/NULL-STREAM ...) ; processing (DEFMETHOD DECOMPRESS ...) ; processing (DEFUN %DECOMPRESS/VECTOR-VECTOR ...) ; processing (DEFMETHOD DECOMPRESS ...) ; processing (DEFUN %DECOMPRESS/STREAM-VECTOR ...) ; processing (DEFMETHOD DECOMPRESS ...) ; processing (DEFUN %DECOMPRESS/STREAM-STREAM ...) ; processing (DEFMETHOD DECOMPRESS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/chipz/decompress-tmpXHDS9JD.fasl ; compilation finished in 0:00:01.315 ; compiling file "/usr/share/common-lisp/source/chipz/stream.lisp" (written 21 JAN 2019 01:34:02 AM): ; processing (IN-PACKAGE :CHIPZ) ; processing (DEFVAR *BINARY-INPUT-STREAM-CLASS* ...) ; processing (DEFVAR *STREAM-READ-BYTE-FUNCTION* ...) ; processing (DEFVAR *STREAM-READ-SEQUENCE-FUNCTION* ...) ; processing (DEFMACRO DEFINE-STREAM-READ-SEQUENCE ...) ; processing (DEFCLASS DECOMPRESSING-STREAM ...) ; processing (DEFUN MAKE-DECOMPRESSING-STREAM ...) ; processing (DEFUN OUTPUT-AVAILABLE-P ...) ; processing (DEFUN INPUT-AVAILABLE-P ...) ; processing (DEFUN REFILL-STREAM-INPUT-BUFFER ...) ; processing (DEFUN REFILL-STREAM-OUTPUT-BUFFER ...) ; processing (DEFUN READ-AND-DECOMPRESS-BYTE ...) ; processing (DEFUN COPY-EXISTING-OUTPUT ...) ; processing (DEFINE-STREAM-READ-SEQUENCE DECOMPRESSING-STREAM ...) ; file: /usr/share/common-lisp/source/chipz/stream.lisp ; in: DEFINE-STREAM-READ-SEQUENCE DECOMPRESSING-STREAM ; (CALL-NEXT-METHOD) ; ; note: deleting unreachable code ; processing (DEFMETHOD SB-GRAY:STREAM-READ-BYTE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/chipz/stream-tmp7DVUZNNP.fasl ; compilation finished in 0:00:00.635 ; compiling file "/usr/share/common-lisp/source/qmynd/src/pkgdcl.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE QMYND ...) ; processing (DEFPACKAGE QMYND-IMPL ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/pkgdcl-tmpSLELCKLF.fasl ; compilation finished in 0:00:00.015 ; compiling file "/usr/share/common-lisp/source/qmynd/src/common/charsets.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFCONSTANT +MYSQL-CS-COLL-BIG5-CHINESE-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-LATIN2-CZECH-CS+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-DEC8-SWEDISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-CP850-GENERAL-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-LATIN1-GERMAN1-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-HP8-ENGLISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-KOI8R-GENERAL-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-LATIN1-SWEDISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-LATIN2-GENERAL-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-SWE7-SWEDISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-ASCII-GENERAL-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UJIS-JAPANESE-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-SJIS-JAPANESE-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-CP1251-BULGARIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-LATIN1-DANISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-HEBREW-GENERAL-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-WIN1251+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-TIS620-THAI-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-EUCKR-KOREAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-LATIN7-ESTONIAN-CS+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-LATIN2-HUNGARIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-KOI8U-GENERAL-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-CP1251-UKRAINIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-GB2312-CHINESE-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-GREEK-GENERAL-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-CP1250-GENERAL-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-LATIN2-CROATIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-GBK-CHINESE-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-CP1257-LITHUANIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-LATIN5-TURKISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-LATIN1-GERMAN2-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-ARMSCII8-GENERAL-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-GENERAL-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-CP1250-CZECH-CS+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-GENERAL-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-CP866-GENERAL-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-KEYBCS2-GENERAL-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-MACCE-GENERAL-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-MACROMAN-GENERAL-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-CP852-GENERAL-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-LATIN7-GENERAL-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-LATIN7-GENERAL-CS+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-MACCE-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-CP1250-CROATIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB4-GENERAL-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB4-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-LATIN1-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-LATIN1-GENERAL-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-LATIN1-GENERAL-CS+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-CP1251-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-CP1251-GENERAL-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-CP1251-GENERAL-CS+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-MACROMAN-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16-GENERAL-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16LE-GENERAL-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-CP1256-GENERAL-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-CP1257-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-CP1257-GENERAL-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF32-GENERAL-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF32-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16LE-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-ARMSCII8-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-ASCII-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-CP1250-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-CP1256-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-CP866-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-DEC8-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-GREEK-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-HEBREW-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-HP8-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-KEYBCS2-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-KOI8R-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-KOI8U-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-LATIN2-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-LATIN5-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-LATIN7-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-CP850-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-CP852-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-SWE7-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-BIG5-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-EUCKR-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-GB2312-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-GBK-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-SJIS-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-TIS620-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UJIS-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-GEOSTD8-GENERAL-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-GEOSTD8-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-LATIN1-SPANISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-CP932-JAPANESE-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-CP932-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-EUCJPMS-JAPANESE-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-EUCJPMS-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-CP1250-POLISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16-UNICODE-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16-ICELANDIC-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16-LATVIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16-ROMANIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16-SLOVENIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16-POLISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16-ESTONIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16-SPANISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16-SWEDISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16-TURKISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16-CZECH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16-DANISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16-LITHUANIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16-SLOVAK-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16-SPANISH2-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16-ROMAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16-PERSIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16-ESPERANTO-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16-HUNGARIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16-SINHALA-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16-GERMAN2-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16-CROATIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16-UNICODE-520-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF16-VIETNAMESE-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-UNICODE-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-ICELANDIC-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-LATVIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-ROMANIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-SLOVENIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-POLISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-ESTONIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-SPANISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-SWEDISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-TURKISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-CZECH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-DANISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-LITHUANIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-SLOVAK-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-SPANISH2-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-ROMAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-PERSIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-ESPERANTO-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-HUNGARIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-SINHALA-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-GERMAN2-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-CROATIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-UNICODE-520-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-VIETNAMESE-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UCS2-GENERAL-MYSQL500-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF32-UNICODE-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF32-ICELANDIC-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF32-LATVIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF32-ROMANIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF32-SLOVENIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF32-POLISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF32-ESTONIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF32-SPANISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF32-SWEDISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF32-TURKISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF32-CZECH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF32-DANISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF32-LITHUANIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF32-SLOVAK-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF32-SPANISH2-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF32-ROMAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF32-PERSIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF32-ESPERANTO-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF32-HUNGARIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF32-SINHALA-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF32-GERMAN2-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF32-CROATIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF32-UNICODE-520-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF32-VIETNAMESE-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-UNICODE-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-ICELANDIC-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-LATVIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-ROMANIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-SLOVENIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-POLISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-ESTONIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-SPANISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-SWEDISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-TURKISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-CZECH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-DANISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-LITHUANIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-SLOVAK-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-SPANISH2-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-ROMAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-PERSIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-ESPERANTO-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-HUNGARIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-SINHALA-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-GERMAN2-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-CROATIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-UNICODE-520-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-VIETNAMESE-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8-GENERAL-MYSQL500-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB4-UNICODE-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB4-ICELANDIC-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB4-LATVIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB4-ROMANIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB4-SLOVENIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB4-POLISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB4-ESTONIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB4-SPANISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB4-SWEDISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB4-TURKISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB4-CZECH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB4-DANISH-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB4-LITHUANIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB4-SLOVAK-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB4-SPANISH2-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB4-ROMAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB4-PERSIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB4-ESPERANTO-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB4-HUNGARIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB4-SINHALA-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB4-GERMAN2-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB4-CROATIAN-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB4-UNICODE-520-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB4-VIETNAMESE-CI+ ...) ; processing (DEFCONSTANT +MYSQL-CS-COLL-UTF8MB3-GENERAL-CS+ ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/common/charsets-tmpRFCZGW36.fasl ; compilation finished in 0:00:00.063 ; compiling file "/usr/share/common-lisp/source/qmynd/src/common/constants.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFCONSTANT +MYSQL-COMMAND-SLEEP+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-QUIT+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-INITIALIZE-DATABASE+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-QUERY+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-FIELD-LIST+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-CREATE-DATABASE+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-DROP-DATABASE+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-REFRESH+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-SHUTDOWN+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-STATISTICS+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-PROCESS-INFORMATION+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-CONNECT+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-PROCESS-KILL+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-DEBUG+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-PING+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-TIME+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-DELAYED-INSERT+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-CHANGE-USER+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-DAEMON+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-STATEMENT-PREPARE+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-STATEMENT-EXECUTE+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-STATEMENT-SEND-LONG-DATA+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-STATEMENT-CLOSE+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-STATEMENT-RESET+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-SET-OPTION+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-STATEMENT-FETCH+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-BINARY-LOG-DUMP+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-TABLE-DUMP+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-CONNECT-OUT+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-REGISTER-SLAVE+ ...) ; processing (DEFCONSTANT +MYSQL-COMMAND-BINARY-LOG-DUMP-GTID+ ...) ; processing (DEFCONSTANT +MYSQL-RESPONSE-OK+ ...) ; processing (DEFCONSTANT +MYSQL-RESPONSE-END-OF-FILE+ ...) ; processing (DEFCONSTANT +MYSQL-RESPONSE-ERROR+ ...) ; processing (DEFCONSTANT +MYSQL-SHUTDOWN-DEFAULT+ ...) ; processing (DEFCONSTANT +MYSQL-SHUTDOWN-WAIT-CONNECTIONS+ ...) ; processing (DEFCONSTANT +MYSQL-SHUTDOWN-WAIT-TRANSACTIONS+ ...) ; processing (DEFCONSTANT +MYSQL-SHUTDOWN-WAIT-UPDATES+ ...) ; processing (DEFCONSTANT +MYSQL-SHUTDOWN-WAIT-ALL-BUFFERS+ ...) ; processing (DEFCONSTANT +MYSQL-SHUTDOWN-WAIT-CRITICAL-BUFFERS+ ...) ; processing (DEFCONSTANT +MYSQL-SHUTDOWN-KILL-QUERY+ ...) ; processing (DEFCONSTANT +MYSQL-SHUTDOWN-KILL-CONNECTION+ ...) ; processing (DEFCONSTANT +MYSQL-CAPABILITY-CLIENT-LONG-PASSWORD+ ...) ; processing (DEFCONSTANT +MYSQL-CAPABILITY-CLIENT-FOUND-ROWS+ ...) ; processing (DEFCONSTANT +MYSQL-CAPABILITY-CLIENT-LONG-FLAG+ ...) ; processing (DEFCONSTANT +MYSQL-CAPABILITY-CLIENT-CONNECT-WITH-DB+ ...) ; processing (DEFCONSTANT +MYSQL-CAPABILITY-CLIENT-NO-SCHEMA+ ...) ; processing (DEFCONSTANT +MYSQL-CAPABILITY-CLIENT-COMPRESS+ ...) ; processing (DEFCONSTANT +MYSQL-CAPABILITY-CLIENT-ODBC+ ...) ; processing (DEFCONSTANT +MYSQL-CAPABILITY-CLIENT-LOCAL-FILES+ ...) ; processing (DEFCONSTANT +MYSQL-CAPABILITY-CLIENT-IGNORE-SPACE+ ...) ; processing (DEFCONSTANT +MYSQL-CAPABILITY-CLIENT-PROTOCOL-41+ ...) ; processing (DEFCONSTANT +MYSQL-CAPABILITY-CLIENT-INTERACTIVE+ ...) ; processing (DEFCONSTANT +MYSQL-CAPABILITY-CLIENT-SSL+ ...) ; processing (DEFCONSTANT +MYSQL-CAPABILITY-CLIENT-IGNORE-SIGPIPE+ ...) ; processing (DEFCONSTANT +MYSQL-CAPABILITY-CLIENT-TRANSACTIONS+ ...) ; processing (DEFCONSTANT +MYSQL-CAPABILITY-CLIENT-RESERVED+ ...) ; processing (DEFCONSTANT +MYSQL-CAPABILITY-CLIENT-SECURE-CONNECTION+ ...) ; processing (DEFCONSTANT +MYSQL-CAPABILITY-CLIENT-MULTI-STATEMENTS+ ...) ; processing (DEFCONSTANT +MYSQL-CAPABILITY-CLIENT-MULTI-RESULTS+ ...) ; processing (DEFCONSTANT +MYSQL-CAPABILITY-CLIENT-PS-MULTI-RESULTS+ ...) ; processing (DEFCONSTANT +MYSQL-CAPABILITY-CLIENT-PLUGIN-AUTH+ ...) ; processing (DEFCONSTANT +MYSQL-CAPABILITY-CLIENT-CONNECT-ATTRS+ ...) ; processing (DEFCONSTANT +MYSQL-CAPABILITY-CLIENT-PLUGIN-AUTH-LENEC-CLIENT-DATA+ ...) ; processing (DEFCONSTANT +MYSQL-CAPABILITY-CLIENT-VERIFY-SERVER-CERT+ ...) ; processing (DEFCONSTANT +MYSQL-CAPABILITY-CLIENT-REMEMBER-OPTIONS+ ...) ; processing (DEFCONSTANT +MYSQL-CAPABILITIES-REQUIRED+ ...) ; processing (DEFCONSTANT +MYSQL-SERVER-STATUS-IN-TRANSACTION+ ...) ; processing (DEFCONSTANT +MYSQL-SERVER-STATUS-AUTOCOMMIT+ ...) ; processing (DEFCONSTANT +MYSQL-SERVER-MORE-RESULTS-EXIST+ ...) ; processing (DEFCONSTANT +MYSQL-SERVER-STATUS-NO-GOOD-INDEX-USED+ ...) ; processing (DEFCONSTANT +MYSQL-SERVER-STATUS-NO-INDEX-USED+ ...) ; processing (DEFCONSTANT +MYSQL-SERVER-STATUS-CURSOR-EXISTS+ ...) ; processing (DEFCONSTANT +MYSQL-SERVER-SERVER-STATUS-LAST-ROW-SENT+ ...) ; processing (DEFCONSTANT +MYSQL-SERVER-STATUS-DATABASE-DROPPED+ ...) ; processing (DEFCONSTANT +MYSQL-SERVER-STATUS-NO-BACKSLASH-ESCAPES+ ...) ; processing (DEFCONSTANT +MYSQL-SERVER-STATUS-METADATA-CHANGED+ ...) ; processing (DEFCONSTANT +MYSQL-SERVER-QUERY-WAS-SLOW+ ...) ; processing (DEFCONSTANT +MYSQL-SERVER-PS-OUT-PARAMS+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-DECIMAL+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-TINY+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-SHORT+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-LONG+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-FLOAT+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-DOUBLE+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-NULL+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-TIMESTAMP+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-LONGLONG+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-INT24+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-DATE+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-TIME+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-DATETIME+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-YEAR+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-NEWDATE+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-VARCHAR+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-BIT+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-NEWDECIMAL+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-ENUM+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-SET+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-TINY-BLOB+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-MEDIUM-BLOB+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-LONG-BLOB+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-BLOB+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-VAR-STRING+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-STRING+ ...) ; processing (DEFCONSTANT +MYSQL-TYPE-GEOMETRY+ ...) ; processing (DEFCONSTANT +MYSQL-FLAG-COLUMN-NON-NULLABLE+ ...) ; processing (DEFCONSTANT +MYSQL-FLAG-COLUMN-PRIMARY-KEY+ ...) ; processing (DEFCONSTANT +MYSQL-FLAG-COLUMN-UNIQUE-KEY+ ...) ; processing (DEFCONSTANT +MYSQL-FLAG-COLUMN-MULTIPLE-KEY+ ...) ; processing (DEFCONSTANT +MYSQL-FLAG-COLUMN-BLOB+ ...) ; processing (DEFCONSTANT +MYSQL-FLAG-COLUMN-UNSIGNED+ ...) ; processing (DEFCONSTANT +MYSQL-FLAG-COLUMN-ZERO-FILL+ ...) ; processing (DEFCONSTANT +MYSQL-FLAG-COLUMN-BINARY+ ...) ; processing (DEFCONSTANT +MYSQL-REFRESH-GRANT+ ...) ; processing (DEFCONSTANT +MYSQL-REFRESH-LOG+ ...) ; processing (DEFCONSTANT +MYSQL-REFRESH-TABLES+ ...) ; processing (DEFCONSTANT +MYSQL-REFRESH-HOSTS+ ...) ; processing (DEFCONSTANT +MYSQL-REFRESH-STATUS+ ...) ; processing (DEFCONSTANT +MYSQL-REFRESH-THREADS+ ...) ; processing (DEFCONSTANT +MYSQL-REFRESH-SLAVE+ ...) ; processing (DEFCONSTANT +MYSQL-REFRESH-MASTER+ ...) ; processing (DEFCONSTANT +SECONDS-PER-MINUTE+ ...) ; processing (DEFCONSTANT +MINUTES-PER-HOUR+ ...) ; processing (DEFCONSTANT +HOURS-PER-DAY+ ...) ; processing (DEFCONSTANT +MYSQL-MINIMUM-COMPRESSION-LENGTH+ ...) ; processing (DEFUN MYSQL-CAPABILITIES-SUPPORTED ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/common/constants-tmpQPTRRFAI.fasl ; compilation finished in 0:00:00.043 ; compiling file "/usr/share/common-lisp/source/qmynd/src/common/conditions.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFINE-CONDITION MYSQL-BASE-ERROR ...) ; processing (DEFINE-CONDITION MYSQL-INTERNAL-ERROR ...) ; processing (DEFINE-CONDITION MYSQL-EXTERNAL-ERROR ...) ; processing (DEFINE-CONDITION BAD-MYSQL-TYPE-SPEC ...) ; processing (DEFINE-CONDITION INVALID-LENGTH-ENCODED-INTEGER ...) ; processing (DEFINE-CONDITION UNEXPECTED-SEQUENCE-ID ...) ; processing (DEFINE-CONDITION MYSQL-ERROR ...) ; processing (DEFINE-CONDITION SSL-NOT-SUPPORTED ...) ; processing (DEFINE-CONDITION INVALID-PREPARED-STATEMENT ...) ; processing (DEFINE-CONDITION UNEXPECTED-PARAMETER-COUNT ...) ; processing (DEFINE-CONDITION MYSQL-INSUFFICIENT-CAPABILITIES ...) ; processing (DEFINE-CONDITION MYSQL-UNSUPPORTED-AUTHENTICATION ...) ; processing (DEFINE-CONDITION UNEXPECTED-PACKET ...) ; processing (DEFINE-CONDITION VALUE-IS-NOT-DECIMAL ...) ; processing (DEFINE-CONDITION PROTOCOL-VERSION-MISMATCH ...) ; processing (DEFINE-CONDITION PARTIAL-READ ...) ; processing (DEFINE-CONDITION DECODING-ERROR ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/common/conditions-tmpVZ9V8GEH.fasl ; compilation finished in 0:00:00.091 ; compiling file "/usr/share/common-lisp/source/qmynd/src/common/feature-detection.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFUN HAVE-SSL ...) ; processing (DEFUN HAVE-COMPRESSION ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/common/feature-detection-tmpI0YDSDVA.fasl ; compilation finished in 0:00:00.023 ; compiling file "/usr/share/common-lisp/source/qmynd/src/common/utilities.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFPARAMETER +OPTIMIZE-DEFAULT+ ...) ; processing (DEFPARAMETER +OPTIMIZE-FAST-UNSAFE+ ...) ; processing (DEFMACRO I+ ...) ; processing (DEFMACRO I- ...) ; processing (DEFMACRO I* ...) ; processing (DEFMACRO I= ...) ; processing (DEFMACRO I< ...) ; processing (DEFMACRO I<= ...) ; processing (DEFMACRO I> ...) ; processing (DEFMACRO I>= ...) ; processing (DEFMACRO IASH ...) ; processing (DEFMACRO ILOGIOR ...) ; processing (DEFMACRO ILOGAND ...) ; processing (DEFINE-MODIFY-MACRO IINCF ...) ; processing (DEFINE-MODIFY-MACRO IDECF ...) ; processing (DEFMACRO ILDB ...) ; processing (DEFMACRO WITH-GENSYMS ...) ; processing (DEFUN MAKE-LISP-SYMBOL ...) ; processing (DEFUN FINTERN ...) ; processing (DEFUN KINTERN ...) ; processing (DEFUN KEYWORDIFY ...) ; processing (DEFMACRO WITH-PREFIXED-ACCESSORS ...) ; processing (DEFUN CURRY ...) ; processing (DEFINE-COMPILER-MACRO CURRY ...) ; processing (DEFUN PARSE-DECIMAL ...) ; processing (DEFUN %DENOMINATOR-DIVISIBLE-BY-2-OR-5-ONLY ...) ; processing (DEFUN WRITE-DECIMAL-TO-STRING ...) ; processing (DEFUN SINGLE-FLOAT-BITS ...) ; processing (DEFUN DOUBLE-FLOAT-BITS ...) ; processing (DEFUN MAKE-SINGLE-FLOAT ...) ; processing (DEFUN MAKE-DOUBLE-FLOAT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/common/utilities-tmpKLR0OPN5.fasl ; compilation finished in 0:00:01.359 ; compiling file "/usr/share/common-lisp/source/qmynd/src/common/date-time.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFCLASS MYSQL-DATE-TIME ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN MYSQL-DATE-TIME-TO-UNIVERSAL-TIME ...) ; processing (DEFUN UNIVERSAL-TIME-TO-MYSQL-DATE-TIME ...) ; processing (DEFUN PARSE-DATE-TIME-STRING ...) ; processing (DEFCLASS MYSQL-TIME-INTERVAL ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN MYSQL-TIME-INTERVAL-TO-SECONDS ...) ; processing (DEFUN SECONDS-TO-MYSQL-TIME-INTERVAL ...) ; processing (DEFUN PARSE-TIME-INTERVAL-STRING ...) ; processing (DEFCLASS MYSQL-YEAR ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/common/date-time-tmpQNILNMER.fasl ; compilation finished in 0:00:00.527 ; compiling file "/usr/share/common-lisp/source/qmynd/src/common/misc.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFUN MYSQL-CS-COLL-TO-CHARACTER-ENCODING ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/common/misc-tmpMAMO3XGR.fasl ; compilation finished in 0:00:00.387 ; compiling file "/usr/share/common-lisp/source/qmynd/src/wire-protocol/wire-packet.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFCONSTANT +MAX-PACKET-LENGTH+ ...) ; processing (DEFVAR *MAX-ALLOWED-PACKETS* ...) ; processing (DEFSTRUCT (MY-PACKET-STREAM #) ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN READ-WIRE-PACKET ...) ; processing (DECLAIM (INLINE %READ-3-OCTETS)) ; processing (DEFUN %READ-3-OCTETS ...) ; processing (DEFUN PREPARE-NEXT-CHUNK ...) ; processing (DECLAIM (INLINE MAYBE-READ-NEXT-CHUNK)) ; processing (DEFUN MAYBE-READ-NEXT-CHUNK ...) ; processing (DEFUN READ-MY-OCTET ...) ; processing (DEFUN PEEK-FIRST-OCTET ...) ; processing (DEFUN READ-MY-SEQUENCE ...) ; processing (DEFUN CONCATENATE-VECTORS ...) ; processing (DEFUN READ-WHOLE-CHUNK ...) ; processing (DEFUN READ-REST-OF-PACKET-OCTETS ...) ; processing (DEFUN WRITE-WIRE-PACKET ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/wire-protocol/wire-packet-tmp4CBIDXQU.fasl ; compilation finished in 0:00:00.591 ; compiling file "/usr/share/common-lisp/source/qmynd/src/wire-protocol/basic-types.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFINE-COMPILER-MACRO READ-FIXED-LENGTH-INTEGER ...) ; processing (DEFUN READ-FIXED-LENGTH-INTEGER ...) ; processing (DECLAIM (INLINE UNSIGNED-TO-SIGNED ...)) ; processing (DEFUN UNSIGNED-TO-SIGNED ...) ; processing (DEFUN READ-1-OCTET-INTEGER ...) ; processing (DEFUN READ-2-OCTETS-INTEGER ...) ; processing (DEFUN READ-3-OCTETS-INTEGER ...) ; processing (DEFUN READ-4-OCTETS-INTEGER ...) ; processing (DEFUN READ-6-OCTETS-INTEGER ...) ; processing (DEFUN READ-8-OCTETS-INTEGER ...) ; processing (DEFUN READ-10-OCTETS-INTEGER ...) ; processing (DEFUN WRITE-FIXED-LENGTH-INTEGER ...) ; processing (DEFUN READ-LENGTH-ENCODED-INTEGER ...) ; processing (DEFUN WRITE-LENGTH-ENCODED-INTEGER ...) ; processing (DEFUN READ-FIXED-LENGTH-OCTETS ...) ; processing (DEFUN READ-NULL-TERMINATED-OCTETS ...) ; processing (DEFUN WRITE-NULL-TERMINATED-OCTETS ...) ; processing (DEFUN READ-LENGTH-ENCODED-OCTETS ...) ; processing (DEFUN WRITE-LENGTH-ENCODED-OCTETS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/wire-protocol/basic-types-tmp4M6Z7O9T.fasl ; compilation finished in 0:00:00.883 ; compiling file "/usr/share/common-lisp/source/qmynd/src/wire-protocol/compressed-protocol.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFUN READ-COMPRESSED-WIRE-PACKET ...) ; processing (DEFUN WRITE-COMPRESSED-WIRE-PACKET ...) ; processing (DEFCLASS MYSQL-COMPRESSED-STREAM ...) ; processing (DEFUN FILL-INPUT-BUFFER ...) ; processing (DEFMETHOD SB-GRAY:STREAM-LISTEN ...) ; processing (DEFMETHOD SB-GRAY:STREAM-READ-BYTE ...) ; processing (DEFMETHOD TRIVIAL-GRAY-STREAMS:STREAM-READ-SEQUENCE ...) ; processing (DEFMETHOD SB-GRAY:STREAM-WRITE-BYTE ...) ; processing (DEFMETHOD TRIVIAL-GRAY-STREAMS:STREAM-WRITE-SEQUENCE ...) ; processing (DEFMETHOD SB-GRAY:STREAM-FORCE-OUTPUT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/wire-protocol/compressed-protocol-tmp3RKO0O0S.fasl ; compilation finished in 0:00:00.347 ; compiling file "/usr/share/common-lisp/source/qmynd/src/mysql-protocol/define-packet.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFCLASS PACKET-SLOT ...) ; processing (DEFUN PARSE-SLOT ...) ; processing (DEFUN EMIT-PACKET-SLOT-LISP-TYPE ...) ; processing (DEFUN EMIT-PACKET-STRUCT ...) ; processing (DEFUN EMIT-PACKET-PARSER-SLOT-READER ...) ; processing (DEFUN EMIT-PACKET-PARSER-SLOT ...) ; processing (DEFUN EMIT-PACKET-PARSER ...) ; processing (DEFMACRO DEFINE-PACKET ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/define-packet-tmpJNADND61.fasl ; compilation finished in 0:00:00.251 ; compiling file "/usr/share/common-lisp/source/qmynd/src/mysql-protocol/connection.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFVAR *MYSQL-CONNECTION* ...) ; processing (DEFVAR *MYSQL-ENCODING* ...) ; processing (DEFMACRO WITH-MYSQL-CONNECTION ...) ; processing (DEFCLASS MYSQL-BASE-CONNECTION ...) ; processing (DEFGENERIC MYSQL-CONNECTION-CLOSE-SOCKET ...) ; processing (DEFCLASS MYSQL-INET-CONNECTION ...) ; processing (DEFMETHOD MYSQL-CONNECTION-CLOSE-SOCKET ...) ; processing (DEFCLASS MYSQL-LOCAL-CONNECTION ...) ; processing (DEFMETHOD MYSQL-CONNECTION-CLOSE-SOCKET ...) ; processing (DEFMETHOD MYSQL-CONNECTION-REMOVE-STALE-PREPARED-STATEMENTS ...) ; processing (DEFUN FLAGSP ...) ; processing (DEFMETHOD MYSQL-CONNECTION-HAS-STATUS ...) ; processing (DEFMETHOD MYSQL-CONNECTION-HAS-CAPABILITY ...) ; processing (DEFMETHOD MYSQL-CONNECTION-HAS-SOME-CAPABILITY ...) ; processing (DEFUN MYSQL-HAS-CAPABILITY ...) ; processing (DEFUN MYSQL-HAS-SOME-CAPABILITY ...) ; processing (DEFUN MYSQL-ADD-REQUIRED-CAPABILITY ...) ; processing (DEFMETHOD MYSQL-CONNECTION-WRITE-PACKET ...) ; processing (DEFMETHOD MYSQL-CONNECTION-READ-PACKET ...) ; processing (DEFMETHOD MYSQL-CONNECTION-COMMAND-INIT ...) ; processing (DEFUN MYSQL-COMMAND-INIT ...) ; processing (DEFUN MYSQL-CURRENT-COMMAND-P ...) ; processing (DEFUN MYSQL-WRITE-PACKET ...) ; processing (DEFUN MYSQL-READ-PACKET ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/connection-tmpKEV7GFR4.fasl ; compilation finished in 0:00:00.275 ; compiling file "/usr/share/common-lisp/source/qmynd/src/mysql-protocol/response-packets.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFINE-PACKET RESPONSE-OK ...) ; processing (DEFINE-PACKET RESPONSE-ERROR-NO-SQL-STATE ...) ; processing (DEFINE-PACKET RESPONSE-ERROR ...) ; processing (DEFINE-PACKET RESPONSE-END-OF-FILE ...) ; processing (DEFUN PARSE-RESPONSE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/response-packets-tmp13EJYBWB.fasl ; compilation finished in 0:00:01.227 ; compiling file "/usr/share/common-lisp/source/qmynd/src/mysql-protocol/authentication.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFUN MYSQL-WEAK-HASH-PASSWORD ...) ; processing (DEFSTRUCT MYSQL-RAND-ST ...) ; processing (DEFUN MYSQL-OLD-RANDOM-INIT ...) ; processing (DEFUN MY-RND ...) ; processing (DEFUN MYSQL-OLD-PASSWORD-AUTH-RESPONSE ...) ; processing (DEFUN MYSQL-NATIVE-PASSWORD-AUTH-RESPONSE ...) ; processing (DEFUN MYSQL-CLEAR-PASSWORD-AUTH-RESPONSE ...) ; processing (DEFUN GENERATE-AUTH-RESPONSE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/authentication-tmp93YER753.fasl ; compilation finished in 0:00:00.347 ; compiling file "/usr/share/common-lisp/source/qmynd/src/mysql-protocol/handshake.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFINE-PACKET INITIAL-HANDSHAKE-V10 ...) ; processing (DEFINE-PACKET AUTH-SWITCH-REQUEST ...) ; processing (DEFINE-PACKET OLD-AUTH-SWITCH-REQUEST ...) ; processing (DEFUN SEND-AUTH-SWITCH-RESPONSE ...) ; processing (DEFUN PROCESS-INITIAL-HANDSHAKE-V10 ...) ; processing (DEFUN SEND-SSL-REQUEST-PACKET ...) ; processing (DEFUN SEND-HANDSHAKE-RESPONSE-41 ...) ; processing (DEFUN PROCESS-INITIAL-HANDSHAKE-PAYLOAD ...) ; processing (DEFUN MYSQL-CONNECT-DO-HANDSHAKE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/handshake-tmpB50UYUD7.fasl ; compilation finished in 0:00:00.839 ; compiling file "/usr/share/common-lisp/source/qmynd/src/mysql-protocol/response-result-set.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFUN PARSE-COLUMN-COUNT ...) ; processing (DEFINE-PACKET COLUMN-DEFINITION-V41 ...) ; file: /usr/share/common-lisp/source/qmynd/src/mysql-protocol/response-result-set.lisp ; in: DEFINE-PACKET COLUMN-DEFINITION-V41 ; (QMYND-IMPL:DEFINE-PACKET QMYND-IMPL::COLUMN-DEFINITION-V41 ; ((QMYND-IMPL::CATALOG :MYSQL-TYPE (STRING :LENENC)) ; (QMYND-IMPL::SCHEMA :MYSQL-TYPE (STRING :LENENC)) ; (QMYND-IMPL::TABLE :MYSQL-TYPE (STRING :LENENC)) ; (QMYND-IMPL::ORG-TABLE :MYSQL-TYPE ; (STRING :LENENC)) ; (QMYND-IMPL::NAME :MYSQL-TYPE (STRING :LENENC)) ; (QMYND-IMPL::ORG-NAME :MYSQL-TYPE ; (STRING :LENENC)) ; (QMYND-IMPL::LEN-FIXED-FIELDS :MYSQL-TYPE ; (INTEGER :LENENC) :VALUE 12 :TRANSIENT T :BIND ; NIL) ; (QMYND-IMPL::CS-COLL :MYSQL-TYPE (INTEGER 2)) ; (QMYND-IMPL::COLUMN-LENGTH :MYSQL-TYPE ; (INTEGER 4)) ; (TYPE :MYSQL-TYPE (INTEGER 1)) ; (QMYND-IMPL::FLAGS :MYSQL-TYPE (INTEGER 2)) ; (QMYND-IMPL::DECIMALS :MYSQL-TYPE (INTEGER 1)) ; ...)) ; --> PROGN EVAL-WHEN DEFSTRUCT PROGN EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '# ; '#(# ; #)) ; ; caught STYLE-WARNING: ; Previously compiled calls to QMYND-IMPL::COLUMN-DEFINITION-V41-PACKET-SCHEMA, ; QMYND-IMPL::COLUMN-DEFINITION-V41-PACKET-TABLE, ; QMYND-IMPL::COLUMN-DEFINITION-V41-PACKET-NAME and ; QMYND-IMPL::COLUMN-DEFINITION-V41-PACKET-CS-COLL could not be inlined because ; the structure definition for QMYND-IMPL::COLUMN-DEFINITION-V41-PACKET was not ; yet seen. To avoid this warning, DEFSTRUCT should precede references to the ; affected functions, or they must be declared locally notinline at each call ; site. ; processing (DEFUN COLUMN-DEFINITION-TYPE ...) ; processing (DEFUN COLUMN-DEFINITION-ENCODING ...) ; processing (DECLAIM (INLINE PARSE-TEXT-PROTOCOL-RESULT-COLUMN-AS-TEXT)) ; processing (DEFUN PARSE-RESULTSET-ROW-AS-VECTOR ...) ; file: /usr/share/common-lisp/source/qmynd/src/mysql-protocol/response-result-set.lisp ; in: DEFUN PARSE-RESULTSET-ROW-AS-VECTOR ; (= QMYND-IMPL::TAG QMYND-IMPL::+MYSQL-RESPONSE-END-OF-FILE+) ; ; 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. ; (= QMYND-IMPL::TAG QMYND-IMPL::+MYSQL-RESPONSE-ERROR+) ; ; 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. ; (LOOP QMYND-IMPL::FOR QMYND-IMPL::I FIXNUM QMYND-IMPL::FROM 0 QMYND-IMPL::BELOW QMYND-IMPL::COLUMN-COUNT ; QMYND-IMPL::FOR QMYND-IMPL::DEF QMYND-IMPL::ACROSS QMYND-IMPL::COLUMN-DEFINITIONS ...) ; --> BLOCK LET LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE ; ==> ; (AREF #:LOOP-ACROSS-VECTOR-2 #:LOOP-ACROSS-INDEX-3) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (< (QMYND-IMPL::MY-LEN STREAM) 9) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a INTEGER, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; etc. ; processing (DEFUN PARSE-RESULTSET-ROW-AS-TEXT-VECTOR ...) ; file: /usr/share/common-lisp/source/qmynd/src/mysql-protocol/response-result-set.lisp ; in: DEFUN PARSE-RESULTSET-ROW-AS-TEXT-VECTOR ; (= QMYND-IMPL::TAG QMYND-IMPL::+MYSQL-RESPONSE-END-OF-FILE+) ; ; 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. ; (= QMYND-IMPL::TAG QMYND-IMPL::+MYSQL-RESPONSE-ERROR+) ; ; 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. ; (LOOP QMYND-IMPL::FOR QMYND-IMPL::I FIXNUM QMYND-IMPL::FROM 0 QMYND-IMPL::BELOW QMYND-IMPL::COLUMN-COUNT ; QMYND-IMPL::FOR QMYND-IMPL::DEF QMYND-IMPL::ACROSS QMYND-IMPL::COLUMN-DEFINITIONS ...) ; --> BLOCK LET LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE ; ==> ; (AREF #:LOOP-ACROSS-VECTOR-2 #:LOOP-ACROSS-INDEX-3) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (< (QMYND-IMPL::MY-LEN STREAM) 9) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a INTEGER, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; etc. ; (DEFUN QMYND-IMPL::PARSE-RESULTSET-ROW-AS-TEXT-VECTOR ; (QMYND-IMPL::COLUMN-COUNT QMYND-IMPL::COLUMN-DEFINITIONS) ; (DECLARE (OPTIMIZE SPEED)) ; (LET* ((STREAM (QMYND-IMPL:MYSQL-READ-PACKET)) ; (QMYND-IMPL::TAG (QMYND-IMPL::PEEK-FIRST-OCTET STREAM)) ; (QMYND-IMPL::ROW ; (MAKE-ARRAY QMYND-IMPL::COLUMN-COUNT :INITIAL-ELEMENT NIL))) ; (IF (OR (AND # #) (= QMYND-IMPL::TAG QMYND-IMPL::+MYSQL-RESPONSE-ERROR+)) ; (QMYND-IMPL:PARSE-RESPONSE STREAM) ; (LOOP QMYND-IMPL::FOR QMYND-IMPL::I FIXNUM QMYND-IMPL::FROM 0 QMYND-IMPL::BELOW QMYND-IMPL::COLUMN-COUNT ; QMYND-IMPL::FOR QMYND-IMPL::DEF QMYND-IMPL::ACROSS QMYND-IMPL::COLUMN-DEFINITIONS ...)))) ; --> PROGN ; ==> ; (SB-IMPL::%DEFUN 'QMYND-IMPL::PARSE-RESULTSET-ROW-AS-TEXT-VECTOR ; (SB-INT:NAMED-LAMBDA QMYND-IMPL::PARSE-RESULTSET-ROW-AS-TEXT-VECTOR ; (QMYND-IMPL::COLUMN-COUNT QMYND-IMPL::COLUMN-DEFINITIONS) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (DECLARE (OPTIMIZE SPEED)) ; (BLOCK QMYND-IMPL::PARSE-RESULTSET-ROW-AS-TEXT-VECTOR ; (LET* (# # #) ; (IF # ; # ; #))))) ; ; caught STYLE-WARNING: ; Call to QMYND-IMPL::PARSE-TEXT-PROTOCOL-RESULT-COLUMN-AS-TEXT could not be ; inlined because no definition for it was seen prior to its first use. ; processing (DEFUN PARSE-RESULTSET-ROW-AS-LIST ...) ; file: /usr/share/common-lisp/source/qmynd/src/mysql-protocol/response-result-set.lisp ; in: DEFUN PARSE-RESULTSET-ROW-AS-LIST ; (= QMYND-IMPL::TAG QMYND-IMPL::+MYSQL-RESPONSE-END-OF-FILE+) ; ; 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. ; (= QMYND-IMPL::TAG QMYND-IMPL::+MYSQL-RESPONSE-ERROR+) ; ; 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. ; (LOOP QMYND-IMPL::FOR QMYND-IMPL::I FIXNUM QMYND-IMPL::FROM 0 QMYND-IMPL::BELOW QMYND-IMPL::COLUMN-COUNT ; QMYND-IMPL::FOR QMYND-IMPL::DEF QMYND-IMPL::ACROSS QMYND-IMPL::COLUMN-DEFINITIONS ...) ; --> BLOCK LET LET LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* ; --> TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE ; ==> ; (AREF #:LOOP-ACROSS-VECTOR-2 #:LOOP-ACROSS-INDEX-3) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (< (QMYND-IMPL::MY-LEN STREAM) 9) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a INTEGER, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; etc. ; processing (DEFUN PARSE-RESULTSET-ROW-AS-TEXT-LIST ...) ; file: /usr/share/common-lisp/source/qmynd/src/mysql-protocol/response-result-set.lisp ; in: DEFUN PARSE-RESULTSET-ROW-AS-TEXT-LIST ; (= QMYND-IMPL::TAG QMYND-IMPL::+MYSQL-RESPONSE-END-OF-FILE+) ; ; 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. ; (= QMYND-IMPL::TAG QMYND-IMPL::+MYSQL-RESPONSE-ERROR+) ; ; 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. ; (LOOP QMYND-IMPL::FOR QMYND-IMPL::I FIXNUM QMYND-IMPL::FROM 0 QMYND-IMPL::BELOW QMYND-IMPL::COLUMN-COUNT ; QMYND-IMPL::FOR QMYND-IMPL::DEF QMYND-IMPL::ACROSS QMYND-IMPL::COLUMN-DEFINITIONS ...) ; --> BLOCK LET LET LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* ; --> TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE ; ==> ; (AREF #:LOOP-ACROSS-VECTOR-2 #:LOOP-ACROSS-INDEX-3) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (< (QMYND-IMPL::MY-LEN STREAM) 9) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a INTEGER, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; etc. ; processing (DECLAIM (INLINE PARSE-RESULTSET-ROW-AS-LIST ...)) ; processing (DEFUN MAP-RESULTSET-ROWS ...) ; processing (DEFUN PARSE-RESULTSET-ROWS ...) ; processing (DEFUN DECODE-OCTETS-TO-STRING ...) ; processing (DEFUN PARSE-TEXT-PROTOCOL-RESULT-COLUMN-AS-TEXT ...) ; processing (DEFUN PARSE-TEXT-PROTOCOL-RESULT-COLUMN ...) ; processing (DEFUN PARSE-BINARY-RESULTSET-ROWS ...) ; file: /usr/share/common-lisp/source/qmynd/src/mysql-protocol/response-result-set.lisp ; in: DEFUN PARSE-BINARY-RESULTSET-ROWS ; (DEFUN QMYND-IMPL:PARSE-BINARY-RESULTSET-ROWS ; (QMYND-IMPL::COLUMN-COUNT QMYND-IMPL::COLUMN-DEFINITIONS) ; (FLET ((QMYND-IMPL::PARSE-BINARY-RESULTSET-ROW () ; (LET* # ; #))) ; (COERCE ; (LOOP QMYND-IMPL::FOR QMYND-IMPL::ROW = (QMYND-IMPL::PARSE-BINARY-RESULTSET-ROW) QMYND-IMPL::THEN (QMYND-IMPL::PARSE-BINARY-RESULTSET-ROW) ; QMYND-IMPL::UNTIL (TYPEP QMYND-IMPL::ROW ; 'QMYND-IMPL::RESPONSE-END-OF-FILE-PACKET) ; QMYND-IMPL::COLLECT QMYND-IMPL::ROW) ; 'VECTOR))) ; --> PROGN ; ==> ; (SB-IMPL::%DEFUN 'QMYND-IMPL:PARSE-BINARY-RESULTSET-ROWS ; (SB-INT:NAMED-LAMBDA QMYND-IMPL:PARSE-BINARY-RESULTSET-ROWS ; (QMYND-IMPL::COLUMN-COUNT QMYND-IMPL::COLUMN-DEFINITIONS) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK QMYND-IMPL:PARSE-BINARY-RESULTSET-ROWS ; (FLET (#) ; (COERCE # 'VECTOR))))) ; ; caught STYLE-WARNING: ; Call to QMYND-IMPL::READ-FIXED-LENGTH-INTEGER could not be inlined because its ; source code was not saved. A global INLINE or SB-EXT:MAYBE-INLINE proclamation ; must be in effect to save function definitions for inlining. ; processing (DEFUN PARSE-BINARY-PROTOCOL-RESULT-COLUMN ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/response-result-set-tmpXO9X6PIG.fasl ; compilation finished in 0:00:01.227 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-quit.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFUN SEND-COMMAND-QUIT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-quit-tmpBULZPU0U.fasl ; compilation finished in 0:00:00.015 ; compiling file "/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-initialize-database.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFUN SEND-COMMAND-INITIALIZE-DATABASE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-initialize-database-tmp7R9QD7N9.fasl ; compilation finished in 0:00:00.015 ; compiling file "/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-query.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFUN SEND-COMMAND-QUERY ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-query-tmpGP8R3FTA.fasl ; compilation finished in 0:00:00.071 ; compiling file "/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-field-list.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFUN SEND-COMMAND-FIELD-LIST ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-field-list-tmp121QKS9N.fasl ; compilation finished in 0:00:00.039 ; compiling file "/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-refresh.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFUN SEND-COMMAND-REFRESH ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-refresh-tmp2JF031K4.fasl ; compilation finished in 0:00:00.023 ; compiling file "/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-shutdown.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFUN SEND-COMMAND-SHUTDOWN ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-shutdown-tmpX1DK061H.fasl ; compilation finished in 0:00:00.027 ; compiling file "/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-statistics.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFUN SEND-COMMAND-STATISTICS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-statistics-tmp4FJCN3GX.fasl ; compilation finished in 0:00:00.035 ; compiling file "/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-process-information.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFUN SEND-COMMAND-PROCESS-INFORMATION ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-process-information-tmpWO4JLIQB.fasl ; compilation finished in 0:00:00.083 ; compiling file "/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-process-kill.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFUN SEND-COMMAND-PROCESS-KILL ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-process-kill-tmpHBCFHPPX.fasl ; compilation finished in 0:00:00.019 ; compiling file "/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-debug.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFUN SEND-COMMAND-DEBUG ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-debug-tmp8ZEXUD27.fasl ; compilation finished in 0:00:00.012 ; compiling file "/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-ping.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFUN SEND-COMMAND-PING ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-ping-tmp95B25LCL.fasl ; compilation finished in 0:00:00.019 ; compiling file "/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-change-user.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFUN SEND-COMMAND-CHANGE-USER ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-change-user-tmpAMNCEZSG.fasl ; compilation finished in 0:00:00.103 ; compiling file "/usr/share/common-lisp/source/qmynd/src/mysql-protocol/prepared-statements/binary-protocol-encoding.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFUN ENCODE-BINARY-PARAMETER ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/prepared-statements/binary-protocol-encoding-tmpVQGQLFW2.fasl ; compilation finished in 0:00:00.247 ; compiling file "/usr/share/common-lisp/source/qmynd/src/mysql-protocol/prepared-statements/prepared-statement.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFCLASS MYSQL-PREPARED-STATEMENT ...) ; processing (DEFINE-PACKET COMMAND-STATEMENT-PREPARE-OK ...) ; processing (DEFUN SEND-COMMAND-STATEMENT-PREPARE ...) ; processing (DEFUN SEND-COMMAND-STATEMENT-SEND-LONG-DATA ...) ; processing (DEFMETHOD SEND-COMMAND-STATEMENT-EXECUTE ...) ; processing (DEFMETHOD PARSE-COMMAND-STATEMENT-EXECUTE-RESPONSE ...) ; processing (DEFMETHOD SEND-COMMAND-STATEMENT-CLOSE ...) ; processing (DEFMETHOD SEND-COMMAND-STATEMENT-RESET ...) ; processing (ASDF-FINALIZERS:FINAL-FORMS) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/prepared-statements/prepared-statement-tmpXATIMY4E.fasl ; compilation finished in 0:00:00.715 ; compiling file "/usr/share/common-lisp/source/qmynd/src/api.lisp" (written 22 JAN 2018 03:04:17 AM): ; processing (IN-PACKAGE :QMYND-IMPL) ; processing (DEFUN MYSQL-CONNECT ...) ; processing (DEFUN MYSQL-LOCAL-CONNECT ...) ; processing (DEFMETHOD MYSQL-DISCONNECT ...) ; processing (DEFUN MYSQL-QUERY ...) ; processing (DEFUN MYSQL-STATEMENT-PREPARE ...) ; processing (DEFMETHOD MYSQL-STATEMENT-EXECUTE ...) ; processing (DEFMETHOD MYSQL-STATEMENT-CLOSE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/qmynd/src/api-tmp3LJ5VTJR.fasl ; compilation finished in 0:00:00.303 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/packages.lisp" (written 07 APR 2019 03:51:26 AM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE :CL-PPCRE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-ppcre/packages-tmp8VUWAF03.fasl ; compilation finished in 0:00:00.019 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/specials.lisp" (written 07 APR 2019 03:51:26 AM): ; processing (IN-PACKAGE :CL-PPCRE) ; processing (DEFVAR *STANDARD-OPTIMIZE-SETTINGS* ...) ; processing (DEFVAR *SPECIAL-OPTIMIZE-SETTINGS* ...) ; processing (DEFVAR *EXTENDED-MODE-P* ...) ; processing (DECLAIM (BOOLEAN *EXTENDED-MODE-P*)) ; processing (DEFVAR *REGEX-CHAR-CODE-LIMIT* ...) ; processing (DECLAIM (FIXNUM *REGEX-CHAR-CODE-LIMIT*)) ; processing (DEFVAR *STRING* ...) ; processing (DECLAIM (SIMPLE-STRING *STRING*)) ; processing (DEFVAR *START-POS* ...) ; processing (DECLAIM (FIXNUM *START-POS*)) ; processing (DEFVAR *REAL-START-POS* ...) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFVAR *END-POS* ...) ; processing (DECLAIM (FIXNUM *END-POS*)) ; processing (DEFVAR *REG-STARTS* ...) ; processing (DECLAIM (SIMPLE-VECTOR *REG-STARTS*)) ; processing (DEFVAR *REGS-MAYBE-START* ...) ; processing (DECLAIM (SIMPLE-VECTOR *REGS-MAYBE-START*)) ; processing (DEFVAR *REG-ENDS* ...) ; processing (DECLAIM (SIMPLE-VECTOR *REG-ENDS*)) ; processing (DEFVAR *END-STRING-POS* ...) ; processing (DEFVAR *REP-NUM* ...) ; processing (DECLAIM (FIXNUM *REP-NUM*)) ; processing (DEFVAR *ZERO-LENGTH-NUM* ...) ; processing (DECLAIM (FIXNUM *ZERO-LENGTH-NUM*)) ; processing (DEFVAR *REPEAT-COUNTERS* ...) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFVAR *LAST-POS-STORES* ...) ; processing (DECLAIM (SIMPLE-VECTOR *LAST-POS-STORES*)) ; processing (DEFVAR *USE-BMH-MATCHERS* ...) ; processing (DEFVAR *OPTIMIZE-CHAR-CLASSES* ...) ; processing (DEFVAR *PROPERTY-RESOLVER* ...) ; processing (DEFVAR *ALLOW-QUOTING* ...) ; processing (DEFVAR *ALLOW-NAMED-REGISTERS* ...) ; processing (PUSHNEW :CL-PPCRE ...) ; processing (DEFVAR *HYPERDOC-BASE-URI* ...) ; processing (LET (#) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-ppcre/specials-tmpJUI0JWVS.fasl ; compilation finished in 0:00:00.067 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/util.lisp" (written 07 APR 2019 03:51:26 AM): ; processing (IN-PACKAGE :CL-PPCRE) ; processing (DEFMACRO DEFCONSTANT ...) ; processing (DEFMACRO WITH-UNIQUE-NAMES ...) ; processing (DEFMACRO WITH-REBINDING ...) ; processing (DECLAIM (INLINE DIGIT-CHAR-P)) ; processing (DEFUN DIGIT-CHAR-P ...) ; processing (DECLAIM (INLINE WORD-CHAR-P)) ; processing (DEFUN WORD-CHAR-P ...) ; processing (DEFCONSTANT +WHITESPACE-CHAR-STRING+ ...) ; processing (DEFUN WHITESPACEP ...) ; processing (DEFMACRO MAYBE-COERCE-TO-SIMPLE-STRING ...) ; processing (DECLAIM (INLINE NSUBSEQ)) ; processing (DEFUN NSUBSEQ ...) ; processing (DEFUN NORMALIZE-VAR-LIST ...) ; processing (DEFUN STRING-LIST-TO-SIMPLE-STRING ...) ; 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 CHARACTER (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a STRING, not a SIMPLE-BASE-STRING. ; processing (DEFUN COMPLEMENT* ...) ; file: /usr/share/common-lisp/source/cl-ppcre/util.lisp ; 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 /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-ppcre/util-tmpHNA3KE33.fasl ; compilation finished in 0:00:00.243 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/errors.lisp" (written 07 APR 2019 03:51:26 AM): ; processing (IN-PACKAGE :CL-PPCRE) ; processing (DEFVAR *SYNTAX-ERROR-STRING* ...) ; processing (DEFINE-CONDITION PPCRE-ERROR ...) ; processing (DEFINE-CONDITION PPCRE-SYNTAX-ERROR ...) ; processing (SETF (DOCUMENTATION # ...) ...) ; processing (SETF (DOCUMENTATION # ...) ...) ; processing (DEFINE-CONDITION PPCRE-INVOCATION-ERROR ...) ; processing (DEFMACRO SIGNAL-SYNTAX-ERROR* ...) ; processing (DEFMACRO SIGNAL-SYNTAX-ERROR ...) ; processing (DEFMACRO SIGNAL-INVOCATION-ERROR ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-ppcre/errors-tmp9QACGPOH.fasl ; compilation finished in 0:00:00.087 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/charset.lisp" (written 07 APR 2019 03:51:26 AM): ; processing (IN-PACKAGE :CL-PPCRE) ; processing (DEFCONSTANT +PROBE-DEPTH+ ...) ; processing (DEFUN MAKE-CHAR-VECTOR ...) ; processing (DEFSTRUCT (CHARSET #) ...) ; processing (DEFMETHOD MAKE-LOAD-FORM ...) ; processing (DECLAIM (INLINE MIX)) ; processing (DEFUN MIX ...) ; 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 of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; processing (DECLAIM (INLINE COMPUTE-INDEX)) ; processing (DEFUN COMPUTE-INDEX ...) ; file: /usr/share/common-lisp/source/cl-ppcre/charset.lisp ; 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 of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a (OR ; (RATIONAL (-4611686018427387899) ; (4611686018427387899)) ; DOUBLE-FLOAT SINGLE-FLOAT), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR ; (RATIONAL (-4611686018427387899) ; (4611686018427387899)) ; DOUBLE-FLOAT SINGLE-FLOAT), 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 ; (RATIONAL (-4611686018427387899) ; (4611686018427387899)) ; DOUBLE-FLOAT SINGLE-FLOAT), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a (OR ; (RATIONAL (-4611686018427387899) ; (4611686018427387899)) ; DOUBLE-FLOAT SINGLE-FLOAT), 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 #1=inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do #1# (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 ; (RATIONAL #1=(-4611686018427387899) ; #2=(4611686018427387899)) ; DOUBLE-FLOAT SINGLE-FLOAT), not a FIXNUM. ; The result is a (VALUES ; (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL #3=(-4611686018427387900) ; #4=(9223372036854775798))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a (OR (RATIONAL #1# #2#) DOUBLE-FLOAT SINGLE-FLOAT), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL #3# #4#)) ; . #5#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a (RATIONAL #2=(-4611686018427387900) ; #3=(9223372036854775798)), not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a (RATIONAL #2# #3#), not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a (RATIONAL #2=(-4611686018427387899) ; #3=(9223372036854775798)), not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a (RATIONAL #2# #3#), not a FIXNUM. ; etc. ; (1+ (MOD CL-PPCRE::HASH (1- (LENGTH VECTOR)))) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a (OR ; (RATIONAL #2=(-4611686018427387899) ; #3=(4611686018427387899)) ; DOUBLE-FLOAT SINGLE-FLOAT), not a FIXNUM. ; The result is a (VALUES ; (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL #4=(-4611686018427387898) ; #5=(4611686018427387900))) ; . #6=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (OR (RATIONAL #2# #3#) DOUBLE-FLOAT SINGLE-FLOAT), not a FIXNUM. ; The result is a (VALUES (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL #4# #5#)) ; . #6#), not a (VALUES FIXNUM &REST T). ; etc. ; processing (DEFUN IN-CHARSET-P ...) ; processing (DEFUN ADD-TO-CHARSET ...) ; processing (DEFUN %ADD-TO-CHARSET ...) ; processing (DEFUN %ADD-TO-CHARSET/EXPAND ...) ; file: /usr/share/common-lisp/source/cl-ppcre/charset.lisp ; in: DEFUN %ADD-TO-CHARSET/EXPAND ; (* 2 CL-PPCRE::NEW-SIZE) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (>= CL-PPCRE::NEW-SIZE 371370) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; (LET* ((CL-PPCRE::OLD-VECTOR (CL-PPCRE::CHARSET-VECTOR SET)) ; (CL-PPCRE::NEW-SIZE (* 2 (LENGTH CL-PPCRE::OLD-VECTOR)))) ; (TAGBODY ; :RETRY ; (MULTIPLE-VALUE-BIND (CL-PPCRE::NEW-DEPTH CL-PPCRE::NEW-VECTOR) ; (IF (>= CL-PPCRE::NEW-SIZE 371370) ; (VALUES 0 #) ; (VALUES CL-PPCRE::+PROBE-DEPTH+ #)) ; (SETF # CL-PPCRE::NEW-DEPTH ; # CL-PPCRE::NEW-VECTOR) ; (FLET (#) ; (CL-PPCRE::TRY-ADD CHAR) ; (DOTIMES # #)))) ; (INCF (CL-PPCRE::CHARSET-COUNT SET)) ; T) ; ; note: doing signed word to integer coercion (cost 20) to NEW-SIZE ; processing (DEFUN MAP-CHARSET ...) ; file: /usr/share/common-lisp/source/cl-ppcre/charset.lisp ; in: DEFUN MAP-CHARSET ; (DECF CL-PPCRE::N) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; (ZEROP (DECF CL-PPCRE::N)) ; ; 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. ; (DECF CL-PPCRE::N) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; processing (DEFUN CREATE-CHARSET-FROM-TEST-FUNCTION ...) ; file: /usr/share/common-lisp/source/cl-ppcre/charset.lisp ; 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 ...) ; --> BLOCK LET LET LET TAGBODY WHEN IF ; ==> ; (>= CL-PPCRE::CODE #:LOOP-LIMIT-0) ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 #1=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 #1# (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 #1=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 #1# (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-ppcre/charset-tmpST69PK2Q.fasl ; compilation finished in 0:00:00.367 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/charmap.lisp" (written 07 APR 2019 03:51:26 AM): ; processing (IN-PACKAGE :CL-PPCRE) ; processing (DEFSTRUCT (CHARMAP #) ...) ; processing (DEFMETHOD MAKE-LOAD-FORM ...) ; processing (DECLAIM (INLINE IN-CHARMAP-P)) ; processing (DEFUN IN-CHARMAP-P ...) ; processing (DEFUN CHARMAP-CONTENTS ...) ; processing (DEFUN MAKE-CHARMAP ...) ; 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 ; processing (DEFUN CREATE-CHARMAP-FROM-TEST-FUNCTION ...) ; file: /usr/share/common-lisp/source/cl-ppcre/charmap.lisp ; in: DEFUN CREATE-CHARMAP-FROM-TEST-FUNCTION ; (1- CL-PPCRE::END) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL 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 ...) ; --> BLOCK LET LET TAGBODY WHEN IF ; ==> ; (< CL-PPCRE::CODE #:LOOP-LIMIT-24) ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 ...) ; --> BLOCK LET LET TAGBODY WHEN IF ; ==> ; (>= CL-PPCRE::CODE #:LOOP-LIMIT-0) ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 #1=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 #1# (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 #1=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 #1# (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 #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #2#), 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 ...) ; --> BLOCK LET LET TAGBODY WHEN IF ; ==> ; (< CL-PPCRE::CODE #:LOOP-LIMIT-24) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=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 #1# (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 /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-ppcre/charmap-tmpYAKMHP3C.fasl ; compilation finished in 0:00:00.375 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/chartest.lisp" (written 07 APR 2019 03:51:26 AM): ; processing (IN-PACKAGE :CL-PPCRE) ; processing (DEFUN CREATE-HASH-TABLE-FROM-TEST-FUNCTION ...) ; 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 ...) ; --> BLOCK LET LET LET TAGBODY WHEN IF ; ==> ; (>= CL-PPCRE::CODE #:LOOP-LIMIT-0) ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 #1=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 #1# (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 #1=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 #1# (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; processing (DEFUN CREATE-OPTIMIZED-TEST-FUNCTION ...) ; file: /usr/share/common-lisp/source/cl-ppcre/chartest.lisp ; in: DEFUN CREATE-OPTIMIZED-TEST-FUNCTION ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 (RATIONAL (-2) (2)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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 of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 (RATIONAL (-2) (2)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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 #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), 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 #1=inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2#), 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 #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), 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 #1=inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2#), 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 /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-ppcre/chartest-tmpT250CJEH.fasl ; compilation finished in 0:00:00.155 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/lexer.lisp" (written 07 APR 2019 03:51:26 AM): ; processing (IN-PACKAGE :CL-PPCRE) ; processing (DECLAIM (INLINE MAP-CHAR-TO-SPECIAL-CLASS)) ; processing (DEFUN MAP-CHAR-TO-SPECIAL-CHAR-CLASS ...) ; processing (DECLAIM (INLINE MAKE-LEXER-INTERNAL)) ; processing (DEFSTRUCT (LEXER #) ...) ; processing (DEFUN MAKE-LEXER ...) ; processing (DECLAIM (INLINE END-OF-STRING-P)) ; processing (DEFUN END-OF-STRING-P ...) ; processing (DECLAIM (INLINE LOOKING-AT-P)) ; processing (DEFUN LOOKING-AT-P ...) ; processing (DECLAIM (INLINE NEXT-CHAR-NON-EXTENDED)) ; processing (DEFUN NEXT-CHAR-NON-EXTENDED ...) ; processing (DEFUN NEXT-CHAR ...) ; 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 ; processing (DECLAIM (INLINE FAIL)) ; processing (DEFUN FAIL ...) ; processing (DEFUN GET-NUMBER ...) ; file: /usr/share/common-lisp/source/cl-ppcre/lexer.lisp ; 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) ; processing (DECLAIM (INLINE TRY-NUMBER)) ; processing (DEFUN TRY-NUMBER ...) ; processing (DECLAIM (INLINE MAKE-CHAR-FROM-CODE)) ; processing (DEFUN MAKE-CHAR-FROM-CODE ...) ; file: /usr/share/common-lisp/source/cl-ppcre/lexer.lisp ; in: DEFUN MAKE-CHAR-FROM-CODE ; (CL-PPCRE::SIGNAL-SYNTAX-ERROR* CL-PPCRE::ERROR-POS ; "No character for hex-code ~X." NUMBER) ; --> ERROR ; ==> ; CL-PPCRE::ERROR-POS ; ; note: deleting unreachable code ; processing (DEFUN UNESCAPE-CHAR ...) ; file: /usr/share/common-lisp/source/cl-ppcre/lexer.lisp ; 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. ; processing (DEFUN READ-CHAR-PROPERTY ...) ; processing (DEFUN COLLECT-CHAR-CLASS ...) ; processing (DEFUN MAYBE-PARSE-FLAGS ...) ; processing (DEFUN GET-QUANTIFIER ...) ; processing (DEFUN PARSE-REGISTER-NAME-AUX ...) ; processing (DECLAIM (INLINE UNGET-TOKEN)) ; processing (DEFUN UNGET-TOKEN ...) ; processing (DEFUN GET-TOKEN ...) ; processing (DECLAIM (INLINE START-OF-SUBEXPR-P)) ; processing (DEFUN START-OF-SUBEXPR-P ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-ppcre/lexer-tmpZ5LLIZWU.fasl ; compilation finished in 0:00:01.787 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/parser.lisp" (written 07 APR 2019 03:51:26 AM): ; processing (IN-PACKAGE :CL-PPCRE) ; processing (DEFUN GROUP ...) ; 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 ; processing (DEFUN GREEDY-QUANT ...) ; processing (DEFUN QUANT ...) ; processing (DEFUN SEQ ...) ; processing (DEFUN REG-EXPR ...) ; processing (DEFUN PARSE-STRING ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-ppcre/parser-tmpK87BOA56.fasl ; compilation finished in 0:00:00.235 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/regex-class.lisp" (written 07 APR 2019 03:51:26 AM): ; processing (IN-PACKAGE :CL-PPCRE) ; processing (DEFCLASS REGEX ...) ; processing (DEFCLASS SEQ ...) ; processing (DEFCLASS ALTERNATION ...) ; processing (DEFCLASS LOOKAHEAD ...) ; processing (DEFCLASS LOOKBEHIND ...) ; processing (DEFCLASS REPETITION ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFCLASS REGISTER ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFCLASS STANDALONE ...) ; processing (DEFCLASS BACK-REFERENCE ...) ; processing (DEFCLASS CHAR-CLASS ...) ; processing (DEFCLASS STR ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFCLASS ANCHOR ...) ; processing (DEFCLASS EVERYTHING ...) ; processing (DEFCLASS WORD-BOUNDARY ...) ; processing (DEFCLASS BRANCH ...) ; processing (DEFCLASS FILTER ...) ; processing (DEFCLASS VOID ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; 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 CONS NULL ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; (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 /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-ppcre/regex-class-tmpRL4WWIL2.fasl ; compilation finished in 0:00:00.135 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/regex-class-util.lisp" (written 07 APR 2019 03:51:26 AM): ; processing (IN-PACKAGE :CL-PPCRE) ; processing (DEFMETHOD LEN ...) ; processing (DEFMETHOD STR ...) ; processing (DEFMETHOD SKIP ...) ; processing (DEFMETHOD START-OF-END-STRING-P ...) ; processing (DEFGENERIC CASE-MODE ...) ; processing (DEFMETHOD CASE-MODE ...) ; 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. ; processing (DEFMETHOD CASE-MODE ...) ; processing (DEFGENERIC COPY-REGEX ...) ; processing (DEFMETHOD COPY-REGEX ...) ; processing (DEFMETHOD COPY-REGEX ...) ; processing (DEFMETHOD COPY-REGEX ...) ; processing (DEFMETHOD COPY-REGEX ...) ; processing (DEFMETHOD COPY-REGEX ...) ; processing (DEFMETHOD COPY-REGEX ...) ; processing (DEFMETHOD COPY-REGEX ...) ; processing (DEFMETHOD COPY-REGEX ...) ; processing (DEFMETHOD COPY-REGEX ...) ; processing (DEFMETHOD COPY-REGEX ...) ; processing (DEFMETHOD COPY-REGEX ...) ; processing (DEFMETHOD COPY-REGEX ...) ; processing (DEFMETHOD COPY-REGEX ...) ; processing (DEFMETHOD COPY-REGEX ...) ; processing (DEFMETHOD COPY-REGEX ...) ; processing (DEFMETHOD COPY-REGEX ...) ; processing (DEFGENERIC REMOVE-REGISTERS ...) ; processing (DEFMETHOD REMOVE-REGISTERS ...) ; processing (DEFMETHOD REMOVE-REGISTERS ...) ; processing (DEFMETHOD REMOVE-REGISTERS ...) ; processing (DEFMETHOD REMOVE-REGISTERS ...) ; processing (DEFMETHOD REMOVE-REGISTERS ...) ; processing (DEFMETHOD REMOVE-REGISTERS ...) ; processing (DEFMETHOD REMOVE-REGISTERS ...) ; processing (DEFMETHOD REMOVE-REGISTERS ...) ; processing (DEFMETHOD REMOVE-REGISTERS ...) ; processing (DEFGENERIC EVERYTHINGP ...) ; processing (DEFMETHOD EVERYTHINGP ...) ; file: /usr/share/common-lisp/source/cl-ppcre/regex-class-util.lisp ; in: DEFMETHOD EVERYTHINGP (SEQ) ; (LENGTH CL-PPCRE::CLEANED-ELEMENTS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (SIMPLE-ARRAY * (*)) CONS NULL ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; processing (DEFMETHOD EVERYTHINGP ...) ; file: /usr/share/common-lisp/source/cl-ppcre/regex-class-util.lisp ; in: DEFMETHOD EVERYTHINGP (ALTERNATION) ; (AND (= 1 (LENGTH CL-PPCRE::CHOICES)) ; (CL-PPCRE::EVERYTHINGP (FIRST CL-PPCRE::CHOICES))) ; --> IF = ; ==> ; (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. ; processing (DEFMETHOD EVERYTHINGP ...) ; file: /usr/share/common-lisp/source/cl-ppcre/regex-class-util.lisp ; in: DEFMETHOD EVERYTHINGP (REPETITION) ; (AND CL-PPCRE::MAXIMUM (= 1 CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM) ; (CL-PPCRE::EVERYTHINGP CL-PPCRE::REGEX)) ; --> IF IF ; ==> ; (= 1 ; (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: 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 #1=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 #1# (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. ; processing (DEFMETHOD EVERYTHINGP ...) ; processing (DEFMETHOD EVERYTHINGP ...) ; processing (DEFMETHOD EVERYTHINGP ...) ; processing (DEFMETHOD EVERYTHINGP ...) ; processing (DEFGENERIC REGEX-LENGTH ...) ; processing (DEFMETHOD REGEX-LENGTH ...) ; file: /usr/share/common-lisp/source/cl-ppcre/regex-class-util.lisp ; 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 ...) ; --> BLOCK LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-5 CL-PPCRE::LEN) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; processing (DEFMETHOD REGEX-LENGTH ...) ; file: /usr/share/common-lisp/source/cl-ppcre/regex-class-util.lisp ; in: DEFMETHOD REGEX-LENGTH (ALTERNATION) ; (/= CL-PPCRE::LEN CL-PPCRE::OLD-LEN) ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 #1=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 #1# (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. ; processing (DEFMETHOD REGEX-LENGTH ...) ; file: /usr/share/common-lisp/source/cl-ppcre/regex-class-util.lisp ; 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 #1=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 #1# (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. ; processing (DEFMETHOD REGEX-LENGTH ...) ; file: /usr/share/common-lisp/source/cl-ppcre/regex-class-util.lisp ; 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)) ; --> LET 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 of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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)) ; --> 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 #1=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 #1# (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)) ; --> LET 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 . #1=(&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 . #1#), not a (VALUES ; (COMPLEX SINGLE-FLOAT) ; &REST T). ; etc. ; processing (DEFMETHOD REGEX-LENGTH ...) ; processing (DEFMETHOD REGEX-LENGTH ...) ; processing (DEFMETHOD REGEX-LENGTH ...) ; processing (DEFMETHOD REGEX-LENGTH ...) ; processing (DEFMETHOD REGEX-LENGTH ...) ; processing (DEFMETHOD REGEX-LENGTH ...) ; processing (DEFMETHOD REGEX-LENGTH ...) ; processing (DEFMETHOD REGEX-LENGTH ...) ; processing (DEFGENERIC REGEX-MIN-LENGTH ...) ; processing (DEFMETHOD REGEX-MIN-LENGTH ...) ; file: /usr/share/common-lisp/source/cl-ppcre/regex-class-util.lisp ; 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) ; --> BLOCK LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-5 CL-PPCRE::LEN) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; processing (DEFMETHOD REGEX-MIN-LENGTH ...) ; file: /usr/share/common-lisp/source/cl-ppcre/regex-class-util.lisp ; 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) ; --> BLOCK 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 #1=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 #1# (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; etc. ; processing (DEFMETHOD REGEX-MIN-LENGTH ...) ; file: /usr/share/common-lisp/source/cl-ppcre/regex-class-util.lisp ; 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 #1=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 #1# (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 #1=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 #1# (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; processing (DEFMETHOD REGEX-MIN-LENGTH ...) ; file: /usr/share/common-lisp/source/cl-ppcre/regex-class-util.lisp ; 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 of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 . #1=(&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 . #1#), not a (VALUES ; (COMPLEX SINGLE-FLOAT) ; &REST T). ; etc. ; processing (DEFMETHOD REGEX-MIN-LENGTH ...) ; processing (DEFMETHOD REGEX-MIN-LENGTH ...) ; processing (DEFMETHOD REGEX-MIN-LENGTH ...) ; processing (DEFMETHOD REGEX-MIN-LENGTH ...) ; processing (DEFMETHOD REGEX-MIN-LENGTH ...) ; processing (DEFMETHOD REGEX-MIN-LENGTH ...) ; processing (DEFMETHOD REGEX-MIN-LENGTH ...) ; processing (DEFGENERIC COMPUTE-OFFSETS ...) ; processing (DEFMETHOD COMPUTE-OFFSETS ...) ; processing (DEFMETHOD COMPUTE-OFFSETS ...) ; file: /usr/share/common-lisp/source/cl-ppcre/regex-class-util.lisp ; in: DEFMETHOD COMPUTE-OFFSETS (ALTERNATION T) ; (/= CL-PPCRE::CURR-OFFSET CL-PPCRE::OLD-OFFSET) ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 #1=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 #1# (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. ; processing (DEFMETHOD COMPUTE-OFFSETS ...) ; file: /usr/share/common-lisp/source/cl-ppcre/regex-class-util.lisp ; 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 #1=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 #1# (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. ; processing (DEFMETHOD COMPUTE-OFFSETS ...) ; file: /usr/share/common-lisp/source/cl-ppcre/regex-class-util.lisp ; 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)) ; --> LET 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 of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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. ; --> LET 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 of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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. ; --> LET 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 . #1=(&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 . #1#), not a (VALUES ; (COMPLEX SINGLE-FLOAT) ; &REST T). ; etc. ; --> LET 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 #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; processing (DEFMETHOD COMPUTE-OFFSETS ...) ; processing (DEFMETHOD COMPUTE-OFFSETS ...) ; processing (DEFMETHOD COMPUTE-OFFSETS ...) ; file: /usr/share/common-lisp/source/cl-ppcre/regex-class-util.lisp ; in: DEFMETHOD COMPUTE-OFFSETS (CHAR-CLASS T) ; (1+ CL-PPCRE::START-POS) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; processing (DEFMETHOD COMPUTE-OFFSETS ...) ; file: /usr/share/common-lisp/source/cl-ppcre/regex-class-util.lisp ; in: DEFMETHOD COMPUTE-OFFSETS (EVERYTHING T) ; (1+ CL-PPCRE::START-POS) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; processing (DEFMETHOD COMPUTE-OFFSETS ...) ; file: /usr/share/common-lisp/source/cl-ppcre/regex-class-util.lisp ; in: DEFMETHOD COMPUTE-OFFSETS (STR T) ; (+ CL-PPCRE::START-POS (CL-PPCRE::LEN CL-PPCRE::STR)) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; processing (DEFMETHOD COMPUTE-OFFSETS ...) ; processing (DEFMETHOD COMPUTE-OFFSETS ...) ; file: /usr/share/common-lisp/source/cl-ppcre/regex-class-util.lisp ; in: DEFMETHOD COMPUTE-OFFSETS (FILTER T) ; (+ CL-PPCRE::START-POS CL-PPCRE::LEN) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; processing (DEFMETHOD COMPUTE-OFFSETS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-ppcre/regex-class-util-tmp9PRKYPOC.fasl ; compilation finished in 0:00:01.175 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/convert.lisp" (written 07 APR 2019 03:51:26 AM): ; processing (IN-PACKAGE :CL-PPCRE) ; processing (DEFMACRO CASE-INSENSITIVE-MODE-P ...) ; processing (DEFMACRO MULTI-LINE-MODE-P ...) ; processing (DEFMACRO SINGLE-LINE-MODE-P ...) ; processing (DEFUN SET-FLAG ...) ; processing (DEFGENERIC RESOLVE-PROPERTY ...) ; processing (DEFUN CONVERT-CHAR-CLASS-TO-TEST-FUNCTION ...) ; 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 ; processing (DEFUN MAYBE-SPLIT-REPETITION ...) ; file: /usr/share/common-lisp/source/cl-ppcre/convert.lisp ; in: DEFUN MAYBE-SPLIT-REPETITION ; (- CL-PPCRE::MAXIMUM CL-PPCRE::MINIMUM) ; ; note: doing signed word to integer coercion (cost 20) ; processing (DEFUN MAYBE-ACCUMULATE ...) ; file: /usr/share/common-lisp/source/cl-ppcre/convert.lisp ; in: DEFUN MAYBE-ACCUMULATE ; (+ (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH) (CL-PPCRE::LEN CL-PPCRE::STR)) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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) ; --> PROGN 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-BASE-STRING. ; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; 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 . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER . #1#). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY CHARACTER ; . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY SINGLE-FLOAT ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY SINGLE-FLOAT . #1#). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; SINGLE-FLOAT . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY DOUBLE-FLOAT ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY DOUBLE-FLOAT . #1#). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; DOUBLE-FLOAT . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SIMPLE-BIT-VECTOR. ; The second argument is a SEQUENCE, not a SIMPLE-BIT-VECTOR. ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-BIT-VECTOR ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 2) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 2) ; . #1#). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 2) . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 4) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 4) ; . #1#). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 4) . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 7) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 7) ; . #1#). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 7) . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; . #1#). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 8) . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 15) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 15) ; . #1#). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 15) ; . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 16) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 16) ; . #1#). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 16) ; . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 31) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 31) ; . #1#). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 31) ; . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 32) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 32) ; . #1#). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 32) ; . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 62) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 62) ; . #1#). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 62) ; . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 63) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 63) ; . #1#). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 63) ; . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 64) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 64) ; . #1#). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 64) ; . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 8) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 8) . #1#). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 8) . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 16) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 16) ; . #1#). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 16) . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 32) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 32) ; . #1#). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 32) . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY FIXNUM . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY FIXNUM . #1#). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY FIXNUM ; . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 64) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 64) ; . #1#). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 64) . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) ; . #1#). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (COMPLEX SINGLE-FLOAT) ; . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; . #1#). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (COMPLEX DOUBLE-FLOAT) ; . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SIMPLE-VECTOR. ; The second argument is a SEQUENCE, not a SIMPLE-VECTOR. ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-VECTOR ; &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 . #1=((*))). ; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY CHARACTER ; . #1#) ; &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 #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), 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 #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; processing (DECLAIM (INLINE CONVERT-AUX)) ; processing (DEFUN CONVERT-AUX ...) ; processing (DEFGENERIC CONVERT-COMPOUND-PARSE-TREE ...) ; processing (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; processing (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; processing (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; processing (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; file: /usr/share/common-lisp/source/cl-ppcre/convert.lisp ; 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. ; processing (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; processing (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; processing (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; processing (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; processing (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; file: /usr/share/common-lisp/source/cl-ppcre/convert.lisp ; 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. ; processing (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; processing (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; processing (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; file: /usr/share/common-lisp/source/cl-ppcre/convert.lisp ; 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. ; processing (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; processing (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; processing (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; file: /usr/share/common-lisp/source/cl-ppcre/convert.lisp ; 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 (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a STRING. ; The second argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (AND (NOT NULL) SYMBOL) CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a SIMPLE-STRING. ; The second argument is a (OR (VECTOR CHARACTER) BASE-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 of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 . #1=(&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 . #1#), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; etc. ; (1- CL-PPCRE::BACKREF-NUMBER) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), 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 ...) ; --> BLOCK LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY ; --> SB-LOOP::LOOP-DESETQ SETQ THE ; ==> ; (1+ CL-PPCRE::REG-INDEX) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) . #2=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; processing (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; processing (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; processing (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; processing (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; processing (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; processing (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; processing (DEFGENERIC CONVERT-SIMPLE-PARSE-TREE ...) ; processing (DEFMETHOD CONVERT-SIMPLE-PARSE-TREE ...) ; processing (DEFMETHOD CONVERT-SIMPLE-PARSE-TREE ...) ; processing (DEFMETHOD CONVERT-SIMPLE-PARSE-TREE ...) ; processing (DEFUN CONVERT ...) ; file: /usr/share/common-lisp/source/cl-ppcre/convert.lisp ; 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 CONS NULL ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-ppcre/convert-tmp747V57QS.fasl ; compilation finished in 0:00:01.423 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/optimize.lisp" (written 07 APR 2019 03:51:26 AM): ; processing (IN-PACKAGE :CL-PPCRE) ; processing (DEFGENERIC FLATTEN ...) ; processing (DEFMETHOD FLATTEN ...) ; processing (DEFMETHOD FLATTEN ...) ; processing (DEFMETHOD FLATTEN ...) ; processing (DEFMETHOD FLATTEN ...) ; processing (DEFGENERIC GATHER-STRINGS ...) ; processing (DEFMETHOD GATHER-STRINGS ...) ; 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 CHARACTER (*)). ; ; 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)) ; --> SETQ THE ; ==> ; (+ (CL-PPCRE::LEN CL-PPCRE::ELEMENT) CL-PPCRE::COLLECTOR-LENGTH) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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)) ; --> PROGN 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-BASE-STRING. ; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; 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 . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER . #1#). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY CHARACTER ; . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY SINGLE-FLOAT . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY SINGLE-FLOAT . #1#). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY SINGLE-FLOAT ; . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY DOUBLE-FLOAT . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY DOUBLE-FLOAT . #1#). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY DOUBLE-FLOAT ; . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-BIT-VECTOR. ; The second argument is a SEQUENCE, not a SIMPLE-BIT-VECTOR. ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES SIMPLE-BIT-VECTOR ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 2) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 2) ; . #1#). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 2) . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 4) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 4) ; . #1#). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 4) . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 7) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 7) ; . #1#). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 7) . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; . #1#). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 8) . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 15) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 15) ; . #1#). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 15) . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 16) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 16) ; . #1#). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 16) . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 31) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 31) ; . #1#). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 31) . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 32) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 32) ; . #1#). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 32) . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 62) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 62) ; . #1#). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 62) . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 63) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 63) ; . #1#). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 63) . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 64) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 64) ; . #1#). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 64) . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (SIGNED-BYTE 8) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 8) . #1#). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 8) . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (SIGNED-BYTE 16) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 16) ; . #1#). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 16) . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (SIGNED-BYTE 32) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 32) ; . #1#). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 32) . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY FIXNUM . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY FIXNUM . #1#). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY FIXNUM . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (SIGNED-BYTE 64) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 64) ; . #1#). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 64) . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) ; . #1#). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (COMPLEX SINGLE-FLOAT) ; . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; . #1#). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (COMPLEX DOUBLE-FLOAT) ; . #1#) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-VECTOR. ; The second argument is a SEQUENCE, not a SIMPLE-VECTOR. ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES SIMPLE-VECTOR &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 . #1=((*))). ; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY CHARACTER ; . #1#) ; &REST T). ; (INCF CL-PPCRE::COLLECTOR-LENGTH (CL-PPCRE::LEN CL-PPCRE::ELEMENT)) ; --> SETQ 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 . #1=(&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 . #1#), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; etc. ; processing (DEFMETHOD GATHER-STRINGS ...) ; processing (DEFMETHOD GATHER-STRINGS ...) ; processing (DEFMETHOD GATHER-STRINGS ...) ; processing (DEFGENERIC START-ANCHORED-P ...) ; processing (DEFMETHOD START-ANCHORED-P ...) ; processing (DEFMETHOD START-ANCHORED-P ...) ; processing (DEFMETHOD START-ANCHORED-P ...) ; processing (DEFMETHOD START-ANCHORED-P ...) ; file: /usr/share/common-lisp/source/cl-ppcre/optimize.lisp ; 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 #1=inline fixnum comparison (cost 3) because: ; The first argument is a T, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a T, not a FIXNUM. ; etc. ; processing (DEFMETHOD START-ANCHORED-P ...) ; processing (DEFMETHOD START-ANCHORED-P ...) ; processing (DEFMETHOD START-ANCHORED-P ...) ; processing (DEFMETHOD START-ANCHORED-P ...) ; file: /usr/share/common-lisp/source/cl-ppcre/optimize.lisp ; 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. ; processing (DEFGENERIC END-STRING-AUX ...) ; processing (DEFMETHOD END-STRING-AUX ...) ; processing (DEFMETHOD END-STRING-AUX ...) ; file: /usr/share/common-lisp/source/cl-ppcre/optimize.lisp ; 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 (SIMPLE-ARRAY * (*)) CONS NULL ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR (SIMPLE-ARRAY * . #1=((*))) CONS NULL ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; CHARACTER ; . #1#). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR (SIMPLE-ARRAY * (*)) CONS NULL ; SB-KERNEL:EXTENDED-SEQUENCE), not a SIMPLE-BASE-STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (SIMPLE-ARRAY * (*)) CONS NULL ; 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. ; processing (DEFMETHOD END-STRING-AUX ...) ; processing (DEFMETHOD END-STRING-AUX ...) ; processing (DEFMETHOD END-STRING-AUX ...) ; processing (DEFUN END-STRING ...) ; processing (DEFGENERIC COMPUTE-MIN-REST ...) ; processing (DEFMETHOD COMPUTE-MIN-REST ...) ; processing (DEFMETHOD COMPUTE-MIN-REST ...) ; file: /usr/share/common-lisp/source/cl-ppcre/optimize.lisp ; 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)) ; --> BLOCK 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 #1=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 #1# (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; etc. ; processing (DEFMETHOD COMPUTE-MIN-REST ...) ; file: /usr/share/common-lisp/source/cl-ppcre/optimize.lisp ; 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 #1=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 #1# (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 #1=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 #1# (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; processing (DEFMETHOD COMPUTE-MIN-REST ...) ; file: /usr/share/common-lisp/source/cl-ppcre/optimize.lisp ; 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 of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; processing (DEFMETHOD COMPUTE-MIN-REST ...) ; file: /usr/share/common-lisp/source/cl-ppcre/optimize.lisp ; 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 of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; processing (DEFMETHOD COMPUTE-MIN-REST ...) ; file: /usr/share/common-lisp/source/cl-ppcre/optimize.lisp ; 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 of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 . #1=(&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 . #1#), 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 #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; processing (DEFMETHOD COMPUTE-MIN-REST ...) ; processing (DEFMETHOD COMPUTE-MIN-REST ...) ; processing (DEFMETHOD COMPUTE-MIN-REST ...) ; processing (DEFMETHOD COMPUTE-MIN-REST ...) ; file: /usr/share/common-lisp/source/cl-ppcre/optimize.lisp ; 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 of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; processing (DEFMETHOD COMPUTE-MIN-REST ...) ; file: /usr/share/common-lisp/source/cl-ppcre/optimize.lisp ; in: DEFMETHOD COMPUTE-MIN-REST (REGEX T) ; (1+ CL-PPCRE::CURRENT-MIN-REST) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-ppcre/optimize-tmpK7KF0QEZ.fasl ; compilation finished in 0:00:01.799 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/closures.lisp" (written 07 APR 2019 03:51:26 AM): ; processing (IN-PACKAGE :CL-PPCRE) ; processing (DECLAIM (INLINE *STRING*= ...)) ; processing (DEFUN *STRING*= ...) ; processing (DEFUN *STRING*-EQUAL ...) ; 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. ; processing (DEFGENERIC CREATE-MATCHER-AUX ...) ; processing (DEFMETHOD CREATE-MATCHER-AUX ...) ; processing (DEFMETHOD CREATE-MATCHER-AUX ...) ; processing (DEFMETHOD CREATE-MATCHER-AUX ...) ; processing (DEFMETHOD CREATE-MATCHER-AUX ...) ; processing (DEFMETHOD CREATE-MATCHER-AUX ...) ; file: /usr/share/common-lisp/source/cl-ppcre/closures.lisp ; 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 ; processing (DEFMACRO INSERT-CHAR-CLASS-TESTER ...) ; processing (DEFMETHOD CREATE-MATCHER-AUX ...) ; file: /usr/share/common-lisp/source/cl-ppcre/closures.lisp ; 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 LET LAMBDA FUNCTION AND IF IF ; ==> ; (FUNCALL #:TEST-FUNCTION6 (SCHAR CL-PPCRE::*STRING* CL-PPCRE::START-POS)) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; processing (DEFMETHOD CREATE-MATCHER-AUX ...) ; file: /usr/share/common-lisp/source/cl-ppcre/closures.lisp ; 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 (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. ; (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 (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. ; (+ 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 ; processing (DECLAIM (INLINE WORD-BOUNDARY-P)) ; processing (DEFUN WORD-BOUNDARY-P ...) ; processing (DEFMETHOD CREATE-MATCHER-AUX ...) ; processing (DEFMETHOD CREATE-MATCHER-AUX ...) ; processing (DEFMETHOD CREATE-MATCHER-AUX ...) ; processing (DEFMETHOD CREATE-MATCHER-AUX ...) ; file: /usr/share/common-lisp/source/cl-ppcre/closures.lisp ; in: DEFMETHOD CREATE-MATCHER-AUX (BACK-REFERENCE T) ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::*STRING* CL-PPCRE::START-POS ; CL-PPCRE::NEXT-POS CL-PPCRE::REG-START CL-PPCRE::REG-END) ; --> BLOCK LOOP BLOCK LET LET TAGBODY UNLESS IF ; ==> ; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::STRING1-IDX) ; (SCHAR CL-PPCRE::STRING2 CL-PPCRE::STRING2-IDX)) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; (+ 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) ; . #1=(&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) ; . #1#), 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) ; . #1=(&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) ; . #1#), 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-+ ; processing (DEFMETHOD CREATE-MATCHER-AUX ...) ; processing (DEFMETHOD CREATE-MATCHER-AUX ...) ; processing (DEFMETHOD CREATE-MATCHER-AUX ...) ; file: /usr/share/common-lisp/source/cl-ppcre/closures.lisp ; 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 ; processing (DEFMETHOD CREATE-MATCHER-AUX ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-ppcre/closures-tmp7L3QASG.fasl ; compilation finished in 0:00:01.903 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/repetition-closures.lisp" (written 07 APR 2019 03:51:26 AM): ; processing (IN-PACKAGE :CL-PPCRE) ; processing (DEFMACRO INCF-AFTER ...) ; processing (DEFMACRO GREEDY-CONSTANT-LENGTH-CLOSURE ...) ; processing (DEFUN CREATE-GREEDY-EVERYTHING-MATCHER ...) ; processing (DEFGENERIC CREATE-GREEDY-CONSTANT-LENGTH-MATCHER ...) ; processing (DEFMETHOD CREATE-GREEDY-CONSTANT-LENGTH-MATCHER ...) ; 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 LET CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET ; --> BLOCK TAGBODY WHEN IF ; ==> ; (FUNCALL #:TEST-FUNCTION30 (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)) ; ; 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 (SCHAR CL-PPCRE::*STRING* CL-PPCRE::STRING1-IDX) ; (SCHAR CL-PPCRE::STRING2 CL-PPCRE::STRING2-IDX)) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; 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)) ; --> IF LAMBDA FUNCTION LET ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (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 LET CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE ; (CHAR= CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS))) ; --> IF LAMBDA FUNCTION LET ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE ; (CHAR-EQUAL CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS))) ; --> IF LAMBDA FUNCTION LET ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), 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) ; . #1=(&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) ; . #1#), 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))) ; --> IF LAMBDA FUNCTION LET ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), 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) ; . #1=(&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) ; . #1#), 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)) ; --> IF LAMBDA FUNCTION LET ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), 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) ; . #1=(&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) ; . #1#), 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. ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (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)) ; --> IF LAMBDA FUNCTION LET ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), 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) ; . #1=(&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) ; . #1#), 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. ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (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 LET CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), 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) ; . #1=(&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) ; . #1#), 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))) ; --> IF LAMBDA FUNCTION LET ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), 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) ; . #1=(&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) ; . #1#), 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. ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE ; (FUNCALL CL-PPCRE::INNER-MATCHER CL-PPCRE::CURR-POS)) ; --> IF LAMBDA FUNCTION LET ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), 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) ; . #1=(&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) ; . #1#), 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. ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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))) ; --> IF LAMBDA FUNCTION LET ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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 LET CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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)) ; --> IF LAMBDA FUNCTION LET ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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)) ; --> IF LAMBDA FUNCTION LET ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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))) ; --> IF LAMBDA FUNCTION LET ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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))) ; --> IF LAMBDA FUNCTION LET ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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 ; processing (DEFGENERIC CREATE-GREEDY-NO-ZERO-MATCHER ...) ; processing (DEFMETHOD CREATE-GREEDY-NO-ZERO-MATCHER ...) ; file: /usr/share/common-lisp/source/cl-ppcre/repetition-closures.lisp ; in: DEFMETHOD CREATE-GREEDY-NO-ZERO-MATCHER (REPETITION T) ; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0) ; --> LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:*REPEAT-COUNTERS*21 #:REP-NUM22) ; ; 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)) ; --> LET* + ; ==> ; (AREF #:*REPEAT-COUNTERS*16 #:REP-NUM17) ; ; 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. ; --> LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:*REPEAT-COUNTERS*16 #:REP-NUM17) ; ; 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)) ; --> LET* SB-IMPL::XSUBTRACT ; ==> ; (AREF #:*REPEAT-COUNTERS*19 #:REP-NUM20) ; ; 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. ; --> LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:*REPEAT-COUNTERS*19 #:REP-NUM20) ; ; 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. ; processing (DEFGENERIC CREATE-GREEDY-MATCHER ...) ; processing (DEFMETHOD CREATE-GREEDY-MATCHER ...) ; file: /usr/share/common-lisp/source/cl-ppcre/repetition-closures.lisp ; 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) ; --> PROGN SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:*REPEAT-COUNTERS*24 #:REP-NUM25) ; ; 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)) ; --> LET* + ; ==> ; (AREF #:*REPEAT-COUNTERS*17 #:REP-NUM18) ; ; 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. ; --> LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:*REPEAT-COUNTERS*17 #:REP-NUM18) ; ; 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)) ; --> LET* SB-IMPL::XSUBTRACT ; ==> ; (AREF #:*REPEAT-COUNTERS*20 #:REP-NUM21) ; ; 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. ; --> LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:*REPEAT-COUNTERS*20 #:REP-NUM21) ; ; 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. ; processing (DEFMACRO NON-GREEDY-CONSTANT-LENGTH-CLOSURE ...) ; processing (DEFGENERIC CREATE-NON-GREEDY-CONSTANT-LENGTH-MATCHER ...) ; processing (DEFMETHOD CREATE-NON-GREEDY-CONSTANT-LENGTH-MATCHER ...) ; file: /usr/share/common-lisp/source/cl-ppcre/repetition-closures.lisp ; 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 LET CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION ; --> LET LOOP BLOCK LET LET TAGBODY UNLESS IF ; ==> ; (FUNCALL #:TEST-FUNCTION102 (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)) ; ; 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 (SCHAR CL-PPCRE::*STRING* CL-PPCRE::STRING1-IDX) ; (SCHAR CL-PPCRE::STRING2 CL-PPCRE::STRING2-IDX)) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; 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)) ; --> IF LAMBDA FUNCTION LET ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), 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)) ; --> IF LAMBDA FUNCTION LET ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), 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))) ; --> IF LAMBDA FUNCTION LET ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), 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) ; . #1=(&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) ; . #1#), 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. ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), 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))) ; --> IF LAMBDA FUNCTION LET ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), 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) ; . #1=(&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) ; . #1#), 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. ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), 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)) ; --> IF LAMBDA FUNCTION LET ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), 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) ; . #1=(&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) ; . #1#), 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*= CL-PPCRE::STR CL-PPCRE::CURR-POS ; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0 CL-PPCRE::LEN)) ; --> IF LAMBDA FUNCTION LET ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), 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) ; . #1=(&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) ; . #1#), 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 LET CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION ; --> LET ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), 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) ; . #1=(&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) ; . #1#), 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. ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE T) ; --> IF LAMBDA FUNCTION LET ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), 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) ; . #1=(&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) ; . #1#), 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. ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE ; (CHAR/= #\Newline (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS))) ; --> IF LAMBDA FUNCTION LET ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), 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) ; . #1=(&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) ; . #1#), 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. ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE ; (FUNCALL CL-PPCRE::INNER-MATCHER CL-PPCRE::CURR-POS)) ; --> IF LAMBDA FUNCTION LET ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), 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) ; . #1=(&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) ; . #1#), 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. ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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))) ; --> IF LAMBDA FUNCTION LET ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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) ; --> IF LAMBDA FUNCTION LET ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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 LET CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION ; --> LET ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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)) ; --> IF LAMBDA FUNCTION LET ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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)) ; --> IF LAMBDA FUNCTION LET ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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))) ; --> IF LAMBDA FUNCTION LET ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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))) ; --> IF LAMBDA FUNCTION LET ; ==> ; (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-- ; ==> ; (MIN (1+ (- CL-PPCRE::*END-POS* CL-PPCRE::LEN CL-PPCRE::MIN-REST)) ; (+ CL-PPCRE::START-POS (THE FIXNUM (* CL-PPCRE::LEN CL-PPCRE::MAXIMUM)))) ; ; 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 ; processing (DEFGENERIC CREATE-NON-GREEDY-NO-ZERO-MATCHER ...) ; processing (DEFMETHOD CREATE-NON-GREEDY-NO-ZERO-MATCHER ...) ; file: /usr/share/common-lisp/source/cl-ppcre/repetition-closures.lisp ; in: DEFMETHOD CREATE-NON-GREEDY-NO-ZERO-MATCHER (REPETITION T) ; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0) ; --> LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:*REPEAT-COUNTERS*21 #:REP-NUM22) ; ; 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)) ; --> LET* + ; ==> ; (AREF #:*REPEAT-COUNTERS*16 #:REP-NUM17) ; ; 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. ; --> LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:*REPEAT-COUNTERS*16 #:REP-NUM17) ; ; 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)) ; --> LET* SB-IMPL::XSUBTRACT ; ==> ; (AREF #:*REPEAT-COUNTERS*19 #:REP-NUM20) ; ; 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. ; --> LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:*REPEAT-COUNTERS*19 #:REP-NUM20) ; ; 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. ; processing (DEFGENERIC CREATE-NON-GREEDY-MATCHER ...) ; processing (DEFMETHOD CREATE-NON-GREEDY-MATCHER ...) ; file: /usr/share/common-lisp/source/cl-ppcre/repetition-closures.lisp ; 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) ; --> PROGN SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:*REPEAT-COUNTERS*24 #:REP-NUM25) ; ; 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)) ; --> LET* + ; ==> ; (AREF #:*REPEAT-COUNTERS*17 #:REP-NUM18) ; ; 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. ; --> LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:*REPEAT-COUNTERS*17 #:REP-NUM18) ; ; 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)) ; --> LET* SB-IMPL::XSUBTRACT ; ==> ; (AREF #:*REPEAT-COUNTERS*20 #:REP-NUM21) ; ; 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. ; --> LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:*REPEAT-COUNTERS*20 #:REP-NUM21) ; ; 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. ; processing (DEFMACRO CONSTANT-REPETITION-CONSTANT-LENGTH-CLOSURE ...) ; processing (DEFGENERIC CREATE-CONSTANT-REPETITION-CONSTANT-LENGTH-MATCHER ...) ; processing (DEFMETHOD CREATE-CONSTANT-REPETITION-CONSTANT-LENGTH-MATCHER ...) ; file: /usr/share/common-lisp/source/cl-ppcre/repetition-closures.lisp ; 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 LET CL-PPCRE::CONSTANT-REPETITION-CONSTANT-LENGTH-CLOSURE LAMBDA ; --> FUNCTION LET AND IF IF LOOP BLOCK LET TAGBODY UNLESS IF AND IF ; ==> ; (FUNCALL #:TEST-FUNCTION36 (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)) ; ; 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. ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS CL-PPCRE::NEXT-POS ; 0 CL-PPCRE::LEN) ; --> BLOCK LOOP BLOCK LET LET TAGBODY UNLESS IF ; ==> ; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::STRING1-IDX) ; (SCHAR CL-PPCRE::STRING2 CL-PPCRE::STRING2-IDX)) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; (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))) ; --> 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) ; . #1=(&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) ; . #1#), 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))) ; --> 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) ; . #1=(&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) ; . #1#), 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))) ; --> 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) ; . #1=(&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) ; . #1#), 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))) ; --> 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) ; . #1=(&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) ; . #1#), 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 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) ; . #1=(&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) ; . #1#), 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))) ; --> 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) ; . #1=(&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) ; . #1#), 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)) ; --> 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) ; . #1=(&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) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; processing (DEFGENERIC CREATE-CONSTANT-REPETITION-MATCHER ...) ; processing (DEFMETHOD CREATE-CONSTANT-REPETITION-MATCHER ...) ; file: /usr/share/common-lisp/source/cl-ppcre/repetition-closures.lisp ; in: DEFMETHOD CREATE-CONSTANT-REPETITION-MATCHER (REPETITION T) ; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0) ; --> LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:*REPEAT-COUNTERS*39 #:REP-NUM40) ; ; 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)) ; --> LET* + ; ==> ; (AREF #:*REPEAT-COUNTERS*34 #:REP-NUM35) ; ; 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. ; --> LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:*REPEAT-COUNTERS*34 #:REP-NUM35) ; ; 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)) ; --> LET* SB-IMPL::XSUBTRACT ; ==> ; (AREF #:*REPEAT-COUNTERS*37 #:REP-NUM38) ; ; 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. ; --> LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:*REPEAT-COUNTERS*37 #:REP-NUM38) ; ; 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) ; --> PROGN SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:*REPEAT-COUNTERS*29 #:REP-NUM30) ; ; 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)) ; --> LET* + ; ==> ; (AREF #:*REPEAT-COUNTERS*22 #:REP-NUM23) ; ; 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. ; --> LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:*REPEAT-COUNTERS*22 #:REP-NUM23) ; ; 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)) ; --> LET* SB-IMPL::XSUBTRACT ; ==> ; (AREF #:*REPEAT-COUNTERS*25 #:REP-NUM26) ; ; 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. ; --> LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:*REPEAT-COUNTERS*25 #:REP-NUM26) ; ; 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. ; processing (DEFMETHOD CREATE-MATCHER-AUX ...) ; file: /usr/share/common-lisp/source/cl-ppcre/repetition-closures.lisp ; in: DEFMETHOD CREATE-MATCHER-AUX (REPETITION T) ; (AND CL-PPCRE::MAXIMUM (ZEROP CL-PPCRE::MAXIMUM)) ; --> IF ; ==> ; (ZEROP ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'CL-PPCRE::MAXIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'CL-PPCRE::MAXIMUM))) ; ; 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)) ; --> 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::MAXIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'CL-PPCRE::MAXIMUM)) ; 1) ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), 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)) ; --> LET ; ==> ; (PLUSP ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'CL-PPCRE::MIN-LEN) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'CL-PPCRE::MIN-LEN))) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (AND CL-PPCRE::LEN (PLUSP CL-PPCRE::LEN) (NOT CL-PPCRE::CONTAINS-REGISTER-P)) ; --> IF IF ; ==> ; (PLUSP ; (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 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)) ; --> LET ; ==> ; (PLUSP ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'CL-PPCRE::MIN-LEN) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'CL-PPCRE::MIN-LEN))) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (AND CL-PPCRE::MAXIMUM (= CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM 1)) ; --> 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::MAXIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'CL-PPCRE::MAXIMUM)) ; 1) ; ; note: forced to do GENERIC-= (cost 10) ; unable to do #1=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 #1# (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 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 #1=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 #1# (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 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 #1=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 #1# (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)) ; --> LET ; ==> ; (PLUSP ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'CL-PPCRE::MIN-LEN) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'CL-PPCRE::MIN-LEN))) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a T, not a FIXNUM. ; unable to do #1# (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 IF ; ==> ; (PLUSP ; (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 #1=inline fixnum comparison (cost 3) because: ; The first argument is a T, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a T, not a FIXNUM. ; etc. ; (OR (PLUSP CL-PPCRE::MIN-LEN) (EQL CL-PPCRE::MAXIMUM 1)) ; --> LET ; ==> ; (PLUSP ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'CL-PPCRE::MIN-LEN) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'CL-PPCRE::MIN-LEN))) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a T, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a T, not a FIXNUM. ; etc. ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-ppcre/repetition-closures-tmpSU9OHSB9.fasl ; compilation finished in 0:00:03.687 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/scanner.lisp" (written 07 APR 2019 03:51:26 AM): ; processing (IN-PACKAGE :CL-PPCRE) ; processing (DEFMACRO BMH-MATCHER-AUX ...) ; processing (DEFUN CREATE-BMH-MATCHER ...) ; file: /usr/share/common-lisp/source/cl-ppcre/scanner.lisp ; in: DEFUN CREATE-BMH-MATCHER ; (CL-PPCRE::BMH-MATCHER-AUX :CASE-INSENSITIVE-P T) ; --> LAMBDA FUNCTION IF LOOP BLOCK LET TAGBODY LOOP BLOCK LET LET TAGBODY ; --> UNLESS IF AND IF ; ==> ; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::I) ; (SCHAR CL-PPCRE::PATTERN CL-PPCRE::J)) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; (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. ; processing (DEFMACRO CHAR-SEARCHER-AUX ...) ; processing (DEFUN CREATE-CHAR-SEARCHER ...) ; file: /usr/share/common-lisp/source/cl-ppcre/scanner.lisp ; in: DEFUN CREATE-CHAR-SEARCHER ; (CL-PPCRE::CHAR-SEARCHER-AUX :CASE-INSENSITIVE-P T) ; --> LAMBDA FUNCTION AND IF LOOP BLOCK LET LET TAGBODY WHEN IF SETQ THE AND IF ; ==> ; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::I) CL-PPCRE::CHR) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; processing (DECLAIM (INLINE NEWLINE-SKIPPER)) ; processing (DEFUN NEWLINE-SKIPPER ...) ; processing (DEFMACRO INSERT-ADVANCE-FN ...) ; processing (DEFUN CREATE-SCANNER-AUX ...) ; file: /usr/share/common-lisp/source/cl-ppcre/scanner.lisp ; in: DEFUN CREATE-SCANNER-AUX ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) CL-PPCRE::POS)) ; --> LAMBDA 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 of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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. ; --> LAMBDA 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. ; --> LAMBDA 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 of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF ; --> AND IF ; ==> ; (NOT ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STARTS-WITH-STR CL-PPCRE::*START-POS* ; (+ CL-PPCRE::*START-POS* ; CL-PPCRE::STARTS-WITH-LEN) ; 0 CL-PPCRE::STARTS-WITH-LEN)) ; ; 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. ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF ; ==> ; (<= CL-PPCRE::*START-POS* CL-PPCRE::*END-STRING-POS*) ; ; 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)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF ; --> AND IF ; ==> ; (NOT ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STARTS-WITH-STR CL-PPCRE::*START-POS* ; (+ CL-PPCRE::*START-POS* ; CL-PPCRE::STARTS-WITH-LEN) ; 0 CL-PPCRE::STARTS-WITH-LEN)) ; ; 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. ; --> LAMBDA 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 of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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. ; --> LAMBDA 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. ; --> LAMBDA 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 of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF ; --> AND IF ; ==> ; (NOT ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STARTS-WITH-STR CL-PPCRE::*START-POS* ; (+ CL-PPCRE::*START-POS* ; CL-PPCRE::STARTS-WITH-LEN) ; 0 CL-PPCRE::STARTS-WITH-LEN)) ; ; 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. ; --> LAMBDA 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 of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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. ; --> LAMBDA 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. ; --> LAMBDA 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 of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF ; ==> ; (<= CL-PPCRE::*START-POS* CL-PPCRE::*END-STRING-POS*) ; ; 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)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF ; --> AND IF ; ==> ; (NOT ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STARTS-WITH-STR CL-PPCRE::*START-POS* ; (+ CL-PPCRE::*START-POS* ; CL-PPCRE::STARTS-WITH-LEN) ; 0 CL-PPCRE::STARTS-WITH-LEN)) ; ; 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. ; --> LAMBDA 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 of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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. ; --> LAMBDA 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. ; --> LAMBDA 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 of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF ; --> AND IF ; ==> ; (NOT ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STARTS-WITH-STR CL-PPCRE::*START-POS* ; (+ CL-PPCRE::*START-POS* ; CL-PPCRE::STARTS-WITH-LEN) ; 0 CL-PPCRE::STARTS-WITH-LEN)) ; ; 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. ; --> LAMBDA 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 of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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. ; --> LAMBDA 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. ; --> LAMBDA 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 of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF ; ==> ; (<= CL-PPCRE::*START-POS* CL-PPCRE::*END-STRING-POS*) ; ; 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)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF ; --> AND IF ; ==> ; (NOT ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STARTS-WITH-STR CL-PPCRE::*START-POS* ; (+ CL-PPCRE::*START-POS* ; CL-PPCRE::STARTS-WITH-LEN) ; 0 CL-PPCRE::STARTS-WITH-LEN)) ; ; 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. ; --> LAMBDA 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 of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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. ; --> LAMBDA 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. ; --> LAMBDA 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 of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 # ; #))))) ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF ; --> AND IF ; ==> ; (NOT ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STARTS-WITH-STR CL-PPCRE::*START-POS* ; (+ CL-PPCRE::*START-POS* ; CL-PPCRE::STARTS-WITH-LEN) ; 0 CL-PPCRE::STARTS-WITH-LEN)) ; ; 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. ; --> LAMBDA 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 of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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. ; --> LAMBDA 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. ; --> LAMBDA 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 of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 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 # ; #))))) ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF ; --> AND IF ; ==> ; (NOT ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STARTS-WITH-STR CL-PPCRE::*START-POS* ; (+ CL-PPCRE::*START-POS* ; CL-PPCRE::STARTS-WITH-LEN) ; 0 CL-PPCRE::STARTS-WITH-LEN)) ; ; 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 # ; #))))) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF ; ==> ; (<= CL-PPCRE::*START-POS* CL-PPCRE::*END-STRING-POS*) ; ; 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 # ; #))))) ; --> LAMBDA 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 of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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. ; --> LAMBDA 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. ; --> LAMBDA 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 of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF ; ==> ; (<= CL-PPCRE::*START-POS* CL-PPCRE::*END-STRING-POS*) ; ; 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)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF ; ==> ; (<= CL-PPCRE::*START-POS* CL-PPCRE::*END-STRING-POS*) ; ; 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)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF ; ==> ; (<= CL-PPCRE::*START-POS* CL-PPCRE::*END-STRING-POS*) ; ; 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 # ; #))))) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF ; ==> ; (<= CL-PPCRE::*START-POS* CL-PPCRE::*END-STRING-POS*) ; ; 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. ; --> LAMBDA 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 #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; --> LAMBDA 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. ; --> LAMBDA 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 #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), 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 # ; #))))) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF ; ==> ; (<= CL-PPCRE::*START-POS* CL-PPCRE::*END-STRING-POS*) ; ; 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. ; --> LAMBDA 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 #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; --> LAMBDA 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. ; --> LAMBDA 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 #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), 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)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF ; ==> ; (<= CL-PPCRE::*START-POS* CL-PPCRE::*END-STRING-POS*) ; ; 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. ; --> LAMBDA 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 #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; --> LAMBDA 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. ; --> LAMBDA 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 #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), 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)) ; (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)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF ; ==> ; (<= CL-PPCRE::*START-POS* CL-PPCRE::*END-STRING-POS*) ; ; 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. ; --> LAMBDA 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 #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; --> LAMBDA 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. ; --> LAMBDA 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 #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), 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)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF ; ==> ; (<= CL-PPCRE::*START-POS* CL-PPCRE::*END-STRING-POS*) ; ; 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. ; --> LAMBDA 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 #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; --> LAMBDA 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. ; --> LAMBDA 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 #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), 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)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF ; ==> ; (<= CL-PPCRE::*START-POS* CL-PPCRE::*END-STRING-POS*) ; ; 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. ; --> LAMBDA 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 #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; --> LAMBDA 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. ; --> LAMBDA 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 #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), 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)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF ; ==> ; (<= CL-PPCRE::*START-POS* CL-PPCRE::*END-STRING-POS*) ; ; 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. ; --> LAMBDA 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 #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; --> LAMBDA 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. ; --> LAMBDA 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 #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) CL-PPCRE::POS)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF ; ==> ; (<= CL-PPCRE::*START-POS* CL-PPCRE::*END-STRING-POS*) ; ; 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. ; --> LAMBDA 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 #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; --> LAMBDA 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. ; --> LAMBDA 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 #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), 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 /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-ppcre/scanner-tmpTEZ5J20P.fasl ; compilation finished in 0:00:05.403 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/api.lisp" (written 07 APR 2019 03:51:26 AM): ; processing (IN-PACKAGE :CL-PPCRE) ; processing (DEFVAR *LOOK-AHEAD-FOR-SUFFIX* ...) ; processing (DEFGENERIC CREATE-SCANNER ...) ; processing (DEFMETHOD CREATE-SCANNER ...) ; 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. ; processing (DEFMETHOD CREATE-SCANNER ...) ; processing (DEFMETHOD CREATE-SCANNER ...) ; file: /usr/share/common-lisp/source/cl-ppcre/api.lisp ; 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 #1=inline fixnum comparison (cost 3) because: ; The first argument is a T, not a FIXNUM. ; unable to do #1# (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 #1=inline fixnum comparison (cost 3) because: ; The first argument is a T, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a T, not a FIXNUM. ; etc. ; processing (DEFGENERIC SCAN ...) ; processing (DEFMETHOD SCAN ...) ; file: /usr/share/common-lisp/source/cl-ppcre/api.lisp ; 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 CONS NULL ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; processing (DEFMETHOD SCAN ...) ; file: /usr/share/common-lisp/source/cl-ppcre/api.lisp ; 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 CONS NULL ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; processing (DEFMETHOD SCAN ...) ; file: /usr/share/common-lisp/source/cl-ppcre/api.lisp ; 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 CONS NULL ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; processing (DEFINE-COMPILER-MACRO SCAN ...) ; processing (DEFUN SCAN-TO-STRINGS ...) ; file: /usr/share/common-lisp/source/cl-ppcre/api.lisp ; 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. ; processing (DEFINE-COMPILER-MACRO SCAN-TO-STRINGS ...) ; processing (DEFMACRO REGISTER-GROUPS-BIND ...) ; processing (DEFMACRO DO-SCANS ...) ; file: /usr/share/common-lisp/source/cl-ppcre/api.lisp ; 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. ... {1007D78C3F}> ; (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) ; processing (DEFMACRO DO-MATCHES ...) ; file: /usr/share/common-lisp/source/cl-ppcre/api.lisp ; 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, ; ... {10081C68AF}> ; (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) ; processing (DEFMACRO DO-MATCHES-AS-STRINGS ...) ; file: /usr/share/common-lisp/source/cl-ppcre/api.lisp ; 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... {100834800F}> ; (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) ; processing (DEFMACRO DO-REGISTER-GROUPS ...) ; file: /usr/share/common-lisp/source/cl-ppcre/api.lisp ; 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... {1008540C3F}> ; (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) ; processing (DEFUN ALL-MATCHES ...) ; file: /usr/share/common-lisp/source/cl-ppcre/api.lisp ; 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)) ; --> CL-PPCRE:DO-SCANS 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. ; --> CL-PPCRE:DO-SCANS LET BLOCK LET* SETQ THE ; --> CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND IF THE ; ==> ; (COERCE #:=STRING=8 'SIMPLE-STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS NULL ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; --> CL-PPCRE:DO-SCANS 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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. ; ==> ; (1+ CL-PPCRE::MATCH-END) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), 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 SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), not a RATIONAL. ; ==> ; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; ; note: forced to do GENERIC-= (cost 10) ; unable to do #1=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 #1# (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. ; ==> ; (1+ CL-PPCRE::MATCH-END) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; processing (DEFINE-COMPILER-MACRO ALL-MATCHES ...) ; processing (DEFUN ALL-MATCHES-AS-STRINGS ...) ; file: /usr/share/common-lisp/source/cl-ppcre/api.lisp ; 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 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 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 #:=STRING=12 'SIMPLE-STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS NULL ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; --> LET 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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. ; ==> ; (1+ #:MATCH-END3) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), 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 SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), not a RATIONAL. ; ==> ; (= #:MATCH-START2 #:MATCH-END3) ; ; note: forced to do GENERIC-= (cost 10) ; unable to do #1=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 #1# (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. ; ==> ; (1+ #:MATCH-END3) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; processing (DEFINE-COMPILER-MACRO ALL-MATCHES-AS-STRINGS ...) ; processing (DEFUN SPLIT ...) ; file: /usr/share/common-lisp/source/cl-ppcre/api.lisp ; 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))) ; --> LET 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. ; --> LET BLOCK LET* SETQ THE CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND ; --> IF THE ; ==> ; (COERCE #:=STRING=6 'SIMPLE-STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS NULL ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) numeric operation ; due to type uncertainty: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), 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 SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), 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 SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), 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 ...) ; --> BLOCK LET LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE ; ==> ; (AREF #:LOOP-ACROSS-VECTOR-9 #:LOOP-ACROSS-INDEX-10) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ==> ; (AREF #:LOOP-ACROSS-VECTOR-12 #:LOOP-ACROSS-INDEX-13) ; ; 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))) ; --> 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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. ; ==> ; (1+ CL-PPCRE::MATCH-END) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), 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 SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), not a RATIONAL. ; (> CL-PPCRE::THIS-END CL-PPCRE::THIS-START) ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 #1=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 #1# (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 #1=inline float comparison (cost 3) because: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), not a DOUBLE-FLOAT. ; The second argument is a T, not a (COMPLEX DOUBLE-FLOAT). ; unable to do #1# (cost 3) because: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), 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 #1=inline fixnum comparison (cost 3) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; etc. ; (INCF CL-PPCRE::COUNTER) ; --> SETQ THE ; ==> ; (+ 1 CL-PPCRE::COUNTER) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) . #2=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) . #2#), 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))) ; --> 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 #1=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 #1# (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. ; ==> ; (1+ CL-PPCRE::MATCH-END) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), 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 #1=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 #1# (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. ; processing (DEFINE-COMPILER-MACRO SPLIT ...) ; processing (DEFUN STRING-CASE-MODIFIER ...) ; file: /usr/share/common-lisp/source/cl-ppcre/api.lisp ; 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. ; processing (DEFGENERIC BUILD-REPLACEMENT-TEMPLATE ...) ; processing (LET* (# #) ...) ; file: /usr/share/common-lisp/source/cl-ppcre/api.lisp ; 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 #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a (OR INTEGER . #2=(NULL)), not a FIXNUM. ; The result is a (VALUES INTEGER . #3=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (OR INTEGER . #2#), not a FIXNUM. ; The result is a (VALUES INTEGER . #3#), not a (VALUES FIXNUM &REST T). ; etc. ; (< CL-PPCRE::TOKEN 0) ; ; note: forced to do FAST-IF-<-ZERO (cost 9) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a INTEGER, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; processing (DEFMETHOD BUILD-REPLACEMENT-TEMPLATE ...) ; processing (DEFMETHOD BUILD-REPLACEMENT-TEMPLATE ...) ; processing (DEFMETHOD BUILD-REPLACEMENT-TEMPLATE ...) ; processing (DEFUN BUILD-REPLACEMENT ...) ; file: /usr/share/common-lisp/source/cl-ppcre/api.lisp ; in: DEFUN BUILD-REPLACEMENT ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START ; CL-PPCRE::REG-END) ; --> BLOCK MAKE-ARRAY ; ==> ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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) ; --> BLOCK ; ==> ; (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. ; (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) ; --> BLOCK MAKE-ARRAY ; ==> ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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) ; --> BLOCK MAKE-ARRAY ; ==> ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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) ; --> BLOCK MAKE-ARRAY ; ==> ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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. ; (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 # # # # #))))) ; --> SB-INT:DX-LET LET ; ==> ; (MAKE-STRING 31 :ELEMENT-TYPE CL-PPCRE::ELEMENT-TYPE) ; ; note: unable to optimize because: ELEMENT-TYPE is not constant. ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::MATCH-START ; CL-PPCRE::MATCH-END) ; --> BLOCK ; ==> ; (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) ; --> BLOCK ; ==> ; (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 # # # # #))))) ; --> SB-INT:DX-LET LET ; ==> ; (MAKE-STRING 31 :ELEMENT-TYPE CL-PPCRE::ELEMENT-TYPE) ; ; note: could not stack allocate #:G69 in: ; (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 #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) . #2=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::MATCH-START ; CL-PPCRE::MATCH-END) ; --> BLOCK MAKE-ARRAY ; ==> ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START ; CL-PPCRE::REG-END) ; --> BLOCK MAKE-ARRAY ; ==> ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; processing (DEFUN REPLACE-AUX ...) ; file: /usr/share/common-lisp/source/cl-ppcre/api.lisp ; 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 ...)) ; --> SB-INT:DX-LET LET ; ==> ; (MAKE-STRING 31 :ELEMENT-TYPE CL-PPCRE::ELEMENT-TYPE) ; ; note: unable to optimize because: ELEMENT-TYPE is not constant. ; ; note: could not stack allocate #:G39 in: ; (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))) ; processing (DEFUN REGEX-REPLACE ...) ; file: /usr/share/common-lisp/source/cl-ppcre/api.lisp ; 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. ; processing (DEFINE-COMPILER-MACRO REGEX-REPLACE ...) ; processing (DEFUN REGEX-REPLACE-ALL ...) ; file: /usr/share/common-lisp/source/cl-ppcre/api.lisp ; 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)) ; --> LET 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. ; --> LET BLOCK LET* SETQ THE CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND ; --> IF THE ; ==> ; (COERCE #:=STRING=6 'SIMPLE-STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS NULL ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; --> 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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. ; ==> ; (1+ CL-PPCRE::MATCH-END) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), 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 SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), 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)) ; --> 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 #1=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 #1# (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. ; ==> ; (1+ CL-PPCRE::MATCH-END) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT RATIONAL ; (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT) ; (COMPLEX RATIONAL)), not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; processing (DEFINE-COMPILER-MACRO REGEX-REPLACE-ALL ...) ; processing (DEFMACRO REGEX-APROPOS-AUX ...) ; processing (DEFUN REGEX-APROPOS-LIST ...) ; file: /usr/share/common-lisp/source/cl-ppcre/api.lisp ; 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... {100AF68F1F}> ; (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)))) ; --> PROGN 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... {100AF68F1F}> ; (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)) ; processing (DEFUN PRINT-SYMBOL-INFO ...) ; processing (DEFUN REGEX-APROPOS ...) ; file: /usr/share/common-lisp/source/cl-ppcre/api.lisp ; 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 ... {100B4FF46F}> ; (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)) ; --> PROGN 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 ... {100B4FF46F}> ; (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)) ; processing (LET* (# #) ...) ; processing (LET* (# # ...) ...) ; processing (LET* (# # ...) ...) ; processing (DEFUN PARSE-TREE-SYNONYM ...) ; processing (DEFUN (SETF PARSE-TREE-SYNONYM) ...) ; processing (DEFMACRO DEFINE-PARSE-TREE-SYNONYM ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-ppcre/api-tmp7EQWE70T.fasl ; compilation finished in 0:00:04.535 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/cl-unicode/packages.lisp" (written 01 NOV 2020 09:00:59 AM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE :CL-UNICODE ...) ; processing (DEFPACKAGE :CL-UNICODE-NAMES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-unicode/packages-tmp83ON8YFR.fasl ; compilation finished in 0:00:00.019 ; compiling file "/usr/share/common-lisp/source/cl-unicode/specials.lisp" (written 01 NOV 2020 09:00:59 AM): ; processing (IN-PACKAGE :CL-UNICODE) ; processing (DEFCONSTANT +CODE-POINT-LIMIT+ ...) ; processing (DEFVAR *CANONICAL-NAMES* ...) ; processing (DEFVAR *NAMES-TO-CODE-POINTS* ...) ; processing (DEFVAR *UNICODE1-NAMES-TO-CODE-POINTS* ...) ; processing (DEFVAR *CODE-POINTS-TO-NAMES* ...) ; processing (DEFVAR *CODE-POINTS-TO-UNICODE1-NAMES* ...) ; processing (DEFVAR *CASE-MAPPINGS* ...) ; processing (DEFVAR *SPECIAL-CASE-MAPPINGS* ...) ; processing (DEFVAR *COMPOSITION-MAPPINGS* ...) ; processing (DEFVAR *GENERAL-CATEGORIES* ...) ; processing (DEFVAR *COMPATIBILITY-FORMATTING-TAGS* ...) ; processing (DEFVAR *SCRIPTS* ...) ; processing (DEFVAR *CODE-BLOCKS* ...) ; processing (DEFVAR *BINARY-PROPERTIES* ...) ; processing (DEFVAR *BIDI-CLASSES* ...) ; processing (DEFVAR *PROPERTY-MAP* ...) ; processing (DEFVAR *PROPERTY-TESTS* ...) ; processing (DEFVAR *PROPERTY-ALIASES* ...) ; processing (DEFVAR *JAMO-SHORT-NAMES* ...) ; processing (DEFVAR *HANGUL-SYLLABLES-TO-CODE-POINTS* ...) ; processing (DEFVAR *TRY-UNICODE1-NAMES-P* ...) ; processing (DEFVAR *TRY-ABBREVIATIONS-P* ...) ; processing (DEFVAR *SCRIPTS-TO-TRY* ...) ; processing (DEFVAR *TRY-HEX-NOTATION-P* ...) ; processing (DEFVAR *TRY-LISP-NAMES-P* ...) ; processing (DEFVAR *PREVIOUS-READTABLES* ...) ; processing (PUSHNEW :CL-UNICODE ...) ; processing (DEFVAR *HYPERDOC-BASE-URI* ...) ; processing (LET (#) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-unicode/specials-tmpEOOWYRL6.fasl ; compilation finished in 0:00:00.115 ; compiling file "/usr/share/common-lisp/source/cl-unicode/util.lisp" (written 01 NOV 2020 09:00:59 AM): ; processing (IN-PACKAGE :CL-UNICODE) ; processing (DEFUN PARSE-HEX ...) ; processing (DEFUN CANONICALIZE-NAME ...) ; processing (DEFUN PROPERTY-SYMBOL ...) ; processing (DEFUN REGISTER-PROPERTY-SYMBOL ...) ; processing (DEFUN LOOKUP-PROPERTY-ALIAS ...) ; processing (DEFUN PROPERTY-NAME ...) ; processing (DEFUN TREE-LOOKUP ...) ; processing (DEFGENERIC MAPPING ...) ; processing (DEFUN EVALUATE-CASING-CONDITION ...) ; processing (DEFGENERIC SPECIAL-MAPPING ...) ; processing (DEFGENERIC CASE-FOLDING ...) ; processing (DEFUN CJK-UNIFIED-IDEOGRAPH-P ...) ; processing (DEFUN MAYBE-COMPUTE-CJK-NAME ...) ; processing (DEFUN MAYBE-FIND-CJK-CODE-POINT ...) ; processing (DEFMACRO DEFINE-HANGUL-CONSTANT ...) ; processing (DEFINE-HANGUL-CONSTANT "SBase" ...) ; processing (DEFINE-HANGUL-CONSTANT "LBase" ...) ; processing (DEFINE-HANGUL-CONSTANT "VBase" ...) ; processing (DEFINE-HANGUL-CONSTANT "TBase" ...) ; processing (DEFINE-HANGUL-CONSTANT "VCount" ...) ; processing (DEFINE-HANGUL-CONSTANT "TCount" ...) ; processing (DEFINE-HANGUL-CONSTANT "NCount" ...) ; processing (DECLAIM (INLINE COMPUTE-HANGUL-NAME)) ; processing (DEFUN COMPUTE-HANGUL-NAME ...) ; processing (DECLAIM (INLINE COMPUTE-HANGUL-DECOMPOSITION)) ; processing (DEFUN COMPUTE-HANGUL-DECOMPOSITION ...) ; processing (DEFCONSTANT +FIRST-HANGUL-SYLLABLE+ ...) ; processing (DEFCONSTANT +LAST-HANGUL-SYLLABLE+ ...) ; processing (DEFUN ADD-HANGUL-NAMES ...) ; processing (DEFUN HANGUL-SYLLABLE-P ...) ; processing (DEFUN MAYBE-COMPUTE-HANGUL-SYLLABLE-NAME ...) ; processing (DEFUN MAYBE-FIND-HANGUL-SYLLABLE-CODE-POINT ...) ; processing (DEFMACRO ENSURE-CODE-POINT ...) ; processing (DEFUN CANONICAL-SORT ...) ; processing (DEFUN CANONICAL-COMPOSITION ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-unicode/util-tmpFDZ5SF8C.fasl ; compilation finished in 0:00:01.551 ; compiling file "/usr/share/common-lisp/source/cl-unicode/conditions.lisp" (written 01 NOV 2020 09:00:59 AM): ; processing (IN-PACKAGE :CL-UNICODE) ; processing (DEFINE-CONDITION UNICODE-ERROR ...) ; processing (DEFINE-CONDITION SIMPLE-UNICODE-ERROR ...) ; processing (DEFUN SIGNAL-UNICODE-ERROR ...) ; processing (DEFINE-CONDITION CHARACTER-NOT-FOUND ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-unicode/conditions-tmp6MGXO15Y.fasl ; compilation finished in 0:00:00.035 ; compiling file "/usr/share/common-lisp/source/cl-unicode/lists.lisp" (written 16 DEC 2020 09:36:18 PM): ; processing (IN-PACKAGE :CL-UNICODE) ; processing (SETQ *GENERAL-CATEGORIES* ...) ; processing (SETQ *COMPATIBILITY-FORMATTING-TAGS* ...) ; processing (SETQ *SCRIPTS* ...) ; processing (SETQ *CODE-BLOCKS* ...) ; processing (SETQ *BINARY-PROPERTIES* ...) ; processing (SETQ *BIDI-CLASSES* ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-unicode/lists-tmpSWPNJISY.fasl ; compilation finished in 0:00:00.031 ; compiling file "/usr/share/common-lisp/source/cl-unicode/hash-tables.lisp" (written 16 DEC 2020 09:36:18 PM): ; processing (IN-PACKAGE :CL-UNICODE) ; processing (CLRHASH *CANONICAL-NAMES*) ; processing (LOOP FOR ...) ; processing (CLRHASH *NAMES-TO-CODE-POINTS*) ; processing (LOOP FOR ...) ; processing (CLRHASH *CODE-POINTS-TO-NAMES*) ; processing (LOOP FOR ...) ; processing (CLRHASH *UNICODE1-NAMES-TO-CODE-POINTS*) ; processing (LOOP FOR ...) ; processing (CLRHASH *CODE-POINTS-TO-UNICODE1-NAMES*) ; processing (LOOP FOR ...) ; processing (CLRHASH *CASE-MAPPINGS*) ; processing (LOOP FOR ...) ; processing (CLRHASH *SPECIAL-CASE-MAPPINGS*) ; processing (LOOP FOR ...) ; processing (CLRHASH *JAMO-SHORT-NAMES*) ; processing (LOOP FOR ...) ; processing (CLRHASH *PROPERTY-ALIASES*) ; processing (LOOP FOR ...) ; processing (CLRHASH *COMPOSITION-MAPPINGS*) ; processing (LOOP FOR ...) ; processing (ADD-HANGUL-NAMES) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-unicode/hash-tables-tmpUXH28IAQ.fasl ; compilation finished in 0:00:10.791 ;;; Computing Hangul syllable names ; compiling file "/usr/share/common-lisp/source/cl-unicode/api.lisp" (written 01 NOV 2020 09:00:59 AM): ; processing (IN-PACKAGE :CL-UNICODE) ; processing (DEFUN TRY-ABBREVIATIONS ...) ; processing (DEFUN UNICODE-NAME-READER ...) ; processing (DEFUN %ENABLE-ALTERNATIVE-CHARACTER-SYNTAX ...) ; processing (DEFUN %DISABLE-ALTERNATIVE-CHARACTER-SYNTAX ...) ; processing (DEFGENERIC UNICODE-NAME ...) ; processing (DEFGENERIC UNICODE1-NAME ...) ; processing (DEFUN CHARACTER-NAMED ...) ; processing (DEFGENERIC SCRIPT ...) ; processing (DEFGENERIC CODE-BLOCK ...) ; processing (DEFGENERIC WORD-BREAK ...) ; processing (DEFGENERIC AGE ...) ; processing (DEFGENERIC GENERAL-CATEGORY ...) ; processing (DEFGENERIC BIDI-CLASS ...) ; processing (DEFUN BIDI-MIRRORING-GLYPH ...) ; processing (DEFGENERIC NUMERIC-TYPE ...) ; processing (DEFGENERIC NUMERIC-VALUE ...) ; processing (DEFGENERIC COMBINING-CLASS ...) ; processing (DEFGENERIC HAS-BINARY-PROPERTY ...) ; processing (DEFUN UPPERCASE-MAPPING ...) ; processing (DEFUN LOWERCASE-MAPPING ...) ; processing (DEFUN TITLECASE-MAPPING ...) ; processing (DEFUN CASE-FOLD-MAPPING ...) ; processing (DEFUN GENERAL-CATEGORIES ...) ; processing (DEFUN SCRIPTS ...) ; processing (DEFUN CODE-BLOCKS ...) ; processing (DEFGENERIC CANONICAL-DECOMPOSITION ...) ; processing (DEFGENERIC COMPATIBILITY-DECOMPOSITION ...) ; processing (DEFGENERIC NORMALIZATION-FORM-D ...) ; processing (DEFGENERIC NORMALIZATION-FORM-K-D ...) ; processing (DEFGENERIC NORMALIZATION-FORM-C ...) ; processing (DEFGENERIC NORMALIZATION-FORM-K-C ...) ; processing (DEFUN BINARY-PROPERTIES ...) ; processing (DEFUN BIDI-CLASSES ...) ; processing (DEFUN RECOGNIZED-PROPERTIES ...) ; processing (DEFGENERIC PROPERTY-TEST ...) ; processing (DEFUN HAS-PROPERTY ...) ; processing (DEFUN LIST-ALL-CHARACTERS ...) ; 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) ; ==> ; CHAR-CODE-LIMIT ; ; note: deleting unreachable code ; processing (DEFMACRO ENABLE-ALTERNATIVE-CHARACTER-SYNTAX ...) ; processing (DEFMACRO DISABLE-ALTERNATIVE-CHARACTER-SYNTAX ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-unicode/api-tmpRZXAYVZS.fasl ; compilation finished in 0:00:02.135 ; compiling file "/usr/share/common-lisp/source/cl-unicode/methods.lisp" (written 16 DEC 2020 09:36:18 PM): ; processing (IN-PACKAGE :CL-UNICODE) ; processing (DEFMETHOD SCRIPT ...) ; processing (DEFMETHOD CODE-BLOCK ...) ; processing (DEFMETHOD WORD-BREAK ...) ; processing (DEFMETHOD AGE ...) ; processing (DEFMETHOD GENERAL-CATEGORY ...) ; processing (DEFMETHOD BIDI-CLASS ...) ; processing (DEFMETHOD NUMERIC-TYPE ...) ; processing (DEFMETHOD NUMERIC-VALUE ...) ; processing (DEFMETHOD COMBINING-CLASS ...) ; processing (DEFMETHOD BIDI-MIRRORING-GLYPH% ...) ; processing (DEFMETHOD BINARY-PROPS ...) ; processing (DEFMETHOD IDNA-MAPPING ...) ; processing (DEFMETHOD DECOMPOSITION-MAPPING ...) ; processing (DEFMETHOD CASE-FOLDING-MAPPING ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-unicode/methods-tmpFVBAZC5N.fasl ; compilation finished in 0:00:07.891 ; compiling file "/usr/share/common-lisp/source/cl-unicode/test-functions.lisp" (written 01 NOV 2020 09:00:59 AM): ; processing (IN-PACKAGE :CL-UNICODE) ; processing (DEFUN INSTALL-ONE-TEST ...) ; processing (DEFUN INSTALL-SCRIPT-TESTS ...) ; processing (DEFUN INSTALL-CODE-BLOCK-TESTS ...) ; processing (DEFUN INSTALL-GENERAL-CATEGORY-TESTS ...) ; processing (DEFUN INSTALL-BINARY-PROPERTIES-TESTS ...) ; processing (DEFUN INSTALL-BIDI-CLASS-TESTS ...) ; processing (DEFUN INSTALL-MISCELLANEOUS-TESTS ...) ; processing (DEFUN INSTALL-TESTS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-unicode/test-functions-tmpEN1U5236.fasl ; compilation finished in 0:00:00.111 ; compiling file "/usr/share/common-lisp/source/cl-unicode/derived.lisp" (written 01 NOV 2020 09:00:59 AM): ; processing (IN-PACKAGE :CL-UNICODE) ; processing (DEFCONSTANT +XID-DIFFERENCE+ ...) ; processing (DEFVAR *DERIVED-MAP* ...) ; processing (DEFUN BUILD-DERIVED-TEST-FUNCTION ...) ; processing (DEFUN BUILD-DERIVED-TEST-FUNCTIONS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-unicode/derived-tmpWKFFHE0Z.fasl ; compilation finished in 0:00:00.131 ; compiling file "/usr/share/common-lisp/source/cl-unicode/alias.lisp" (written 01 NOV 2020 09:00:59 AM): ; processing (IN-PACKAGE :CL-UNICODE) ; processing (DEFVAR *ALIAS-MAP* ...) ; processing (DEFVAR *BIDI-ALIAS-MAP* ...) ; processing (DEFUN CREATE-ALIAS ...) ; processing (DEFUN CREATE-ALIASES ...) ; processing (DEFUN BUILD-ALL-PROPERTY-TESTS ...) ; processing (BUILD-ALL-PROPERTY-TESTS) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-unicode/alias-tmpHCGNQVX4.fasl ; compilation finished in 0:00:00.195 ; compiling file "/usr/share/common-lisp/source/named-readtables/src/package.lisp" (written 21 DEC 2020 04:34:51 AM): ; processing (IN-PACKAGE :COMMON-LISP-USER) ; processing (HANDLER-BIND (#) ...) ; processing (PUSHNEW :NAMED-READTABLES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/named-readtables/src/package-tmpNZ1LR6KM.fasl ; compilation finished in 0:00:00.019 ; compiling file "/usr/share/common-lisp/source/named-readtables/src/utils.lisp" (written 21 DEC 2020 04:34:51 AM): ; processing (IN-PACKAGE :EDITOR-HINTS.NAMED-READTABLES) ; processing (DEFMACRO WITHOUT-PACKAGE-LOCK ...) ; processing (DEFMACRO DESTRUCTURE-CASE ...) ; processing (DEFINE-CONDITION SIMPLE-STYLE-WARNING ...) ; processing (DEFUN SIMPLE-STYLE-WARN ...) ; processing (DEFINE-CONDITION SIMPLE-PROGRAM-ERROR ...) ; processing (DEFUN SIMPLE-PROGRAM-ERROR ...) ; processing (DEFUN REQUIRED-ARGUMENT ...) ; processing (DEFUN ENSURE-LIST ...) ; processing (DECLAIM (INLINE ENSURE-FUNCTION)) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN ENSURE-FUNCTION ...) ; processing (DEFUN PARSE-BODY ...) ; processing (DEFUN PARSE-ORDINARY-LAMBDA-LIST ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/named-readtables/src/utils-tmpPQVFZD5C.fasl ; compilation finished in 0:00:00.283 ; compiling file "/usr/share/common-lisp/source/named-readtables/src/define-api.lisp" (written 21 DEC 2020 04:34:51 AM): ; processing (IN-PACKAGE :NAMED-READTABLES) ; processing (DEFMACRO DEFINE-API ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/named-readtables/src/define-api-tmpE8JTPSGT.fasl ; compilation finished in 0:00:00.059 ; compiling file "/usr/share/common-lisp/source/named-readtables/src/cruft.lisp" (written 21 DEC 2020 04:34:51 AM): ; processing (IN-PACKAGE :EDITOR-HINTS.NAMED-READTABLES) ; processing (DEFMACRO DEFINE-CRUFT ...) ; processing (DEFVAR *READTABLE-NAMES* ...) ; processing (DEFINE-CRUFT %ASSOCIATE-READTABLE-WITH-NAME ...) ; processing (DEFINE-CRUFT %UNASSOCIATE-READTABLE-FROM-NAME ...) ; processing (DEFINE-CRUFT %READTABLE-NAME ...) ; processing (DEFINE-CRUFT %LIST-ALL-READTABLE-NAMES ...) ; processing (DEFVAR *NAMED-READTABLES* ...) ; processing (DEFINE-CRUFT %ASSOCIATE-NAME-WITH-READTABLE ...) ; processing (DEFINE-CRUFT %UNASSOCIATE-NAME-FROM-READTABLE ...) ; processing (DEFINE-CRUFT %FIND-READTABLE ...) ; processing (DEFINE-CRUFT FUNCTION= ...) ; processing (DEFINE-CRUFT DISPATCH-MACRO-CHAR-P ...) ; processing (DEFMACRO WITH-READTABLE-ITERATOR ...) ; processing (DEFUN %MAKE-READTABLE-ITERATOR ...) ; 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 #1=SBCL version 2.0.6. ; ; Use SB-IMPL::BASE-CHAR-MACRO-ARRAY instead. ; ; In future #1# 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 #1=SBCL version 2.0.6. ; ; Use SB-IMPL::EXTENDED-CHAR-TABLE instead. ; ; In future #1# versions SB-IMPL:CHARACTER-MACRO-HASH-TABLE will signal a full ; warning at compile-time. ; See also: ; The SBCL Manual, Node "Deprecation Conditions" ; processing (DEFMACRO DO-READTABLE ...) ; processing (DEFINE-CRUFT %STANDARD-READTABLE ...) ; processing (DEFINE-CRUFT %CLEAR-READTABLE ...) ; processing (DEFINE-CRUFT %GET-DISPATCH-MACRO-CHARACTER ...) ; processing (DEFINE-CRUFT %GET-MACRO-CHARACTER ...) ; processing (WITHOUT-PACKAGE-LOCK (:COMMON-LISP) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/named-readtables/src/cruft-tmpXLGMUBFO.fasl ; compilation finished in 0:00:00.503 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 AM): ; processing (IN-PACKAGE :EDITOR-HINTS.NAMED-READTABLES) ; processing (DEFMACRO DEFREADTABLE ...) ; processing (DEFMACRO IN-READTABLE ...) ; processing (DEFUN %FROB-SWANK-READTABLE-ALIST ...) ; processing (DEFTYPE READTABLE-DESIGNATOR ...) ; processing (DEFTYPE NAMED-READTABLE-DESIGNATOR ...) ; processing (DEFUN CONSTANT-STANDARD-READTABLE-EXPRESSION-P ...) ; processing (DEFUN SIGNAL-SUSPICIOUS-REGISTRATION-WARNING ...) ; processing (DEFINE-COMPILER-MACRO REGISTER-READTABLE ...) ; processing (DEFINE-COMPILER-MACRO ENSURE-READTABLE ...) ; processing (DECLAIM (SPECIAL *STANDARD-READTABLE* ...)) ; processing (DEFINE-API MAKE-READTABLE ...) ; 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... {100BA66BEF}> ; (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))))) ; --> PROGN 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... {100BA66BEF}> ; (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) ; processing (DEFINE-API RENAME-READTABLE ...) ; processing (DEFINE-API MERGE-READTABLES-INTO ...) ; processing (DEFUN ENSURE-DISPATCH-MACRO-CHARACTER ...) ; processing (DEFINE-API COPY-NAMED-READTABLE ...) ; processing (DEFINE-API LIST-ALL-NAMED-READTABLES ...) ; processing (DEFINE-CONDITION READTABLE-ERROR ...) ; processing (DEFINE-CONDITION READTABLE-DOES-NOT-EXIST ...) ; processing (DEFINE-CONDITION READTABLE-DOES-ALREADY-EXIST ...) ; processing (DEFINE-CONDITION READER-MACRO-CONFLICT ...) ; processing (DEFUN CHECK-READER-MACRO-CONFLICT ...) ; processing (DEFVAR *STANDARD-READTABLE* ...) ; processing (DEFVAR *EMPTY-READTABLE* ...) ; processing (DEFVAR *CASE-PRESERVING-STANDARD-READTABLE* ...) ; processing (DEFPARAMETER *RESERVED-READTABLE-NAMES* ...) ; processing (DEFUN RESERVED-READTABLE-NAME-P ...) ; processing (DEFUN FIND-RESERVED-READTABLE ...) ; processing (DEFINE-API FIND-READTABLE ...) ; processing (DEFSETF FIND-READTABLE ...) ; processing (DEFINE-API ENSURE-READTABLE ...) ; processing (DEFINE-API REGISTER-READTABLE ...) ; processing (DEFINE-API UNREGISTER-READTABLE ...) ; processing (DEFINE-API READTABLE-NAME ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/named-readtables/src/named-readtables-tmp85XVAH0V.fasl ; compilation finished in 0:00:00.919 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 AM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE :CL-INTERPOL ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-interpol/packages-tmpE4QSJJPV.fasl ; compilation finished in 0:00:00.003 ; compiling file "/usr/share/common-lisp/source/cl-interpol/specials.lisp" (written 06 NOV 2020 02:19:10 AM): ; processing (IN-PACKAGE :CL-INTERPOL) ; processing (DEFVAR *LIST-DELIMITER* ...) ; processing (DEFVAR *INNER-DELIMITERS* ...) ; processing (DEFVAR *OUTER-DELIMITERS* ...) ; processing (DEFVAR *REGEX-DELIMITERS* ...) ; processing (DEFVAR *UNICODE-ALIASES* ...) ; processing (DEFVAR *OPTIONAL-DELIMITERS-P* ...) ; processing (DEFVAR *INTERPOLATE-FORMAT-DIRECTIVES* ...) ; processing (DEFMACRO DEFVAR-UNBOUND ...) ; processing (DEFVAR-UNBOUND *SAW-BACKSLASH* ...) ; processing (DEFVAR-UNBOUND *PAIR-LEVEL* ...) ; processing (DEFVAR-UNBOUND *STREAM* ...) ; processing (DEFVAR-UNBOUND *START-CHAR* ...) ; processing (DEFVAR-UNBOUND *TERM-CHAR* ...) ; processing (DEFVAR *PREVIOUS-READTABLES* ...) ; processing (DEFVAR-UNBOUND *READTABLE-COPY* ...) ; processing (DEFVAR *HYPERDOC-BASE-URI* ...) ; processing (LET (#) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-interpol/specials-tmpW9VXJCU5.fasl ; compilation finished in 0:00:00.067 ; compiling file "/usr/share/common-lisp/source/cl-interpol/util.lisp" (written 06 NOV 2020 02:19:10 AM): ; processing (IN-PACKAGE :CL-INTERPOL) ; processing (DEFINE-CONDITION SIMPLE-READER-ERROR ...) ; processing (DEFMACRO SIGNAL-READER-ERROR ...) ; processing (DEFUN STRING-LIST-TO-STRING ...) ; processing (DEFUN GET-END-DELIMITER ...) ; processing (DECLAIM (INLINE MAKE-COLLECTOR)) ; processing (DEFUN MAKE-COLLECTOR ...) ; processing (DECLAIM (INLINE MAKE-CHAR-FROM-CODE)) ; processing (DEFUN MAKE-CHAR-FROM-CODE ...) ; file: /usr/share/common-lisp/source/cl-interpol/util.lisp ; in: DEFUN MAKE-CHAR-FROM-CODE ; (CL-INTERPOL::SIGNAL-READER-ERROR "No character for char-code #x~X" NUMBER) ; --> ERROR ; ==> ; "No character for char-code #x~X" ; ; note: deleting unreachable code ; processing (DECLAIM (INLINE LOWER-CASE-P*)) ; processing (DEFUN LOWER-CASE-P* ...) ; processing (DEFMACRO READ-CHAR* ...) ; processing (DEFMACRO PEEK-CHAR* ...) ; processing (DECLAIM (INLINE COPY-READTABLE*)) ; processing (DEFUN COPY-READTABLE* ...) ; processing (DECLAIM (INLINE NSUBVEC)) ; processing (DEFUN NSUBVEC ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-interpol/util-tmpIF3QWIV6.fasl ; compilation finished in 0:00:00.123 ; compiling file "/usr/share/common-lisp/source/cl-interpol/alias.lisp" (written 06 NOV 2020 02:19:10 AM): ; processing (IN-PACKAGE :CL-INTERPOL) ; processing (LOOP FOR ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-interpol/alias-tmp9BHJXQOA.fasl ; compilation finished in 0:00:00.015 ; compiling file "/usr/share/common-lisp/source/cl-interpol/read.lisp" (written 06 NOV 2020 02:19:10 AM): ; processing (IN-PACKAGE :CL-INTERPOL) ; processing (DEFUN READ-WHILE ...) ; processing (DECLAIM (INLINE GET-NUMBER)) ; processing (DEFUN GET-NUMBER ...) ; processing (DEFUN RESOLVE-UNICODE-NAME ...) ; processing (DEFUN GET-CHAR-FROM-UNICODE-NAME ...) ; processing (DEFUN UNESCAPE-CHAR ...) ; processing (DECLAIM (INLINE NORMAL-NAME-CHAR-P) ...) ; processing (DEFUN NORMAL-NAME-CHAR-P ...) ; processing (DEFUN NEVER-NAME-CHAR-P ...) ; processing (DEFVAR QUELL-WARNINGS-FORM ...) ; processing (DEFUN READ-LONGEST-NAME ...) ; processing (DEFUN READ-OPTIONAL-DELIMITED ...) ; processing (DECLAIM (INLINE READ-FORM)) ; processing (DEFUN READ-FORM ...) ; processing (DEFUN READ-FORMAT-DIRECTIVE ...) ; processing (DEFUN INTERPOL-READER ...) ; processing (DEFUN INNER-READER ...) ; processing (DEFUN %ENABLE-INTERPOL-SYNTAX ...) ; processing (DEFUN %DISABLE-INTERPOL-SYNTAX ...) ; processing (DEFMACRO ENABLE-INTERPOL-SYNTAX ...) ; processing (DEFMACRO DISABLE-INTERPOL-SYNTAX ...) ; processing (DEFREADTABLE :INTERPOL-SYNTAX ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-interpol/read-tmp8MZGKR5X.fasl ; compilation finished in 0:00:00.855 ; compiling file "/usr/share/common-lisp/source/cl-csv/packages.lisp" (written 29 SEP 2020 04:13:50 AM): ; processing (DEFPACKAGE :CL-CSV ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-csv/packages-tmp54PLG5WT.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/cl-csv/vars.lisp" (written 29 SEP 2020 04:13:50 AM): ; processing (IN-PACKAGE :CL-CSV) ; processing (CL-INTERPOL:ENABLE-INTERPOL-SYNTAX) ; processing (DEFVAR *QUOTE* ...) ; processing (DEFVAR *SEPARATOR* ...) ; processing (DEFVAR *ESCAPE-MODE* ...) ; processing (DEFVAR *READ-NEWLINE* ...) ; processing (DEFVAR *WRITE-NEWLINE* ...) ; processing (DEFVAR *ALWAYS-QUOTE* ...) ; processing (DEFVAR *QUOTE-ESCAPE* ...) ; processing (DEFVAR *UNQUOTED-EMPTY-STRING-IS-NIL* ...) ; processing (DEFVAR *QUOTED-EMPTY-STRING-IS-NIL* ...) ; processing (DEFVAR *TRIM-OUTER-WHITESPACE* ...) ; processing (DEFVAR *ENABLE-SIGNALS* ...) ; processing (DEFVAR *EOF-CHAR* ...) ; processing (DEFVAR *BUFFER-SIZE* ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-csv/vars-tmpGJ7DBMK8.fasl ; compilation finished in 0:00:00.011 ; compiling file "/usr/share/common-lisp/source/cl-csv/read-until.lisp" (written 29 SEP 2020 04:13:50 AM): ; processing (IN-PACKAGE :CL-CSV) ; processing (DEFUN READ-INTO-BUFFER-UNTIL ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-csv/read-until-tmp7O4V59Z5.fasl ; compilation finished in 0:00:00.055 ; compiling file "/usr/share/common-lisp/source/cl-csv/csv.lisp" (written 29 SEP 2020 04:13:50 AM): ; processing (IN-PACKAGE :CL-CSV) ; processing (CL-INTERPOL:ENABLE-INTERPOL-SYNTAX) ; processing (DEFUN WHITE-SPACE? ...) ; processing (DEFINE-CONDITION CSV-PARSE-ERROR ...) ; processing (DEFUN CSV-PARSE-ERROR ...) ; processing (DEFINE-CONDITION CSV-DATA-READ ...) ; processing (DEFUN CSV-DATA-READ ...) ; processing (DEFINE-CONDITION CSV-ROW-READ ...) ; processing (DEFUN CSV-ROW-READ ...) ; processing (DEFGENERIC FORMAT-CSV-VALUE ...) ; processing (DEFUN %CHAR-IN ...) ; processing (DEFUN CHARS-IN ...) ; processing (DEFGENERIC WRITE-CSV-VALUE ...) ; processing (DEFMACRO WITH-CSV-OUTPUT-STREAM ...) ; processing (DEFUN %OUT-STREAM ...) ; processing (DEFUN WRITE-CSV-ROW ...) ; processing (DEFUN WRITE-CSV ...) ; processing (DEFUN %ESCAPE-SEQ? ...) ; processing (DEFVAR *DEFAULT-EXTERNAL-FORMAT* ...) ; processing (DEFUN %IN-STREAM ...) ; processing (DEFMACRO WITH-CSV-INPUT-STREAM ...) ; processing (DEFUN RESTARTABLE-READ-ROW ...) ; processing (DEFMACRO-CLAUSE (FOR VAR ...) ...) ; processing (DEFMACRO-CLAUSE (SAMPLING EXPR ...) ...) ; processing (DEFUN READ-CSV-SAMPLE ...) ; processing (DEFMACRO DO-CSV ...) ; processing (DEFUN READ-CSV-ROW ...) ; processing (DEFUN READ-CSV ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-csv/csv-tmpY90L99EZ.fasl ; compilation finished in 0:00:01.247 ; compiling file "/usr/share/common-lisp/source/cl-csv/parser.lisp" (written 29 SEP 2020 04:13:50 AM): ; processing (IN-PACKAGE :CL-CSV) ; processing (DEFCLASS READ-DISPATCH-TABLE ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFCLASS READ-DISPATCH-TABLE-ENTRY ...) ; processing (DEFUN MAKE-TABLE-ENTRY ...) ; processing (DEFUN RESET-TABLE-ENTRY ...) ; processing (DEFMETHOD CHECK-TABLE-ENTRY ...) ; processing (DEFCLASS CSV-READER ...) ; processing (DEFUN MAP-EMPTY-STRING-TO-NIL ...) ; processing (DEFUN LAST-ITEM ...) ; processing (DEFUN (SETF LAST-ITEM) ...) ; processing (DEFUN %NEXT-CHAR ...) ; processing (DEFMETHOD READING-QUOTED-OR-ESCAPED ...) ; processing (DEFMETHOD READING-QUOTED ...) ; processing (DEFMETHOD READING-FOLLOWING-ESCAPED ...) ; processing (DEFMETHOD READING-ESCAPED ...) ; processing (DEFUN %TRIM-DATUM ...) ; processing (DEFUN COLLECT-DATUM ...) ; processing (DEFUN COLLECT-ROW-DATA ...) ; processing (DEFUN DROP-DELIMITER-CHARS ...) ; processing (DEFMETHOD READING-SEPARATOR ...) ; processing (DEFMETHOD READING-NEWLINE ...) ; processing (DEFUN READING-CHARACTER ...) ; processing (DEFUN %ESCAPE-IS-DOUBLE-QUOTE ...) ; processing (DEFUN MAKE-DEFAULT-CSV-READER ...) ; processing (DEFUN CHECK-AND-DISTPATCH ...) ; processing (DEFUN READ-WITH-DISPATCH-TABLE ...) ; processing (DEFUN READ-CSV-WITH-READER ...) ; processing (DEFUN READ-CSV-ROW-WITH-READER ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-csv/parser-tmpXZJKL4Z8.fasl ; compilation finished in 0:00:00.979 ; compiling file "/usr/share/common-lisp/source/cl-fad/packages.lisp" (written 13 MAY 2020 09:13:13 AM): ; processing (IN-PACKAGE #:CL-USER) ; processing (DEFPACKAGE :CL-FAD ...) ; processing (DEFPACKAGE :PATH ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-fad/packages-tmpHXNPA9C2.fasl ; compilation finished in 0:00:00.019 ; compiling file "/usr/share/common-lisp/source/cl-fad/fad.lisp" (written 13 MAY 2020 09:13:13 AM): ; processing (IN-PACKAGE :CL-FAD) ; processing (DEFUN COMPONENT-PRESENT-P ...) ; processing (DEFUN DIRECTORY-PATHNAME-P ...) ; processing (DEFUN PATHNAME-AS-DIRECTORY ...) ; processing (DEFUN DIRECTORY-WILDCARD ...) ; processing (DEFUN LIST-DIRECTORY ...) ; processing (DEFUN PATHNAME-AS-FILE ...) ; processing (DEFUN FILE-EXISTS-P ...) ; processing (DEFUN DIRECTORY-EXISTS-P ...) ; processing (DEFUN WALK-DIRECTORY ...) ; processing (DEFVAR *STREAM-BUFFER-SIZE* ...) ; processing (DEFUN COPY-STREAM ...) ; processing (DEFUN COPY-FILE ...) ; processing (DEFUN DELETE-DIRECTORY-AND-FILES ...) ; processing (DEFUN PATHNAME-DIRECTORY-PATHNAME ...) ; processing (DEFUN PATHNAME-PARENT-DIRECTORY ...) ; processing (DEFUN CANONICAL-PATHNAME ...) ; processing (DEFUN MERGE-PATHNAMES-AS-DIRECTORY ...) ; processing (DEFUN MERGE-PATHNAMES-AS-FILE ...) ; processing (DEFMACRO WITH-COMPONENT-TESTERS ...) ; processing (DEFUN PATHNAME-HOST-EQUAL ...) ; file: /usr/share/common-lisp/source/cl-fad/fad.lisp ; in: DEFUN PATHNAME-HOST-EQUAL ; (CL-FAD::WITH-COMPONENT-TESTERS (CL-FAD::A CL-FAD::B #'PATHNAME-HOST) ; (EQ CL-FAD::A CL-FAD::B) ; (CL-FAD::COMPONENTS-ARE-MEMBER '(NIL :UNSPECIFIC)) ; (CL-FAD::COMPONENTS-ARE-STRING=) ; (CL-FAD::COMPONENTS-ARE-EVERY #'STRING=)) ; --> LET* LABELS CL-FAD::COMPONENTS-ARE-EVERY BLOCK AND IF IF CONSP ; ==> ; CL-FAD::B ; ; note: deleting unreachable code ; --> LET* LABELS CL-FAD::COMPONENTS-ARE-STRING= BLOCK AND IF IF STRINGP ; ==> ; CL-FAD::B ; ; note: deleting unreachable code ; --> LET* LABELS CL-FAD::COMPONENTS-ARE-STRING= BLOCK AND IF STRING= ; ==> ; CL-FAD::A ; ; note: deleting unreachable code ; processing (DEFUN PATHNAME-DEVICE-EQUAL ...) ; processing (DEFUN PATHNAME-DIRECTORY-EQUAL ...) ; processing (DEFUN PATHNAME-NAME-EQUAL ...) ; processing (DEFUN PATHNAME-TYPE-EQUAL ...) ; processing (DEFUN PATHNAME-VERSION-EQUAL ...) ; processing (DEFUN PATHNAME-EQUAL ...) ; processing (DEFUN PATHNAME-ABSOLUTE-P ...) ; processing (DEFUN PATHNAME-RELATIVE-P ...) ; processing (DEFUN PATHNAME-ROOT-P ...) ; processing (PUSHNEW :CL-FAD ...) ; processing (DEFVAR *HYPERDOC-BASE-URI* ...) ; processing (LET (#) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-fad/fad-tmp6W89DJAF.fasl ; compilation finished in 0:00:02.187 ; compiling file "/usr/share/common-lisp/source/cl-fad/path.lisp" (written 13 MAY 2020 09:13:13 AM): ; processing (IN-PACKAGE :CL-FAD) ; processing (DEFMACRO DEFALIAS ...) ; processing (DEFALIAS PATH:DIRNAME ...) ; processing (DEFUN PATH:BASENAME ...) ; processing (DEFALIAS PATH:-E ...) ; processing (DEFALIAS PATH:-D ...) ; processing (DEFALIAS PATH:CATFILE ...) ; processing (DEFALIAS PATH:CATDIR ...) ; processing (DEFALIAS PATH:= ...) ; processing (DEFALIAS PATH:ABSOLUTE-P ...) ; processing (DEFALIAS PATH:RELATIVE-P ...) ; processing (DEFALIAS PATH:ROOT-P ...) ; processing (DEFALIAS PATH:RM-R ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-fad/path-tmp7RAVZUSP.fasl ; compilation finished in 0:00:00.211 ; compiling file "/usr/share/common-lisp/source/cl-fad/temporary-files.lisp" (written 13 MAY 2020 09:13:13 AM): ; processing (IN-PACKAGE :CL-FAD) ; processing (DEFPARAMETER *DEFAULT-TEMPLATE* ...) ; processing (DEFPARAMETER *MAX-TRIES* ...) ; processing (DEFVAR *NAME-RANDOM-STATE* ...) ; processing (DEFUN GETENV ...) ; processing (DEFUN DIRECTORY-FROM-ENVIRONMENT ...) ; processing (DEFUN GET-DEFAULT-TEMPORARY-DIRECTORY ...) ; processing (HANDLER-CASE (LOGICAL-PATHNAME-TRANSLATIONS "TEMPORARY-FILES") ...) ; processing (DEFVAR *CREATE-FILE-NAME-LOCK* ...) ; processing (DEFMACRO WITH-FILE-NAME-LOCK-HELD ...) ; processing (DEFUN GENERATE-RANDOM-STRING ...) ; processing (DEFINE-CONDITION INVALID-TEMPORARY-PATHNAME-TEMPLATE ...) ; processing (DEFUN GENERATE-RANDOM-PATHNAME ...) ; processing (DEFINE-CONDITION CANNOT-CREATE-TEMPORARY-FILE ...) ; processing (DEFUN OPEN-TEMPORARY ...) ; processing (DEFMACRO WITH-OUTPUT-TO-TEMPORARY-FILE ...) ; processing (DEFMACRO WITH-OPEN-TEMPORARY-FILE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-fad/temporary-files-tmpKR50OG05.fasl ; compilation finished in 0:00:00.323 ; compiling file "/usr/share/common-lisp/source/lparallel/src/util/package.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (DEFPACKAGE #:LPARALLEL.UTIL ...) ; processing (IN-PACKAGE #:LPARALLEL.UTIL) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/util/package-tmpTLRJZ1UR.fasl ; compilation finished in 0:00:00.007 ; compiling file "/usr/share/common-lisp/source/lparallel/src/util/config.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.UTIL) ; processing (DEFVAR *NORMAL-OPTIMIZE* ...) ; processing (DEFVAR *FULL-OPTIMIZE* ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/util/config-tmpTJFR94DB.fasl ; compilation finished in 0:00:00.007 ; compiling file "/usr/share/common-lisp/source/lparallel/src/util/misc.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.UTIL) ; processing (DEFMACRO ALIAS-FUNCTION ...) ; processing (DEFMACRO ALIAS-MACRO ...) ; processing (DEFUN UNSPLICE ...) ; processing (DEFUN SYMBOLICATE/PACKAGE ...) ; processing (DEFUN SYMBOLICATE/NO-INTERN ...) ; processing (DEFMACRO WITH-PARSED-BODY ...) ; processing (DECLAIM (INLINE TO-BOOLEAN)) ; processing (DEFUN TO-BOOLEAN ...) ; processing (DEFUN INTERACT ...) ; processing (DEFMACRO REPEAT ...) ; processing (DEFMACRO DOSEQUENCE ...) ; processing (DEFMACRO UNWIND-PROTECT/EXT ...) ; processing (DEFTYPE INDEX ...) ; processing (ALIAS-FUNCTION PARTIAL-APPLY ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/util/misc-tmp12QLR4GC.fasl ; compilation finished in 0:00:00.291 ; compiling file "/usr/share/common-lisp/source/lparallel/src/util/defmacro.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.UTIL) ; processing (DEFMACRO DEFMACRO/ONCE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/util/defmacro-tmpHNON3GN3.fasl ; compilation finished in 0:00:00.127 ; compiling file "/usr/share/common-lisp/source/lparallel/src/util/defun.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.UTIL) ; processing (DEFUN CONSTRAIN-RETURN-TYPE ...) ; processing (DEFMACRO DEFUN/INLINE ...) ; processing (DEFMACRO DEFUN/TYPE ...) ; processing (DEFMACRO DEFUN/TYPE/INLINE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/util/defun-tmpUL4IFWT3.fasl ; compilation finished in 0:00:00.143 ; compiling file "/usr/share/common-lisp/source/lparallel/src/util/defslots.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.UTIL) ; processing (DEFUN PLIST-KEYS ...) ; processing (DEFUN PLIST-VALUES-FOR-KEY ...) ; processing (DEFUN PARSE-DEFSLOTS ...) ; processing (DEFUN DEFSLOTS-NAMES ...) ; processing (DEFMACRO DEFINE-SLOTS-MACROLET ...) ; processing (DEFMACRO DEFINE-WITH-SLOTS-MACRO ...) ; processing (DEFMACRO DEFINE-STRUCT ...) ; processing (DEFMACRO DEFINE-READER ...) ; processing (DEFMACRO DEFINE-READERS ...) ; processing (DEFMACRO %DEFSLOTS ...) ; processing (DEFMACRO DEFSLOTS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/util/defslots-tmpOKX06099.fasl ; compilation finished in 0:00:00.395 ; compiling file "/usr/share/common-lisp/source/lparallel/src/util/defpair.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.UTIL) ; processing (DEFMACRO DEFPAIR ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/util/defpair-tmp3PQWDVVX.fasl ; compilation finished in 0:00:00.151 ; compiling file "/usr/share/common-lisp/source/lparallel/src/thread-util.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (DEFPACKAGE #:LPARALLEL.THREAD-UTIL ...) ; processing (IN-PACKAGE #:LPARALLEL.THREAD-UTIL) ; processing (ALIAS-FUNCTION CONDITION-WAIT ...) ; processing (ALIAS-FUNCTION CONDITION-NOTIFY ...) ; processing (DEFMACRO CAS ...) ; processing (DEFUN MAKE-SPIN-LOCK ...) ; processing (DEFMACRO/ONCE WITH-SPIN-LOCK-HELD ...) ; processing (DEFMACRO WITH-ABORT-RESTART ...) ; processing (DEFMACRO WITH-THREAD ...) ; processing (DEFMACRO WITH-LOCK-PREDICATE/NO-WAIT ...) ; processing (DEFMACRO WITH-LOCK-PREDICATE/WAIT ...) ; processing (DEFUN/INLINE GET-REAL-TIME-IN-SECONDS ...) ; processing (DEFUN %TIME-REMAINING ...) ; processing (DEFMACRO/ONCE WITH-COUNTDOWN ...) ; processing (DEFMACRO DEFINE-LOCKING-FN/BASE ...) ; processing (DEFMACRO DEFINE-LOCKING-FN ...) ; processing (DEFMACRO DEFINE-SIMPLE-LOCKING-FN ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/thread-util-tmpFJAR440P.fasl ; compilation finished in 0:00:00.359 ; compiling file "/usr/share/common-lisp/source/lparallel/src/raw-queue.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (DEFPACKAGE #:LPARALLEL.RAW-QUEUE ...) ; processing (IN-PACKAGE #:LPARALLEL.RAW-QUEUE) ; processing (DEFTYPE RAW-QUEUE-COUNT ...) ; processing (DEFSTRUCT (RAW-QUEUE # ...) ...) ; processing (DEFUN/INLINE MAKE-RAW-QUEUE ...) ; processing (DEFUN/TYPE PUSH-RAW-QUEUE ...) ; processing (DEFUN/TYPE POP-RAW-QUEUE ...) ; processing (DEFUN/INLINE RAW-QUEUE-COUNT ...) ; processing (DEFUN/INLINE RAW-QUEUE-EMPTY-P ...) ; processing (DEFUN/INLINE PEEK-RAW-QUEUE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/raw-queue-tmpM2X5AGVD.fasl ; compilation finished in 0:00:00.071 ; compiling file "/usr/share/common-lisp/source/lparallel/src/cons-queue.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (DEFPACKAGE #:LPARALLEL.CONS-QUEUE ...) ; processing (IN-PACKAGE #:LPARALLEL.CONS-QUEUE) ; processing (DEFSLOTS CONS-QUEUE ...) ; processing (DEFUN %MAKE-CONS-QUEUE ...) ; processing (DEFMACRO WITH-LOCKED-CONS-QUEUE ...) ; processing (DEFINE-LOCKING-FN PUSH-CONS-QUEUE ...) ; processing (DEFINE-LOCKING-FN POP-CONS-QUEUE ...) ; processing (DEFUN %TRY-POP-CONS-QUEUE/NO-LOCK/TIMEOUT ...) ; file: /usr/share/common-lisp/source/lparallel/src/cons-queue.lisp ; in: DEFUN %TRY-POP-CONS-QUEUE/NO-LOCK/TIMEOUT ; (PLUSP LPARALLEL.THREAD-UTIL::TIME-REMAINING) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; processing (DEFUN TRY-POP-CONS-QUEUE/NO-LOCK/TIMEOUT ...) ; processing (DEFUN TRY-POP-CONS-QUEUE ...) ; file: /usr/share/common-lisp/source/lparallel/src/cons-queue.lisp ; in: DEFUN TRY-POP-CONS-QUEUE ; (PLUSP LPARALLEL.CONS-QUEUE::TIMEOUT) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; processing (DEFUN TRY-POP-CONS-QUEUE/NO-LOCK ...) ; file: /usr/share/common-lisp/source/lparallel/src/cons-queue.lisp ; in: DEFUN TRY-POP-CONS-QUEUE/NO-LOCK ; (PLUSP LPARALLEL.CONS-QUEUE::TIMEOUT) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; processing (DEFMACRO DEFINE-QUEUE-FN ...) ; processing (DEFINE-QUEUE-FN CONS-QUEUE-COUNT ...) ; processing (DEFINE-QUEUE-FN CONS-QUEUE-EMPTY-P ...) ; processing (DEFINE-QUEUE-FN PEEK-CONS-QUEUE ...) ; processing (DEFUN MAKE-CONS-QUEUE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/cons-queue-tmpV9XLLI3F.fasl ; compilation finished in 0:00:00.335 ; compiling file "/usr/share/common-lisp/source/lparallel/src/vector-queue.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (DEFPACKAGE #:LPARALLEL.VECTOR-QUEUE ...) ; processing (IN-PACKAGE #:LPARALLEL.VECTOR-QUEUE) ; processing (DEFTYPE RAW-QUEUE-COUNT ...) ; processing (DEFSLOTS RAW-QUEUE ...) ; processing (DEFUN MAKE-RAW-QUEUE ...) ; processing (DEFUN/TYPE PUSH-RAW-QUEUE ...) ; processing (DEFUN/TYPE POP-RAW-QUEUE ...) ; processing (DEFUN/TYPE PEEK-RAW-QUEUE ...) ; processing (DEFUN/TYPE/INLINE RAW-QUEUE-EMPTY-P ...) ; processing (DEFUN/TYPE/INLINE RAW-QUEUE-FULL-P ...) ; processing (DEFUN/TYPE/INLINE RAW-QUEUE-CAPACITY ...) ; processing (DEFSLOTS VECTOR-QUEUE ...) ; processing (DEFUN %MAKE-VECTOR-QUEUE ...) ; processing (DEFMACRO WITH-LOCKED-VECTOR-QUEUE ...) ; processing (DEFINE-LOCKING-FN PUSH-VECTOR-QUEUE ...) ; processing (DEFINE-LOCKING-FN POP-VECTOR-QUEUE ...) ; processing (DEFUN %TRY-POP-VECTOR-QUEUE/NO-LOCK/TIMEOUT ...) ; file: /usr/share/common-lisp/source/lparallel/src/vector-queue.lisp ; in: DEFUN %TRY-POP-VECTOR-QUEUE/NO-LOCK/TIMEOUT ; (PLUSP LPARALLEL.THREAD-UTIL::TIME-REMAINING) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; processing (DEFUN TRY-POP-VECTOR-QUEUE/NO-LOCK/NO-TIMEOUT ...) ; processing (DEFUN TRY-POP-VECTOR-QUEUE/NO-LOCK/TIMEOUT ...) ; processing (DEFUN TRY-POP-VECTOR-QUEUE ...) ; file: /usr/share/common-lisp/source/lparallel/src/vector-queue.lisp ; in: DEFUN TRY-POP-VECTOR-QUEUE ; (PLUSP LPARALLEL.VECTOR-QUEUE::TIMEOUT) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; processing (DEFUN TRY-POP-VECTOR-QUEUE/NO-LOCK ...) ; file: /usr/share/common-lisp/source/lparallel/src/vector-queue.lisp ; in: DEFUN TRY-POP-VECTOR-QUEUE/NO-LOCK ; (PLUSP LPARALLEL.VECTOR-QUEUE::TIMEOUT) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; processing (DEFMACRO DEFINE-QUEUE-FN ...) ; processing (DEFINE-QUEUE-FN VECTOR-QUEUE-COUNT ...) ; processing (DEFINE-QUEUE-FN VECTOR-QUEUE-CAPACITY ...) ; processing (DEFINE-QUEUE-FN VECTOR-QUEUE-EMPTY-P ...) ; processing (DEFINE-QUEUE-FN VECTOR-QUEUE-FULL-P ...) ; processing (DEFINE-QUEUE-FN PEEK-VECTOR-QUEUE ...) ; processing (DEFUN MAKE-VECTOR-QUEUE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/vector-queue-tmpCNL9LF4O.fasl ; compilation finished in 0:00:00.963 ; compiling file "/usr/share/common-lisp/source/lparallel/src/queue.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (DEFPACKAGE #:LPARALLEL.QUEUE ...) ; processing (IN-PACKAGE #:LPARALLEL.QUEUE) ; processing (DEFTYPE QUEUE ...) ; processing (DEFUN %MAKE-QUEUE ...) ; processing (DEFUN MAKE-QUEUE ...) ; processing (DEFINE-COMPILER-MACRO MAKE-QUEUE ...) ; processing (DEFUN CALL-WITH-LOCKED-CONS-QUEUE ...) ; processing (DEFUN CALL-WITH-LOCKED-VECTOR-QUEUE ...) ; processing (DEFMACRO WITH-LOCKED-QUEUE ...) ; processing (DEFUN/INLINE CONS-QUEUE-FULL-P ...) ; processing (DEFUN/INLINE CONS-QUEUE-FULL-P/NO-LOCK ...) ; processing (DEFMACRO DEFINE-QUEUE-FN ...) ; processing (DEFINE-QUEUE-FN PUSH-QUEUE ...) ; processing (DEFINE-QUEUE-FN PUSH-QUEUE/NO-LOCK ...) ; processing (DEFINE-QUEUE-FN POP-QUEUE ...) ; processing (DEFINE-QUEUE-FN POP-QUEUE/NO-LOCK ...) ; processing (DEFINE-QUEUE-FN PEEK-QUEUE ...) ; processing (DEFINE-QUEUE-FN PEEK-QUEUE/NO-LOCK ...) ; processing (DEFINE-QUEUE-FN QUEUE-COUNT ...) ; processing (DEFINE-QUEUE-FN QUEUE-COUNT/NO-LOCK ...) ; processing (DEFINE-QUEUE-FN QUEUE-EMPTY-P ...) ; processing (DEFINE-QUEUE-FN QUEUE-EMPTY-P/NO-LOCK ...) ; processing (DEFINE-QUEUE-FN QUEUE-FULL-P ...) ; processing (DEFINE-QUEUE-FN QUEUE-FULL-P/NO-LOCK ...) ; processing (DEFMACRO DEFINE-TRY-POP-QUEUE ...) ; processing (DEFINE-TRY-POP-QUEUE TRY-POP-QUEUE ...) ; processing (DEFINE-TRY-POP-QUEUE TRY-POP-QUEUE/NO-LOCK ...) ; processing (DEFINE-QUEUE-FN CALL-WITH-LOCKED-QUEUE ...) ; processing (SETF (DOCUMENTATION # ...) ...) ; processing (SETF (DOCUMENTATION # ...) ...) ; processing (SETF (DOCUMENTATION # ...) ...) ; processing (SETF (DOCUMENTATION # ...) ...) ; processing (SETF (DOCUMENTATION # ...) ...) ; processing (SETF (DOCUMENTATION # ...) ...) ; processing (SETF (DOCUMENTATION # ...) ...) ; processing (SETF (DOCUMENTATION # ...) ...) ; processing (SETF (DOCUMENTATION # ...) ...) ; processing (DO-EXTERNAL-SYMBOLS (SYM *PACKAGE*) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/queue-tmpA2MZF3D.fasl ; compilation finished in 0:00:00.855 ; compiling file "/usr/share/common-lisp/source/lparallel/src/counter.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (DEFPACKAGE #:LPARALLEL.COUNTER ...) ; processing (IN-PACKAGE #:LPARALLEL.COUNTER) ; processing (DEFTYPE COUNTER-VALUE ...) ; processing (DEFSTRUCT (COUNTER #) ...) ; processing (DEFMACRO DEFINE-COUNTER-FN ...) ; processing (DEFINE-COUNTER-FN INC-COUNTER ...) ; processing (DEFINE-COUNTER-FN DEC-COUNTER ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/counter-tmp820USYC0.fasl ; compilation finished in 0:00:00.175 ; compiling file "/usr/share/common-lisp/source/lparallel/src/spin-queue/package.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (DEFPACKAGE #:LPARALLEL.SPIN-QUEUE ...) ; processing (IN-PACKAGE #:LPARALLEL.SPIN-QUEUE) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/spin-queue/package-tmpAP7D2UW2.fasl ; compilation finished in 0:00:00.011 ; compiling file "/usr/share/common-lisp/source/lparallel/src/spin-queue/cas-spin-queue.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.SPIN-QUEUE) ; processing (DEFTYPE NODE ...) ; processing (ALIAS-FUNCTION MAKE-NODE ...) ; processing (DEFMACRO NODE-CAR ...) ; processing (DEFMACRO NODE-CDR ...) ; processing (DEFCONSTANT +DUMMY+ ...) ; processing (DEFCONSTANT +DEAD-END+ ...) ; processing (DEFSTRUCT (SPIN-QUEUE #) ...) ; processing (DEFUN MAKE-SPIN-QUEUE ...) ; processing (DEFUN/TYPE PUSH-SPIN-QUEUE ...) ; processing (DEFUN/TYPE POP-SPIN-QUEUE ...) ; processing (DEFUN SPIN-QUEUE-EMPTY-P ...) ; processing (DEFUN TRY-EACH-ELEM ...) ; processing (DEFUN SPIN-QUEUE-COUNT ...) ; processing (DEFUN PEEK-SPIN-QUEUE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/spin-queue/cas-spin-queue-tmpU93Z06A.fasl ; compilation finished in 0:00:00.311 ; compiling file "/usr/share/common-lisp/source/lparallel/src/kernel/package.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (DEFPACKAGE #:LPARALLEL.KERNEL ...) ; processing (IN-PACKAGE #:LPARALLEL.KERNEL) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/kernel/package-tmpL3K5PO5H.fasl ; compilation finished in 0:00:00.007 ; compiling file "/usr/share/common-lisp/source/lparallel/src/kernel/specials.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.KERNEL) ; processing (DEFVAR *DEBUGGER-ERROR* ...) ; processing (DEFVAR *HANDLER-ACTIVE-P* ...) ; processing (DEFVAR *CLIENT-HANDLERS* ...) ; processing (DEFVAR *TASK-CATEGORY* ...) ; processing (DEFVAR *TASK-PRIORITY* ...) ; processing (DEFVAR *WORKER* ...) ; processing (DEFVAR *KERNEL* ...) ; processing (DEFVAR *MAKE-LIMITER-DATA*) ; processing (DEFVAR *KERNEL-SPIN-COUNT* ...) ; processing (DEFVAR *DEBUG-TASKS-P* ...) ; processing (DEFVAR *LISP-EXITING-P* ...) ; processing (DEFVAR *ERRORING-WORKERS* ...) ; processing (DEFVAR *ERRORING-WORKERS-LOCK* ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/kernel/specials-tmpPP843P2R.fasl ; compilation finished in 0:00:00.011 ; compiling file "/usr/share/common-lisp/source/lparallel/src/kernel/handling.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.KERNEL) ; processing (DEFSLOTS WRAPPED-ERROR ...) ; processing (DEFUN WRAP-ERROR ...) ; processing (DEFUN UNWRAP-RESULT ...) ; processing (DEFMACRO TASK-HANDLER-BIND ...) ; processing (DEFUN INVOKE-TRANSFER-ERROR ...) ; processing (DEFUN CONDITION-HANDLER ...) ; processing (DEFUN CALL-WITH-TRACKED-ERROR ...) ; processing (DEFMACRO WITH-TRACKED-ERROR ...) ; processing (DEFUN MAKE-DEBUGGER-HOOK ...) ; processing (DEFUN TRANSFER-ERROR-REPORT ...) ; processing (DEFCONSTANT +CURRENT-TASK+ ...) ; processing (DEFUN TRANSFER-ERROR-RESTART ...) ; processing (DEFMACRO WITH-TASK-CONTEXT ...) ; processing (DEFUN %CALL-WITH-TASK-HANDLER ...) ; processing (DEFUN CALL-WITH-TASK-HANDLER ...) ; processing (DEFINE-CONDITION TASK-KILLED-ERROR ...) ; processing (DEFINE-CONDITION NO-KERNEL-ERROR ...) ; processing (DEFINE-CONDITION KERNEL-CREATION-ERROR ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/kernel/handling-tmpBK2QBAFY.fasl ; compilation finished in 0:00:00.331 ; compiling file "/usr/share/common-lisp/source/lparallel/src/kernel/classes.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.KERNEL) ; processing (DEFSLOTS WORKER-INFO ...) ; processing (DEFSLOTS WORKER-NOTIFICATIONS ...) ; processing (DEFSLOTS WORKER ...) ; processing (DEFSLOTS SCHEDULER ...) ; processing (DEFSTRUCT (LIMITER #) ...) ; processing (DEFSLOTS KERNEL ...) ; processing (DEFSLOTS CHANNEL ...) ; processing (DEFPAIR TASK ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/kernel/classes-tmpAHPKJ6EW.fasl ; compilation finished in 0:00:01.043 ; compiling file "/usr/share/common-lisp/source/lparallel/src/kernel/stealing-scheduler.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.KERNEL) ; processing (DEFMACRO DEFINE-MOD-INC-DEC ...) ; processing (DEFINE-MOD-INC-DEC MOD-INC ...) ; processing (DEFINE-MOD-INC-DEC MOD-DEC ...) ; processing (DEFMACRO DEFINE-MOD-INCF-DECF ...) ; processing (DEFINE-MOD-INCF-DECF MOD-INCF ...) ; processing (DEFINE-MOD-INCF-DECF MOD-DECF ...) ; processing (DEFMACRO WITH-POP-SUCCESS ...) ; processing (DEFMACRO REPEAT/FIXNUM ...) ; processing (DEFMACRO DO-INDEXES ...) ; processing (DEFUN MAKE-SCHEDULER ...) ; processing (DEFUN/TYPE/INLINE PUSH-TO-RANDOM-WORKER ...) ; processing (DEFUN/TYPE MAYBE-WAKE-A-WORKER ...) ; file: /usr/share/common-lisp/source/lparallel/src/kernel/stealing-scheduler.lisp ; in: DEFUN/TYPE MAYBE-WAKE-A-WORKER ; (INCF LPARALLEL.KERNEL::NOTIFY-COUNT) ; --> LET* ; ==> ; (+ 1 ; (SB-KERNEL:THE* ((INTEGER 0) :DERIVE-TYPE-ONLY T) ; (SB-KERNEL:%INSTANCE-REF ; (THE LPARALLEL.KERNEL::SCHEDULER #:OBJ) 4))) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) . #2=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; processing (DEFUN/TYPE SCHEDULE-TASK ...) ; processing (DEFMACRO DO-WORKERS ...) ; processing (DEFUN/TYPE NEXT-TASK ...) ; file: /usr/share/common-lisp/source/lparallel/src/kernel/stealing-scheduler.lisp ; in: DEFUN/TYPE NEXT-TASK ; (PLUSP LPARALLEL.KERNEL::NOTIFY-COUNT) ; ; note: forced to do FAST-IF->-ZERO (cost 8) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (DECF LPARALLEL.KERNEL::NOTIFY-COUNT) ; --> LET* ; ==> ; (SB-IMPL::XSUBTRACT 1 ; (SB-KERNEL:THE* ((INTEGER 0) :DERIVE-TYPE-ONLY T) ; (SB-KERNEL:%INSTANCE-REF ; (THE LPARALLEL.KERNEL::SCHEDULER #:OBJ) ; 4))) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #2=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #2#), not a (VALUES FIXNUM &REST ; T). ; etc. ; processing (DEFUN/TYPE STEAL-TASK ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/kernel/stealing-scheduler-tmpJJIXGGXK.fasl ; compilation finished in 0:00:00.443 ; compiling file "/usr/share/common-lisp/source/lparallel/src/kernel/kill.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.KERNEL) ; processing (DEFCONSTANT +WORKER-SUICIDE-TAG+ ...) ; processing (DEFUN KILL ...) ; processing (DEFUN KILL-ERRORS ...) ; processing (DEFUN KILL-ERRORS-REPORT ...) ; processing (DEFMACRO WITH-WORKER-RESTARTS ...) ; processing (DEFUN KILL-TASKS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/kernel/kill-tmpMYEEYI7L.fasl ; compilation finished in 0:00:00.119 ; compiling file "/usr/share/common-lisp/source/lparallel/src/kernel/core.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.KERNEL) ; processing (DEFUN/TYPE EXEC-TASK/WORKER ...) ; processing (DEFUN/TYPE/INLINE EXEC-TASK/NON-WORKER ...) ; processing (DEFUN/TYPE STEAL-WORK ...) ; processing (DEFUN HANDSHAKE/TO-WORKER/START ...) ; processing (DEFUN HANDSHAKE/TO-WORKER/FINISH ...) ; processing (DEFUN HANDSHAKE/FROM-WORKER/START ...) ; processing (DEFUN HANDSHAKE/FROM-WORKER/FINISH ...) ; processing (DEFUN NOTIFY-EXIT ...) ; processing (DEFUN WAIT-FOR-WORKER ...) ; processing (DEFUN REPLACE-WORKER ...) ; processing (DEFUN/TYPE WORKER-LOOP ...) ; processing (DEFUN CALL-WITH-WORKER-CONTEXT ...) ; processing (DEFUN ENTER-WORKER-LOOP ...) ; processing (DEFUN MAKE-ALL-BINDINGS ...) ; processing (DEFUN %MAKE-WORKER ...) ; processing (DEFUN MAKE-WORKER-THREAD ...) ; processing (DEFUN MAKE-WORKER ...) ; processing (DEFMACRO WITH-FILL-WORKERS-HANDLER ...) ; processing (DEFUN %FILL-WORKERS ...) ; processing (DEFUN FILL-WORKERS ...) ; processing (DEFUN MAKE-KERNEL ...) ; processing (DEFUN CHECK-KERNEL ...) ; processing (DEFMACRO DEFINE-WORKER-INFO-READER ...) ; processing (DEFINE-WORKER-INFO-READER KERNEL-BINDINGS ...) ; processing (DEFINE-WORKER-INFO-READER KERNEL-NAME ...) ; processing (DEFINE-WORKER-INFO-READER KERNEL-CONTEXT ...) ; processing (DEFUN/TYPE/INLINE %KERNEL-WORKER-COUNT ...) ; processing (DEFUN KERNEL-WORKER-COUNT ...) ; processing (DEFUN KERNEL-WORKER-INDEX ...) ; processing (DEFUN %MAKE-CHANNEL ...) ; processing (DEFUN MAKE-CHANNEL ...) ; processing (DEFINE-COMPILER-MACRO MAKE-CHANNEL ...) ; processing (DEFMACRO TASK-LAMBDA ...) ; processing (DEFUN/TYPE/INLINE MAKE-TASK ...) ; processing (DEFUN/TYPE MAKE-CHANNELED-TASK ...) ; processing (DEFUN/TYPE/INLINE SUBMIT-RAW-TASK ...) ; processing (DEFUN SUBMIT-TASK ...) ; processing (DEFUN RECEIVE-RESULT ...) ; processing (DEFUN TRY-RECEIVE-RESULT ...) ; processing (DEFMACRO/ONCE DO-FAST-RECEIVES ...) ; processing (DEFUN SHUTDOWN ...) ; processing (DEFUN END-KERNEL ...) ; processing (DEFUN TASK-CATEGORIES-RUNNING ...) ; processing (DEFUN KERNEL-INFO ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN BROADCAST-TASK ...) ; processing (DEFUN TRACK-EXIT ...) ; processing (PUSHNEW (QUOTE TRACK-EXIT) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/kernel/core-tmp2OZ1RF2X.fasl ; compilation finished in 0:00:00.975 ; compiling file "/usr/share/common-lisp/source/lparallel/src/kernel/timeout.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.KERNEL) ; processing (DEFSLOTS TIMEOUT ...) ; processing (DEFUN SUBMIT-TIMEOUT ...) ; processing (DEFUN CANCEL-TIMEOUT ...) ; processing (DEFUN DEPRECATED-TIMEOUT ...) ; processing (DEFINE-COMPILER-MACRO SUBMIT-TIMEOUT ...) ; processing (DEFINE-COMPILER-MACRO CANCEL-TIMEOUT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/kernel/timeout-tmpMABYFPD4.fasl ; compilation finished in 0:00:00.179 ; compiling file "/usr/share/common-lisp/source/lparallel/src/kernel-util.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (DEFPACKAGE #:LPARALLEL.KERNEL-UTIL ...) ; processing (IN-PACKAGE #:LPARALLEL.KERNEL-UTIL) ; processing (DEFUN STEAL-UNTIL-RECEIVE-RESULT ...) ; processing (DEFUN RECEIVE-RESULTS ...) ; file: /usr/share/common-lisp/source/lparallel/src/kernel-util.lisp ; in: DEFUN RECEIVE-RESULTS ; (LPARALLEL.UTIL:REPEAT COUNT ; (LPARALLEL.KERNEL-UTIL::STEAL-UNTIL-RECEIVE-RESULT LPARALLEL.KERNEL:CHANNEL ; LPARALLEL.KERNEL-UTIL::WORKER LPARALLEL.KERNEL-UTIL::FN)) ; --> LOOP BLOCK LET ; ==> ; (CEILING COUNT) ; ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; (LPARALLEL.KERNEL:DO-FAST-RECEIVES (LPARALLEL.KERNEL-UTIL::RESULT ; LPARALLEL.KERNEL:CHANNEL COUNT) ; (LOCALLY ; (DECLARE (TYPE FUNCTION LPARALLEL.KERNEL-UTIL::FN)) ; (FUNCALL LPARALLEL.KERNEL-UTIL::FN LPARALLEL.KERNEL-UTIL::RESULT))) ; --> LET LPARALLEL.UTIL:REPEAT LOOP BLOCK LET ; ==> ; (CEILING COUNT) ; ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; (LPARALLEL.KERNEL:DO-FAST-RECEIVES (LPARALLEL.KERNEL-UTIL::RESULT ; LPARALLEL.KERNEL:CHANNEL COUNT) ; (DECLARE (IGNORE LPARALLEL.KERNEL-UTIL::RESULT))) ; --> LET LPARALLEL.UTIL:REPEAT LOOP BLOCK LET ; ==> ; (CEILING COUNT) ; ; 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 ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 (RATIONAL (-1) (1)) DOUBLE-FLOAT ; SINGLE-FLOAT), 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. ; (LPARALLEL.KERNEL:DO-FAST-RECEIVES (LPARALLEL.KERNEL-UTIL::RESULT ; LPARALLEL.KERNEL:CHANNEL COUNT) ; (LOCALLY ; (DECLARE (TYPE FUNCTION LPARALLEL.KERNEL-UTIL::FN)) ; (FUNCALL LPARALLEL.KERNEL-UTIL::FN LPARALLEL.KERNEL-UTIL::RESULT))) ; --> LET LPARALLEL.UTIL:REPEAT LOOP BLOCK LET ; ==> ; (CEILING COUNT) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL #1=(-1) #2=(1)) DOUBLE-FLOAT SINGLE-FLOAT) ; . #3=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES (OR (RATIONAL #1# #2#) DOUBLE-FLOAT SINGLE-FLOAT) ; . #3#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; --> LET LPARALLEL.UTIL:REPEAT LOOP BLOCK LET TAGBODY IF ; ==> ; (<= #:LOOP-REPEAT-2 0) ; ; note: forced to do FAST-IF->-ZERO (cost 8) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> LET LPARALLEL.UTIL:REPEAT LOOP BLOCK LET TAGBODY IF DECF SETQ THE ; ==> ; (SB-IMPL::XSUBTRACT 1 #:LOOP-REPEAT-2) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #2=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #2#), not a (VALUES FIXNUM &REST ; T). ; etc. ; (LPARALLEL.KERNEL:DO-FAST-RECEIVES (LPARALLEL.KERNEL-UTIL::RESULT ; LPARALLEL.KERNEL:CHANNEL COUNT) ; (DECLARE (IGNORE LPARALLEL.KERNEL-UTIL::RESULT))) ; --> LET LPARALLEL.UTIL:REPEAT LOOP BLOCK LET ; ==> ; (CEILING COUNT) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL #1=(-1) #2=(1)) DOUBLE-FLOAT SINGLE-FLOAT) ; . #3=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES (OR (RATIONAL #1# #2#) DOUBLE-FLOAT SINGLE-FLOAT) ; . #3#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; --> LET LPARALLEL.UTIL:REPEAT LOOP BLOCK LET TAGBODY IF ; ==> ; (<= #:LOOP-REPEAT-4 0) ; ; note: forced to do FAST-IF->-ZERO (cost 8) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> LET LPARALLEL.UTIL:REPEAT LOOP BLOCK LET TAGBODY IF DECF SETQ THE ; ==> ; (SB-IMPL::XSUBTRACT 1 #:LOOP-REPEAT-4) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #2=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #2#), not a (VALUES FIXNUM &REST ; T). ; etc. ; (LPARALLEL.UTIL:REPEAT COUNT ; (LPARALLEL.KERNEL-UTIL::STEAL-UNTIL-RECEIVE-RESULT LPARALLEL.KERNEL:CHANNEL ; LPARALLEL.KERNEL-UTIL::WORKER LPARALLEL.KERNEL-UTIL::FN)) ; --> LOOP BLOCK LET ; ==> ; (CEILING COUNT) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL #1=(-1) #2=(1)) DOUBLE-FLOAT SINGLE-FLOAT) ; . #3=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES (OR (RATIONAL #1# #2#) DOUBLE-FLOAT SINGLE-FLOAT) ; . #3#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; --> LOOP BLOCK LET TAGBODY IF ; ==> ; (<= #:LOOP-REPEAT-0 0) ; ; note: forced to do FAST-IF->-ZERO (cost 8) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> LOOP BLOCK LET TAGBODY IF DECF SETQ THE ; ==> ; (SB-IMPL::XSUBTRACT 1 #:LOOP-REPEAT-0) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #2=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #2#), not a (VALUES FIXNUM &REST ; T). ; etc. ; processing (DEFMACRO WITH-SUBMIT-COUNTED ...) ; processing (DEFUN INDEXING-WRAPPER ...) ; processing (DEFMACRO/ONCE WITH-SUBMIT-INDEXED ...) ; processing (DEFMACRO WITH-SUBMIT-CANCELABLE ...) ; processing (DEFUN CALL-WITH-TEMP-KERNEL ...) ; processing (DEFMACRO WITH-TEMP-KERNEL ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/kernel-util-tmpO0782EL2.fasl ; compilation finished in 0:00:00.311 ; compiling file "/usr/share/common-lisp/source/lparallel/src/promise.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (DEFPACKAGE #:LPARALLEL.PROMISE ...) ; processing (IN-PACKAGE #:LPARALLEL.PROMISE) ; processing (DEFCONSTANT +NO-RESULT+ ...) ; processing (DEFSLOTS PROMISE-BASE ...) ; processing (DEFSLOTS %PROMISE ...) ; processing (DEFSLOTS PLAN ...) ; processing (DEFSLOTS %FUTURE ...) ; processing (DEFSLOTS %DELAY ...) ; processing (DEFSLOTS %CHAIN ...) ; processing (DEFMACRO WITH-LOCK-OPERATION ...) ; processing (DEFMACRO WITH-UNFULFILLED/NO-WAIT ...) ; processing (DEFMACRO WITH-UNFULFILLED/WAIT ...) ; processing (DEFUN PROMISE ...) ; processing (DEFUN FULFILL-PROMISE ...) ; processing (DEFUN FORCE-PROMISE ...) ; processing (DEFUN/INLINE FULFILL-PLAN/VALUES ...) ; processing (DEFUN/INLINE FULFILL-PLAN/CALL ...) ; processing (DEFUN FULFILL-PLAN/ERROR ...) ; processing (DEFMACRO DELAY ...) ; processing (DEFUN FULFILL-DELAY ...) ; processing (DEFUN FORCE-DELAY ...) ; processing (DEFUN FULFILL-FUTURE ...) ; processing (DEFUN FORCE-FUTURE ...) ; processing (DEFMACRO WITH-UNFULFILLED-FUTURE/NO-WAIT ...) ; processing (DEFUN/TYPE MAKE-FUTURE-TASK ...) ; processing (DEFUN/TYPE MAKE-FUTURE ...) ; processing (DEFMACRO FUTURE ...) ; processing (DEFMACRO SPECULATE ...) ; processing (DEFUN CHAIN ...) ; processing (DEFUN FULFILL-OBJECT ...) ; processing (DEFMACRO FULFILL ...) ; processing (DEFUN FULFILLEDP ...) ; processing (DEFUN REPLACE-ERROR ...) ; processing (DEFUN FORCE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/promise-tmpFXGDO0E3.fasl ; compilation finished in 0:00:02.243 ; compiling file "/usr/share/common-lisp/source/lparallel/src/ptree.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (DEFPACKAGE #:LPARALLEL.PTREE ...) ; processing (IN-PACKAGE #:LPARALLEL.PTREE) ; processing (DEFINE-CONDITION PTREE-ERROR ...) ; processing (DEFINE-CONDITION PTREE-REDEFINITION-ERROR ...) ; processing (DEFINE-CONDITION PTREE-UNDEFINED-FUNCTION-ERROR ...) ; processing (DEFINE-CONDITION PTREE-LAMBDA-LIST-KEYWORD-ERROR ...) ; processing (DEFCONSTANT +NO-RESULT+ ...) ; processing (DEFSLOTS NODE ...) ; processing (DEFUN CLEAR-NODE ...) ; processing (DEFUN CLEAR-NODE-ERROR ...) ; processing (DEFUN CHECK-NODE ...) ; processing (DEFUN/TYPE/INLINE COMPUTEDP ...) ; processing (DEFUN/TYPE COMPUTE-NODE ...) ; processing (DEFUN/TYPE/INLINE FREEP ...) ; processing (DEFUN/TYPE PROPAGATE-ERROR ...) ; processing (DEFUN/TYPE LOCK-NODE ...) ; processing (DEFUN/TYPE UNLOCK-NODE ...) ; processing (DEFUN/TYPE/INLINE CHILDREN-DONE-P ...) ; processing (DEFVAR *PTREE-NODE-KERNEL* ...) ; processing (DEFUN/TYPE MAKE-NODE-TASK ...) ; processing (DEFUN/TYPE SUBMIT-NODE ...) ; processing (DEFUN/TYPE FIND-NODE ...) ; processing (DEFSLOTS PTREE ...) ; processing (DEFUN MAKE-PTREE ...) ; processing (DEFUN/TYPE COMPUTE-PTREE ...) ; file: /usr/share/common-lisp/source/lparallel/src/ptree.lisp ; in: DEFUN/TYPE COMPUTE-PTREE ; (DECF LPARALLEL.PTREE::PENDING) ; --> LET* ; ==> ; (SB-IMPL::XSUBTRACT 1 ; (SB-KERNEL:THE* (INTEGER :DERIVE-TYPE-ONLY T) ; (SB-KERNEL:%INSTANCE-REF ; (THE LPARALLEL.PTREE:PTREE #:OBJ) 2))) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (INCF LPARALLEL.PTREE::PENDING) ; --> LET* ; ==> ; (+ 1 ; (SB-KERNEL:THE* (INTEGER :DERIVE-TYPE-ONLY T) ; (SB-KERNEL:%INSTANCE-REF (THE LPARALLEL.PTREE:PTREE #:OBJ) ; 2))) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; processing (DEFUN WAIT-FOR-COMPUTE ...) ; processing (DEFUN EACH-NODE ...) ; processing (DEFUN CHECK-PTREE ...) ; processing (DEFUN CLEAR-PTREE ...) ; processing (DEFUN CLEAR-PTREE-ERRORS ...) ; processing (DEFUN PTREE-FN ...) ; processing (DEFUN PTREE-COMPUTED-P ...) ; processing (DEFUN CALL-PTREE ...) ; processing (DEFMACRO PTREE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/ptree-tmpLCE8PO0U.fasl ; compilation finished in 0:00:01.043 ; compiling file "/usr/share/common-lisp/source/lparallel/src/slet.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (DEFPACKAGE #:LPARALLEL.SLET ...) ; processing (IN-PACKAGE #:LPARALLEL.SLET) ; processing (DEFUN PARSE-BINDINGS ...) ; processing (DEFUN MAKE-TEMP-VAR ...) ; processing (DEFUN MAKE-BINDING-DATUM ...) ; processing (DEFUN MAKE-BINDING-DATA ...) ; processing (DEFMACRO BIND ...) ; processing (DEFMACRO %SLET ...) ; processing (DEFMACRO SLET ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/slet-tmpS48VDGU2.fasl ; compilation finished in 0:00:00.047 ; compiling file "/usr/share/common-lisp/source/lparallel/src/defpun.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (DEFPACKAGE #:LPARALLEL.DEFPUN ...) ; processing (IN-PACKAGE #:LPARALLEL.DEFPUN) ; processing (DEFCONSTANT +CHECKED-KEY+ ...) ; processing (DEFCONSTANT +UNCHECKED-KEY+ ...) ; processing (DEFVAR *REGISTERED-NAMES* ...) ; processing (DEFVAR *REGISTRATION-LOCK* ...) ; processing (DEFUN UNCHECKED-NAME ...) ; processing (DEFUN REGISTER-NAME ...) ; processing (DEFUN REGISTER-FN ...) ; processing (DEFUN REGISTERED-FN-P ...) ; processing (DEFUN VALID-REGISTERED-FN-P ...) ; processing (DEFUN VALID-REGISTERED-NAME-P ...) ; processing (DEFUN DELETE-STALE-REGISTRATIONS ...) ; processing (DEFUN REGISTERED-MACROLETS ...) ; processing (DEFMACRO DECLAIM-DEFPUN ...) ; processing (DEFUN DELETE-REGISTERED-NAMES ...) ; processing (DEFUN INITIAL-LIMITER-COUNT ...) ; processing (DEFUN MAKE-LIMITER-DATA ...) ; processing (SETF *MAKE-LIMITER-DATA* ...) ; processing (DEFMACRO ACCEPT-TASK-P ...) ; processing (DEFUN/TYPE UPDATE-LIMITER-COUNT/NO-LOCK ...) ; processing (DEFUN/TYPE UPDATE-LIMITER-COUNT ...) ; processing (DEFCONSTANT +NO-RESULT+ ...) ; processing (DEFMACRO MSETQ ...) ; processing (DEFUN CLIENT-VARS ...) ; processing (DEFUN TEMP-VARS ...) ; processing (DEFUN PRIMARY-TEMP-VARS ...) ; processing (DEFMACRO WITH-TEMP-BINDINGS ...) ; processing (DEFMACRO WITH-CLIENT-BINDINGS ...) ; processing (DEFMACRO SPAWN ...) ; processing (DEFMACRO SPAWN-TASKS ...) ; processing (DEFMACRO EXEC-TASK ...) ; processing (DEFMACRO SYNC ...) ; processing (DEFMACRO SCAN-FOR-ERRORS ...) ; processing (DEFMACRO %%%%PLET ...) ; processing (DEFMACRO WITH-LOCK-PREDICATES ...) ; processing (DEFMACRO %%%PLET ...) ; processing (DEFMACRO %%PLET ...) ; processing (DEFMACRO %PLET ...) ; processing (DEFMACRO %PLET-IF ...) ; processing (DEFMACRO DEFUN/WRAPPER ...) ; processing (DEFUN CALL-WITH-TOPLEVEL-HANDLER ...) ; processing (DEFUN CALL-INSIDE-WORKER ...) ; processing (DEFUN CALL-IMPL-FN ...) ; processing (DEFMACRO DEFINE-DEFPUN ...) ; processing (DEFINE-DEFPUN DEFPUN ...) ; processing (DEFINE-DEFPUN DEFPUN/TYPE ...) ; processing (DEFMACRO DEFPUN* ...) ; processing (DEFMACRO DEFPUN/TYPE* ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/defpun-tmp5LF2452A.fasl ; compilation finished in 0:00:00.143 ; compiling file "/usr/share/common-lisp/source/lparallel/src/cognate/package.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (DEFPACKAGE #:LPARALLEL.COGNATE ...) ; processing (IN-PACKAGE #:LPARALLEL.COGNATE) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/cognate/package-tmpTSFGDAZ7.fasl ; compilation finished in 0:00:00.000 ; compiling file "/usr/share/common-lisp/source/lparallel/src/cognate/util.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.COGNATE) ; processing (DEFUN ZIP/VECTOR ...) ; processing (DEFUN FIND-MIN-LENGTH ...) ; processing (DEFUN ITEM-PREDICATE ...) ; file: /usr/share/common-lisp/source/lparallel/src/cognate/util.lisp ; in: DEFUN ITEM-PREDICATE ; (EQL LPARALLEL.COGNATE::ITEM LPARALLEL.COGNATE::X) ; ; note: forced to do IF-EQL (cost 15) ; unable to do #1=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 #1# (cost 4) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; etc. ; processing (DEFUN SUBSIZE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/cognate/util-tmpGJFUKHN2.fasl ; compilation finished in 0:00:00.007 ; compiling file "/usr/share/common-lisp/source/lparallel/src/cognate/option.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.COGNATE) ; processing (DEFUN GET-PARTS-HINT ...) ; processing (DEFMACRO POP-PLIST ...) ; processing (DEFUN %PARSE-OPTIONS ...) ; processing (DEFUN PARSE-OPTIONS ...) ; processing (DEFMACRO WITH-PARSED-OPTIONS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/cognate/option-tmpRLWVC93J.fasl ; compilation finished in 0:00:00.011 ; compiling file "/usr/share/common-lisp/source/lparallel/src/cognate/subdivide.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.COGNATE) ; processing (DEFUN FIND-NUM-PARTS ...) ; processing (DEFMACRO WITH-PARTS ...) ; processing (DEFUN SUBDIVIDE-ARRAY ...) ; processing (DEFUN SUBDIVIDE-LIST ...) ; processing (DEFUN SUBDIVIDE-LIST/SLICE ...) ; processing (DEFUN MAKE-PARTS ...) ; processing (DEFUN MAKE-RESULT-PARTS ...) ; processing (DEFUN MAKE-INPUT-PARTS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/cognate/subdivide-tmpLJXQSCJY.fasl ; compilation finished in 0:00:00.035 ; compiling file "/usr/share/common-lisp/source/lparallel/src/cognate/pandor.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.COGNATE) ; processing (DEFMACRO WITH-FORMS-SUBMITTED ...) ; processing (DEFMACRO PAND ...) ; processing (DEFMACRO POR ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/cognate/pandor-tmp4OLR0J6X.fasl ; compilation finished in 0:00:00.008 ; compiling file "/usr/share/common-lisp/source/lparallel/src/cognate/plet.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.COGNATE) ; processing (DEFUN DECLARATION-INFORMATION ...) ; processing (DEFUN CUSTOM-DECLARATION-P ...) ; processing (DEFPARAMETER *STANDARD-DECLARATION-IDENTIFIERS* ...) ; processing (DEFUN DECLARATIONP ...) ; processing (DEFUN ZIP-REPEAT ...) ; processing (DEFUN DECL-SPEC->TYPED-VARS ...) ; processing (DEFUN DECL-SPECS->TYPED-VARS ...) ; processing (DEFUN DECLARES->DECL-SPECS ...) ; processing (DEFUN DECLARES->TYPED-VARS ...) ; processing (DEFSLOTS BINDING-DATUM ...) ; processing (DEFUN MAKE-SV-BINDING-DATUM ...) ; processing (DEFUN MAKE-MV-BINDING-DATUM ...) ; processing (DEFUN PARTITION ...) ; processing (DEFUN MAKE-BINDING-DATA ...) ; processing (DEFUN LOOKUP-ALL ...) ; processing (DEFUN VAR-TYPE ...) ; processing (DEFUN FUTURE-LET-BINDING ...) ; processing (DEFUN FUTURE-LET-BINDINGS ...) ; processing (DEFUN FUTURE-MACROLET-BINDING ...) ; processing (DEFUN FUTURE-MACROLET-BINDINGS ...) ; processing (DEFUN %MV-MACROLET-BINDINGS ...) ; processing (DEFUN MV-MACROLET-BINDINGS ...) ; processing (DEFUN BINDING-DECL-SPEC ...) ; processing (DEFUN BINDING-DECL-SPECS ...) ; processing (DEFUN ALL-BINDING-VARS ...) ; processing (DEFUN UNKNOWN-TYPED-VARS ...) ; processing (DEFMACRO %PLET ...) ; processing (DEFMACRO PLET ...) ; processing (DEFMACRO PLET-IF ...) ; processing (ALIAS-MACRO TOPLEVEL-PLET ...) ; processing (DEFMACRO PFUNCALL ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/cognate/plet-tmp6XXQRAHN.fasl ; compilation finished in 0:00:00.075 ; compiling file "/usr/share/common-lisp/source/lparallel/src/cognate/pmap.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.COGNATE) ; processing (DEFUN PMAP-INTO/PARTS ...) ; processing (DEFUN MAP-NIL ...) ; processing (DEFUN MAPLIST-INTO ...) ; processing (DEFUN MAP-ITERATE ...) ; file: /usr/share/common-lisp/source/lparallel/src/cognate/pmap.lisp ; in: DEFUN MAP-ITERATE ; (DEFUN LPARALLEL.COGNATE::MAP-ITERATE ; (MAP LPARALLEL.COGNATE::SIZE LPARALLEL.COGNATE::FN ; LPARALLEL.COGNATE::SEQS) ; "A variation of (map nil ...)/mapc/mapl with size constrained. ; Without a result to delineate sublist boundaries, we must enforce them ; manually." ; (CHECK-TYPE LPARALLEL.COGNATE::SIZE (INTEGER 0)) ; (LET ((LPARALLEL.COGNATE::FN ; (ALEXANDRIA:ENSURE-FUNCTION LPARALLEL.COGNATE::FN)) ; (LPARALLEL.UTIL:INDEX 0)) ; (APPLY MAP ; (LAMBDA (&REST LPARALLEL.COGNATE::ARGS) ; (DECLARE #) ; (DECLARE #) ; (WHEN # #) ; (APPLY LPARALLEL.COGNATE::FN LPARALLEL.COGNATE::ARGS) ; (INCF LPARALLEL.UTIL:INDEX)) ; LPARALLEL.COGNATE::SEQS))) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; ==> ; (BLOCK LPARALLEL.COGNATE::MAP-ITERATE ; (CHECK-TYPE LPARALLEL.COGNATE::SIZE (INTEGER 0)) ; (LET ((LPARALLEL.COGNATE::FN ; (ALEXANDRIA:ENSURE-FUNCTION LPARALLEL.COGNATE::FN)) ; (LPARALLEL.UTIL:INDEX 0)) ; (APPLY MAP ; (LAMBDA (&REST LPARALLEL.COGNATE::ARGS) ; (DECLARE #) ; (DECLARE #) ; (WHEN # #) ; (APPLY LPARALLEL.COGNATE::FN LPARALLEL.COGNATE::ARGS) ; (INCF LPARALLEL.UTIL:INDEX)) ; LPARALLEL.COGNATE::SEQS))) ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM MAP-ITERATE NIL). Use GO/RETURN-FROM with SAFETY 0, or declare the ; exit function DYNAMIC-EXTENT to avoid. ; (EQL LPARALLEL.UTIL:INDEX LPARALLEL.COGNATE::SIZE) ; ; note: forced to do %EQL/INTEGER (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; (INCF LPARALLEL.UTIL:INDEX) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) . #2=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; processing (DEFUN PMAP-INTO/POWDER/ARRAY ...) ; processing (DEFUN PMAP-INTO/POWDER/LIST ...) ; processing (DEFUN PMAP-INTO/POWDER ...) ; processing (DEFUN PMAP-INTO/PARSED ...) ; processing (DEFUN PMAP-INTO/UNPARSED ...) ; processing (DEFUN PMAP-INTO ...) ; processing (DEFUN PMAP-ITERATE/PARTS ...) ; processing (DEFUN PMAP-ITERATE/POWDER ...) ; processing (DEFUN PMAP-ITERATE ...) ; processing (DEFUN PMAP/PARSED ...) ; processing (DEFUN PMAP/UNPARSED ...) ; processing (DEFUN PMAP ...) ; processing (DEFUN PMAPCAR ...) ; processing (DEFUN PMAPLIST-INTO ...) ; processing (DEFUN PMAPLIST ...) ; processing (DEFUN PMAPL ...) ; processing (DEFUN PMAPC ...) ; processing (DEFUN PMAPCAN ...) ; processing (DEFUN PMAPCON ...) ; processing (DEFUN PMAP-REDUCE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/cognate/pmap-tmpGO08YVIW.fasl ; compilation finished in 0:00:00.047 ; compiling file "/usr/share/common-lisp/source/lparallel/src/cognate/pmap-open-coded.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.COGNATE) ; processing (DEFMACRO CHECK-SYMBOLS ...) ; processing (DEFMACRO DEFMACRO/SYMS ...) ; processing (DEFUN QUOTEDP ...) ; processing (DEFUN QUOTED-VECTOR-TYPE-P ...) ; processing (DEFMACRO/SYMS MAP-INTO/VECTOR/1-VECTOR/RANGE ...) ; processing (DEFMACRO/SYMS PMAP-INTO/VECTOR/1-VECTOR ...) ; processing (DEFINE-COMPILER-MACRO PMAP-INTO ...) ; processing (DEFINE-COMPILER-MACRO PMAP ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/cognate/pmap-open-coded-tmpW4V46RST.fasl ; compilation finished in 0:00:00.047 ; compiling file "/usr/share/common-lisp/source/lparallel/src/cognate/pdotimes.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.COGNATE) ; processing (DEFUN %PDOTIMES ...) ; processing (DEFMACRO/ONCE PDOTIMES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/cognate/pdotimes-tmp3OJ639ET.fasl ; compilation finished in 0:00:00.016 ; compiling file "/usr/share/common-lisp/source/lparallel/src/cognate/pquantifier.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.COGNATE) ; processing (DEFUN PQUANTIFIER ...) ; processing (DEFUN PEVERY ...) ; processing (DEFUN PSOME ...) ; processing (DEFUN PNOTEVERY ...) ; processing (DEFUN PNOTANY ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/cognate/pquantifier-tmpB4L1425D.fasl ; compilation finished in 0:00:00.012 ; compiling file "/usr/share/common-lisp/source/lparallel/src/cognate/preduce.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.COGNATE) ; processing (DEFMACRO WITH-PREDUCE-CONTEXT ...) ; processing (DEFUN PREDUCE-PARTIAL/VECTOR ...) ; processing (DEFUN PREDUCE-PARTIAL/LIST ...) ; processing (DEFUN %PREDUCE-PARTIAL ...) ; processing (DEFUN PREDUCE/COMMON ...) ; processing (DEFUN PREDUCE ...) ; processing (DEFUN PREDUCE-PARTIAL ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/cognate/preduce-tmpFG7U3LX.fasl ; compilation finished in 0:00:00.039 ; compiling file "/usr/share/common-lisp/source/lparallel/src/cognate/premove.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.COGNATE) ; processing (DEFUN PREMOVE-IF-NOT/LIST ...) ; processing (DEFUN PREMOVE-IF-NOT ...) ; processing (DEFUN PREMOVE-IF ...) ; processing (DEFUN PREMOVE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/cognate/premove-tmpRB2S59DB.fasl ; compilation finished in 0:00:00.019 ; compiling file "/usr/share/common-lisp/source/lparallel/src/cognate/pfind.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.COGNATE) ; processing (DEFMACRO WITH-PFIND-CONTEXT ...) ; processing (DEFUN PFIND-IF/VECTOR ...) ; processing (DEFUN PFIND-IF/LIST ...) ; processing (DEFUN PFIND-IF ...) ; processing (DEFUN PFIND-IF-NOT ...) ; processing (DEFUN PFIND ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/cognate/pfind-tmpU1JZ7FXZ.fasl ; compilation finished in 0:00:00.043 ; compiling file "/usr/share/common-lisp/source/lparallel/src/cognate/pcount.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.COGNATE) ; processing (DEFUN PCOUNT-IF ...) ; processing (DEFUN PCOUNT-IF-NOT ...) ; processing (DEFUN PCOUNT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/cognate/pcount-tmp2DUJ9I.fasl ; compilation finished in 0:00:00.015 ; compiling file "/usr/share/common-lisp/source/lparallel/src/cognate/psort.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.COGNATE) ; processing (DEFUN/TYPE/INLINE MIDPOINT ...) ; processing (DEFMACRO DEFINE-QUICKSORT-FN ...) ; processing (DEFMACRO DEFINE-QUICKSORT-FNS ...) ; processing (DEFINE-QUICKSORT-FNS) ; processing (LPARALLEL.DEFPUN::DELETE-REGISTERED-NAMES (QUOTE #)) ; processing (DEFUN CALL-QUICKSORT ...) ; processing (DEFUN PSORT ...) ; processing (SETF (DOCUMENTATION # ...) ...) ; processing (DEFUN PSORT* ...) ; processing (DEFINE-COMPILER-MACRO PSORT* ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/cognate/psort-tmpU602JQSD.fasl ; compilation finished in 0:00:00.103 ; compiling file "/usr/share/common-lisp/source/lparallel/src/package.lisp" (written 20 JUL 2016 02:52:58 AM): ; processing (IN-PACKAGE #:LPARALLEL.KERNEL) ; processing (PACKAGE #:LPARALLEL ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/lparallel/src/package-tmp5O3OCPXW.fasl ; compilation finished in 0:00:00.011 ; compiling file "/usr/share/common-lisp/source/esrap/src/package.lisp" (written 03 APR 2018 08:41:47 PM): ; processing (DEFPACKAGE #:ESRAP ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/esrap/src/package-tmpOLTFAEPG.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/esrap/src/types.lisp" (written 03 APR 2018 08:41:47 PM): ; processing (IN-PACKAGE #:ESRAP) ; processing (DEFTYPE INPUT-POSITION ...) ; processing (DEFTYPE INPUT-LENGTH ...) ; processing (DEFTYPE LEFT-RECURSION-POLICY ...) ; processing (DEFTYPE NONTERMINAL ...) ; processing (DEFTYPE TERMINAL ...) ; processing (DEFTYPE CHARACTER-RANGE ...) ; processing (DEFTYPE PREDICATE-NAME ...) ; processing (DEFTYPE PREDICATE ...) ; processing (DEFTYPE ERROR-REPORT-PART ...) ; processing (DEFTYPE RULE-ERROR-REPORT ...) ; processing (DEFTYPE RULE-ERROR-REPORT-PATTERN ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN ERROR-REPORT-BEHAVIOR-SUITABLE-FOR-REPORT-PART-P ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/esrap/src/types-tmpUZ4MPL4A.fasl ; compilation finished in 0:00:00.008 ; compiling file "/usr/share/common-lisp/source/esrap/src/protocol.lisp" (written 03 APR 2018 08:41:47 PM): ; processing (IN-PACKAGE #:ESRAP) ; processing (DEFGENERIC ESRAP-ERROR-POSITION ...) ; processing (DEFGENERIC ESRAP-PARSE-ERROR-RESULT ...) ; processing (DEFGENERIC ESRAP-PARSE-ERROR-CONTEXT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/esrap/src/protocol-tmpBQS2IZ67.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/esrap/src/variables.lisp" (written 03 APR 2018 08:41:47 PM): ; processing (IN-PACKAGE #:ESRAP) ; processing (DECLAIM (TYPE LEFT-RECURSION-POLICY ...)) ; processing (DEFVAR *ON-LEFT-RECURSION* ...) ; processing (DEFPARAMETER *EVAL-NONTERMINALS* ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/esrap/src/variables-tmpDEX1AB43.fasl ; compilation finished in 0:00:00.000 ; compiling file "/usr/share/common-lisp/source/esrap/src/conditions.lisp" (written 03 APR 2018 08:41:47 PM): ; processing (IN-PACKAGE #:ESRAP) ; processing (DEFINE-CONDITION INVALID-EXPRESSION-ERROR ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN INVALID-EXPRESSION-ERROR ...) ; processing (DEFINE-CONDITION ESRAP-ERROR ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFINE-CONDITION ESRAP-PARSE-ERROR ...) ; processing (DEFMETHOD ESRAP-ERROR-POSITION ...) ; processing (DEFMETHOD ESRAP-PARSE-ERROR-CONTEXT ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN ESRAP-PARSE-ERROR ...) ; processing (DEFINE-CONDITION LEFT-RECURSION ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN LEFT-RECURSION ...) ; processing (DEFINE-CONDITION UNDEFINED-RULE ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFINE-CONDITION UNDEFINED-RULE-ERROR ...) ; processing (DEFUN UNDEFINED-RULE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/esrap/src/conditions-tmpXEL4GRQG.fasl ; compilation finished in 0:00:00.051 ; compiling file "/usr/share/common-lisp/source/esrap/src/expressions.lisp" (written 03 APR 2018 08:41:47 PM): ; processing (IN-PACKAGE #:ESRAP) ; processing (DEFVAR *EXPRESSION-KINDS* ...) ; processing (DEFMACRO EXPRESSION-CASE ...) ; processing (DEFMACRO WITH-EXPRESSION ...) ; processing (DEFUN CHECK-FUNCTION-REFERENCE ...) ; processing (DEFUN CHECK-EXPRESSION ...) ; processing (DEFUN %EXPRESSION-DEPENDENCIES ...) ; processing (DEFUN %EXPRESSION-DIRECT-DEPENDENCIES ...) ; processing (DEFUN EXPRESSION-START-TERMINALS ...) ; processing (DEFUN EXPRESSION< ...) ; processing (DEFUN EXPRESSION-EQUAL-P ...) ; processing (DEFUN DESCRIBE-TERMINAL ...) ; processing (DEFUN PRINT-TERMINAL ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/esrap/src/expressions-tmpBLHHY8QV.fasl ; compilation finished in 0:00:00.547 ; compiling file "/usr/share/common-lisp/source/esrap/src/rule.lisp" (written 03 APR 2018 08:41:47 PM): ; processing (IN-PACKAGE #:ESRAP) ; processing (DEFVAR *RULES* ...) ; processing (DEFUN CLEAR-RULES ...) ; processing (DEFSTRUCT (RULE-CELL # ...) ...) ; processing (DECLAIM (INLINE CELL-FUNCTION)) ; processing (DEFUN CELL-FUNCTION ...) ; processing (DEFUN CELL-RULE ...) ; processing (DEFUN SET-CELL-INFO ...) ; processing (DEFUN UNDEFINED-RULE-FUNCTION ...) ; processing (DEFUN ENSURE-RULE-CELL ...) ; processing (DEFUN DELETE-RULE-CELL ...) ; processing (DEFUN REFERENCE-RULE-CELL ...) ; processing (DEFUN DEREFERENCE-RULE-CELL ...) ; processing (DEFUN FIND-RULE-CELL ...) ; processing (DEFCLASS RULE ...) ; processing (SETF (DOCUMENTATION # ...) ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN RULE-SUITABLE-FOR-REPORT-PART-P ...) ; processing (DEFUN DETACH-RULE ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN SORT-DEPENDENCIES ...) ; processing (DEFUN RULE-DEPENDENCIES ...) ; processing (DEFUN RULE-DIRECT-DEPENDENCIES ...) ; processing (DEFUN %RULE-DIRECT-DEPENDENCIES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/esrap/src/rule-tmpGMYRLBUL.fasl ; compilation finished in 0:00:00.047 ; compiling file "/usr/share/common-lisp/source/esrap/src/results.lisp" (written 03 APR 2018 08:41:47 PM): ; processing (IN-PACKAGE #:ESRAP) ; processing (DEFSTRUCT (RESULT # ...) ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN RESULT-POSITION ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFSTRUCT (ERROR-RESULT # ...)) ; processing (DEFSTRUCT (INACTIVE-RULE # ...)) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN INACTIVE-RULE-RULE ...) ; processing (DEFSTRUCT (FAILED-PARSE # ...)) ; processing (DECLAIM (INLINE MAKE-LEFT-RECURSION-RESULT ...)) ; processing (DEFSTRUCT (LEFT-RECURSION-RESULT # ...) ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN LEFT-RECURSION-RESULT-RULE ...) ; processing (DEFSTRUCT (SUCCESSFUL-PARSE # ...) ...) ; processing (DEFUN SUCCESSFUL-PARSE-PRODUCTION ...) ; processing (DEFMACRO MAKE-SUCCESSFUL-PARSE ...) ; processing (DEFUN RESULT-NONTERMINAL-P ...) ; processing (DEFUN RESULT-UNSATISFIED-PREDICATE-P ...) ; processing (DEFUN RESULT-TRIVIAL-PREDICATE-P ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN RESULT-SUITABLE-FOR-REPORT-PART-P ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN MAX-OF-RESULT-POSITIONS ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN LIST-OF-RESULT-PRODUCTIONS ...) ; processing (DEFUN LIST-OF-RESULT-PRODUCTIONS/BUTLAST ...) ; processing (DEFUN MAYBE-AUGMENT-INACTIVE-RULES ...) ; processing (DECLAIM (FTYPE # ...) ...) ; processing (DEFUN MAP-RESULTS ...) ; processing (DEFUN MAP-MAX-RESULTS ...) ; processing (DEFUN MAP-MAX-LEAF-RESULTS ...) ; processing (DECLAIM (INLINE FLATTENED-CHILDREN)) ; processing (DEFUN FLATTENED-CHILDREN ...) ; processing (DEFUN RESULT-CONTEXT ...) ; processing (DEFUN RESULT-ROOT-CAUSE ...) ; processing (DEFUN RESULT-EXPECTED-INPUT ...) ; processing (DEFUN PARTITION-RESULTS ...) ; processing (DEFUN ERROR-REPORT ...) ; processing (DEFVAR *RESULT-PPRINT-DISPATCH* ...) ; processing (DEFUN PRINT-RESULT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/esrap/src/results-tmpLT3BCQID.fasl ; compilation finished in 0:00:00.207 ; compiling file "/usr/share/common-lisp/source/esrap/src/cache.lisp" (written 03 APR 2018 08:41:47 PM): ; processing (IN-PACKAGE #:ESRAP) ; processing (DECLAIM (INLINE MAKE-CACHE ...)) ; processing (DEFUN MAKE-CACHE ...) ; processing (DEFUN GET-CACHED ...) ; processing (DEFUN (SETF GET-CACHED) ...) ; processing (DEFSTRUCT (HEAD # ...) ...) ; processing (DECLAIM (INLINE MAKE-HEADS ...)) ; processing (DEFUN MAKE-HEADS ...) ; processing (DEFUN GET-HEAD ...) ; processing (DEFUN (SETF GET-HEAD) ...) ; processing (DEFUN RECALL ...) ; processing (DECLAIM (INLINE MAKE-CONTEXT ...)) ; processing (DEFSTRUCT (CONTEXT #) ...) ; processing (DECLAIM (TYPE CONTEXT ...)) ; processing (DEFVAR *CONTEXT* ...) ; processing (DEFMACRO WITH-PUSHED-NONTERMINAL ...) ; processing (DEFMACRO WITH-CACHED-RESULT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/esrap/src/cache-tmp7AGUJ6PJ.fasl ; compilation finished in 0:00:00.051 ; compiling file "/usr/share/common-lisp/source/esrap/src/evaluator.lisp" (written 03 APR 2018 08:41:47 PM): ; processing (IN-PACKAGE #:ESRAP) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN RESOLVE-FUNCTION ...) ; processing (DEFVAR *CURRENT-RULE* ...) ; processing (DEFUN COMPILE-RULE ...) ; processing (DEFUN EVAL-EXPRESSION ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN COMPILE-EXPRESSION ...) ; processing (DEFMACRO EXPRESSION-LAMBDA ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN EVAL-CHARACTER ...) ; processing (DEFUN COMPILE-CHARACTER ...) ; processing (DECLAIM (INLINE EXEC-STRING)) ; processing (DEFUN EXEC-STRING ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN EVAL-STRING ...) ; processing (DEFUN COMPILE-STRING ...) ; processing (DECLAIM (INLINE MATCH-TERMINAL/CASE-SENSITIVE-P ...)) ; processing (DEFUN MATCH-TERMINAL/CASE-SENSITIVE-P ...) ; processing (DEFUN MATCH-TERMINAL/CASE-INSENSITIVE-P ...) ; processing (DEFUN MATCH-TERMINAL/1/CASE-SENSITIVE-P ...) ; processing (DEFUN MATCH-TERMINAL/1/CASE-INSENSITIVE-P ...) ; processing (DEFUN EVAL-TERMINAL ...) ; processing (DEFUN COMPILE-TERMINAL ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN EXEC-TERMINAL-FUNCTION ...) ; processing (DEFUN EVAL-TERMINAL-FUNCTION ...) ; processing (DEFUN COMPILE-TERMINAL-FUNCTION ...) ; processing (DEFUN EXEC-NONTERMINAL ...) ; processing (DEFUN EVAL-NONTERMINAL ...) ; processing (DEFUN COMPILE-NONTERMINAL ...) ; processing (DEFUN EVAL-SEQUENCE ...) ; processing (DEFUN COMPILE-SEQUENCE ...) ; processing (DECLAIM (INLINE MAKE-ORDERED-CHOISE-RESULT)) ; processing (DEFUN MAKE-ORDERED-CHOISE-RESULT ...) ; processing (DEFUN EVAL-ORDERED-CHOISE ...) ; processing (DEFUN CHECK-ORDERED-CHOISE-PREFIX ...) ; processing (DEFUN ANALYZE-ORDERED-CHOISE ...) ; processing (DEFUN COMPILE-ORDERED-CHOISE ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN EXEC-NEGATION ...) ; processing (DEFUN EVAL-NEGATION ...) ; processing (DEFUN COMPILE-NEGATION ...) ; processing (DEFUN EVAL-GREEDY-REPETITION ...) ; processing (DEFUN COMPILE-GREEDY-REPETITION ...) ; processing (DEFUN EVAL-GREEDY-POSITIVE-REPETITION ...) ; processing (DEFUN COMPILE-GREEDY-POSITIVE-REPETITION ...) ; processing (DEFUN EVAL-OPTIONAL ...) ; processing (DEFUN COMPILE-OPTIONAL ...) ; processing (DEFUN EVAL-FOLLOWED-BY ...) ; processing (DEFUN COMPILE-FOLLOWED-BY ...) ; processing (DEFUN EVAL-NOT-FOLLOWED-BY ...) ; processing (DEFUN COMPILE-NOT-FOLLOWED-BY ...) ; processing (DEFINE-LOOK :BEHIND ...) ; processing (DEFINE-LOOK :AHEAD ...) ; processing (DEFUN EVAL-SEMANTIC-PREDICATE ...) ; processing (DEFUN COMPILE-SEMANTIC-PREDICATE ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN EXEC-CHARACTER-RANGES ...) ; processing (DEFUN EVAL-CHARACTER-RANGES ...) ; processing (DEFUN COMPILE-CHARACTER-RANGES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/esrap/src/evaluator-tmpADFMBTPY.fasl ; compilation finished in 0:00:03.551 ; compiling file "/usr/share/common-lisp/source/esrap/src/macros.lisp" (written 03 APR 2018 08:41:47 PM): ; processing (IN-PACKAGE #:ESRAP) ; processing (DEFUN TEXT ...) ; processing (DEFUN SINGLETON-OPTION ...) ; processing (DEFMACRO WITH-CURRENT-SOURCE-FORM ...) ; processing (DEFUN PARSE-LAMBDA-LIST-MAYBE-CONTAINING-&BOUNDS ...) ; processing (DEFUN CHECK-LAMBDA-LIST ...) ; processing (DEFUN PARSE-DEFRULE-OPTIONS ...) ; processing (DEFUN EXPAND-TRANSFORMS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/esrap/src/macros-tmpJ65DAF15.fasl ; compilation finished in 0:00:00.931 ; compiling file "/usr/share/common-lisp/source/esrap/src/interface.lisp" (written 03 APR 2018 08:41:47 PM): ; processing (IN-PACKAGE #:ESRAP) ; processing (DEFUN PARSE ...) ; processing (DEFINE-COMPILER-MACRO PARSE ...) ; processing (DEFUN PROCESS-PARSE-RESULT ...) ; processing (DEFMACRO DEFRULE ...) ; processing (DEFUN ADD-RULE ...) ; processing (DEFUN FIND-RULE ...) ; processing (DEFUN REMOVE-RULE ...) ; processing (DEFVAR *TRACE-LEVEL* ...) ; processing (DEFUN TRACE-RULE ...) ; processing (DEFUN UNTRACE-RULE ...) ; processing (DEFUN RULE-EXPRESSION ...) ; processing (DEFUN (SETF RULE-EXPRESSION) ...) ; processing (DEFUN CHANGE-RULE ...) ; processing (DEFUN DESCRIBE-GRAMMAR ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/esrap/src/interface-tmpIXT65XFP.fasl ; compilation finished in 0:00:01.471 ; compiling file "/usr/share/common-lisp/source/esrap/src/editor-support.lisp" (written 03 APR 2018 08:41:47 PM): ; processing (IN-PACKAGE #:ESRAP) ; processing (DEFVAR *INDENTATION-HINT-TABLE* ...) ; processing (DEFUN HINT-SLIME-INDENTATION ...) ; processing (HINT-SLIME-INDENTATION) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/esrap/src/editor-support-tmpAJ0SGYIK.fasl ; compilation finished in 0:00:00.051 ; compiling file "/usr/share/common-lisp/source/puri/src.lisp" (written 30 SEP 2020 05:54:46 AM): ; processing (DEFPACKAGE #:PURI ...) ; processing (IN-PACKAGE #:PURI) ; processing (DEFUN PARSE-BODY ...) ; processing (DEFUN SHRINK-VECTOR ...) ; processing (DEFINE-CONDITION URI-PARSE-ERROR ...) ; processing (DEFUN .PARSE-ERROR ...) ; processing (DEFUN INTERNAL-READER-ERROR ...) ; processing (DEFVAR *CURRENT-CASE-MODE* ...) ; processing (DEFMETHOD POSITION-CHAR ...) ; file: /usr/share/common-lisp/source/puri/src.lisp ; in: DEFMETHOD POSITION-CHAR (T STRING T T) ; (CHAR STRING PURI::I) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-ARRAY. ; processing (DEFUN DELIMITED-STRING-TO-LIST ...) ; processing (DEFVAR IF*-KEYWORD-LIST ...) ; processing (DEFMACRO IF* ...) ; processing (DEFCLASS URI ...) ; processing (DEFCLASS URN ...) ; processing (CLEAR-CACHING-ON-SLOT-CHANGE URI-SCHEME) ; processing (CLEAR-CACHING-ON-SLOT-CHANGE URI-HOST) ; processing (CLEAR-CACHING-ON-SLOT-CHANGE URI-PORT) ; processing (CLEAR-CACHING-ON-SLOT-CHANGE URI-PATH) ; processing (CLEAR-CACHING-ON-SLOT-CHANGE URI-QUERY) ; processing (CLEAR-CACHING-ON-SLOT-CHANGE URI-FRAGMENT) ; processing (DEFMETHOD MAKE-LOAD-FORM ...) ; processing (DEFMETHOD URI-P ...) ; processing (DEFMETHOD URI-P ...) ; processing (DEFUN COPY-URI ...) ; processing (DEFMETHOD URI-PARSED-PATH ...) ; processing (DEFMETHOD (SETF URI-PARSED-PATH) ...) ; processing (DEFUN URI-AUTHORITY ...) ; processing (DEFUN URI-NID ...) ; processing (DEFUN URI-NSS ...) ; processing (DEFPARAMETER *EXCLUDED-CHARACTERS* ...) ; processing (DEFUN RESERVED-CHAR-VECTOR ...) ; processing (DEFPARAMETER *RESERVED-CHARACTERS* ...) ; processing (DEFPARAMETER *RESERVED-AUTHORITY-CHARACTERS* ...) ; processing (DEFPARAMETER *RESERVED-PATH-CHARACTERS* ...) ; processing (DEFPARAMETER *RESERVED-FRAGMENT-CHARACTERS* ...) ; processing (DEFPARAMETER *VALID-NID-CHARACTERS* ...) ; processing (DEFPARAMETER *RESERVED-NSS-CHARACTERS* ...) ; processing (DEFPARAMETER *ILLEGAL-CHARACTERS* ...) ; processing (DEFPARAMETER *STRICT-ILLEGAL-QUERY-CHARACTERS* ...) ; processing (DEFPARAMETER *ILLEGAL-QUERY-CHARACTERS* ...) ; processing (DEFPARAMETER *VALID-IP6-CHARACTERS* ...) ; processing (DEFUN PARSE-URI ...) ; file: /usr/share/common-lisp/source/puri/src.lisp ; in: DEFUN PARSE-URI ; (FUNCALL ; (CASE PURI::*CURRENT-CASE-MODE* ; ((:CASE-INSENSITIVE-UPPER :CASE-SENSITIVE-UPPER) #'STRING-UPCASE) ; ((:CASE-INSENSITIVE-LOWER :CASE-SENSITIVE-LOWER) #'STRING-DOWNCASE)) ; (PURI::DECODE-ESCAPED-ENCODING PURI::SCHEME PURI::ESCAPE)) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (PLUSP PURI::PORT) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (STRING= "" PURI::PATH) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a SIMPLE-STRING. ; (STRING= "/" PURI::PATH) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a SIMPLE-STRING. ; (PLUSP PURI::PORT) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a NUMBER, not a FIXNUM. ; etc. ; processing (DEFMETHOD URI ...) ; processing (DEFMETHOD URI ...) ; processing (DEFMETHOD URI ...) ; processing (DEFVAR *STRICT-PARSE* ...) ; processing (DEFUN PARSE-URI-STRING ...) ; file: /usr/share/common-lisp/source/puri/src.lisp ; in: DEFUN PARSE-URI-STRING ; (LENGTH STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (CHAR STRING PURI::START) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (SUBSEQ STRING PURI::SINDEX PURI::START) ; ; 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. ; (PURI::FAILURE (&OPTIONAL PURI::WHY) ; (PURI::.PARSE-ERROR "illegal URI: ~s [~d]~@[: ~a~]" STRING PURI::STATE ; PURI::WHY)) ; ; note: Return type not fixed values, so can't use known return convention: ; * ; processing (DEFUN ESCAPE-P ...) ; file: /usr/share/common-lisp/source/puri/src.lisp ; in: DEFUN ESCAPE-P ; (LENGTH STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (CHAR STRING PURI::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; processing (DEFUN PARSE-PATH ...) ; file: /usr/share/common-lisp/source/puri/src.lisp ; in: DEFUN PARSE-PATH ; (STRING= "" (CAR PURI::XPATH-LIST)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a SIMPLE-STRING. ; (STRING= "" (CAR PURI::PL)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a SIMPLE-STRING. ; processing (DEFUN DECODE-ESCAPED-ENCODING ...) ; file: /usr/share/common-lisp/source/puri/src.lisp ; in: DEFUN DECODE-ESCAPED-ENCODING ; (LENGTH STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (COPY-SEQ 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. ; (= PURI::I MAX) ; ; 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. ; (CHAR STRING PURI::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (CHAR STRING (INCF PURI::I)) ; ; 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. ; (1+ PURI::I) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; (1+ PURI::NEW-I) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; (1+ PURI::I) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (1+ PURI::NEW-I) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; processing (DEFUN RENDER-URI ...) ; file: /usr/share/common-lisp/source/puri/src.lisp ; in: DEFUN RENDER-URI ; (FORMAT STREAM "~a" (PURI::URI-STRING PURI:URI)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (MEMBER T) STREAM (VECTOR CHARACTER) ; BASE-STRING), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (MEMBER . #1=(T)) STREAM (VECTOR CHARACTER) ; BASE-STRING), not a (MEMBER . #1#). ; processing (DEFUN RENDER-PARSED-PATH ...) ; processing (DEFUN RENDER-URN ...) ; file: /usr/share/common-lisp/source/puri/src.lisp ; in: DEFUN RENDER-URN ; (FORMAT STREAM "~a" (PURI::URI-STRING PURI:URN)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (MEMBER T) STREAM (VECTOR CHARACTER) ; BASE-STRING), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (MEMBER . #1=(T)) STREAM (VECTOR CHARACTER) ; BASE-STRING), not a (MEMBER . #1#). ; processing (DEFPARAMETER *ESCAPED-ENCODING* ...) ; processing (DEFUN ENCODE-ESCAPED-ENCODING ...) ; file: /usr/share/common-lisp/source/puri/src.lisp ; in: DEFUN ENCODE-ESCAPED-ENCODING ; (LENGTH STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (INCF PURI::NEW-I) ; --> SETQ THE ; ==> ; (+ 1 PURI::NEW-I) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; (CHAR STRING PURI::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (INCF PURI::NEW-I) ; --> SETQ THE ; ==> ; (+ 1 PURI::NEW-I) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; (ELT PURI::*ESCAPED-ENCODING* PURI::Q) ; ; 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 PURI::NEW-I) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; (ELT PURI::*ESCAPED-ENCODING* PURI::R) ; ; 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 PURI::NEW-I) ; --> SETQ THE ; ==> ; (+ 1 PURI::NEW-I) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; --> SETQ THE ; ==> ; (+ 1 PURI::NEW-I) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFMETHOD MERGE-URIS ...) ; processing (DEFMETHOD MERGE-URIS ...) ; processing (DEFMETHOD MERGE-URIS ...) ; processing (DEFMETHOD MERGE-URIS ...) ; file: /usr/share/common-lisp/source/puri/src.lisp ; in: DEFMETHOD MERGE-URIS (URI URI) ; (STRING= PURI::A ; (PURI::IF* (ATOM PURI::B) PURI::THEN PURI::B PURI::ELSE ; (CAR PURI::B))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a STRING. ; The second argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a SIMPLE-STRING. ; The second argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a SIMPLE-STRING. ; (STRING= "." (CAR LAST)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a SIMPLE-STRING. ; (STRING= "." (CAAR LAST)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a SIMPLE-STRING. ; (STRING= ".." ; (LET ((PURI::L (CAR #))) ; (PURI::IF* (ATOM PURI::L) PURI::THEN PURI::L PURI::ELSE ; (CAR PURI::L)))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a SIMPLE-STRING. ; (POSITION ".." PURI::NPL :TEST ; #'(LAMBDA (PURI::A PURI::B) ; (STRING= PURI::A ; (PURI::IF* (ATOM PURI::B) PURI::THEN PURI::B ; PURI::ELSE (CAR PURI::B))))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; (STRING= PURI::A PURI::B) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a STRING. ; The second argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a SIMPLE-STRING. ; The second argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a SIMPLE-STRING. ; processing (DEFMETHOD ENOUGH-URI ...) ; processing (DEFMETHOD ENOUGH-URI ...) ; processing (DEFMETHOD ENOUGH-URI ...) ; processing (DEFMETHOD ENOUGH-URI ...) ; processing (DEFUN MAKE-URI-SPACE ...) ; processing (DEFUN GETHASH-URI ...) ; processing (DEFUN PUTHASH-URI ...) ; processing (DEFUN URI-HASH ...) ; processing (DEFVAR *URIS* ...) ; processing (DEFUN URI-SPACE ...) ; processing (DEFUN (SETF URI-SPACE) ...) ; processing (WHEN (FBOUNDP #) ...) ; processing (DEFGENERIC URI= ...) ; processing (DEFMETHOD URI= ...) ; file: /usr/share/common-lisp/source/puri/src.lisp ; in: DEFMETHOD URI= (URI URI) ; (STRING= (PURI:URI-PATH PURI::URI1) (PURI:URI-PATH PURI::URI2)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a STRING. ; The second argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a SIMPLE-STRING. ; The second argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a SIMPLE-STRING. ; (STRING= (PURI:URI-QUERY PURI::URI1) (PURI:URI-QUERY PURI::URI2)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a STRING. ; The second argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a SIMPLE-STRING. ; The second argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a SIMPLE-STRING. ; (STRING= (PURI:URI-FRAGMENT PURI::URI1) (PURI:URI-FRAGMENT PURI::URI2)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a STRING. ; The second argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a SIMPLE-STRING. ; The second argument is a (OR (VECTOR CHARACTER) BASE-STRING SYMBOL ; CHARACTER), not a SIMPLE-STRING. ; (EQL (OR (PURI:URI-PORT PURI::URI1) PURI::DEFAULT-PORT) ; (OR (PURI:URI-PORT PURI::URI2) PURI::DEFAULT-PORT)) ; ; note: forced to do IF-EQL (cost 15) ; unable to do #1=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 #1# (cost 4) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; etc. ; processing (DEFMETHOD URI= ...) ; processing (DEFUN URN-NSS-EQUAL ...) ; file: /usr/share/common-lisp/source/puri/src.lisp ; in: DEFUN URN-NSS-EQUAL ; (LENGTH PURI::NSS1) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS VECTOR ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; (LENGTH PURI::NSS2) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS VECTOR ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; (CHAR PURI::NSS1 PURI::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (CHAR PURI::NSS2 PURI::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (CHAR-NOT-EQUAL PURI::C1 PURI::C2) ; ; 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. ; processing (DEFMETHOD INTERN-URI ...) ; processing (DEFMETHOD INTERN-URI ...) ; processing (DEFUN UNINTERN-URI ...) ; processing (DEFMACRO DO-ALL-URIS ...) ; processing (DEFUN SHARP-U ...) ; processing (SET-DISPATCH-MACRO-CHARACTER #\# ...) ; processing (PROVIDE :URI) ; processing (DEFUN GC ...) ; processing (DEFUN TIME-URI-MODULE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/puri/src-tmpJ2HJZECB.fasl ; compilation finished in 0:00:05.503 ; compiling file "/usr/share/common-lisp/source/cl-base64/package.lisp" (written 30 SEP 2020 06:06:36 AM): ; processing (DEFPACKAGE #:CL-BASE64 ...) ; processing (IN-PACKAGE #:CL-BASE64) ; processing (DEFVAR *ENCODE-TABLE* ...) ; processing (DECLAIM (TYPE SIMPLE-STRING ...)) ; processing (DEFVAR *URI-ENCODE-TABLE* ...) ; processing (DECLAIM (TYPE SIMPLE-STRING ...)) ; processing (DEFVAR *PAD-CHAR* ...) ; processing (DEFVAR *URI-PAD-CHAR* ...) ; processing (DECLAIM (TYPE CHARACTER ...)) ; processing (DEFTYPE DECODE-TABLE ...) ; processing (DEFUN MAKE-DECODE-TABLE ...) ; processing (DEFCONSTANT +DECODE-TABLE+ ...) ; processing (DEFVAR *DECODE-TABLE* ...) ; processing (DECLAIM (TYPE DECODE-TABLE ...)) ; processing (DEFCONSTANT +URI-DECODE-TABLE+ ...) ; processing (DEFVAR *URI-DECODE-TABLE* ...) ; processing (DECLAIM (TYPE DECODE-TABLE ...)) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-base64/package-tmpXY4FGAPA.fasl ; compilation finished in 0:00:00.355 ; compiling file "/usr/share/common-lisp/source/cl-base64/encode.lisp" (written 30 SEP 2020 06:06:36 AM): ; processing (IN-PACKAGE #:CL-BASE64) ; processing (DEFUN ROUND-NEXT-MULTIPLE ...) ; file: /usr/share/common-lisp/source/cl-base64/encode.lisp ; in: DEFUN ROUND-NEXT-MULTIPLE ; (MOD CL-BASE64::X CL-BASE64::N) ; ; 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 ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR ; (RATIONAL (-4611686018427387904) ; (4611686018427387904)) ; DOUBLE-FLOAT SINGLE-FLOAT), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a (OR ; (RATIONAL (-4611686018427387904) ; (4611686018427387904)) ; DOUBLE-FLOAT SINGLE-FLOAT), 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. ; (+ CL-BASE64::X (THE FIXNUM (- CL-BASE64::N CL-BASE64::REMAINDER))) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (MOD CL-BASE64::X CL-BASE64::N) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do #1# (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 ; (RATIONAL #1=(-4611686018427387904) ; #2=(4611686018427387904)) ; DOUBLE-FLOAT SINGLE-FLOAT), not a FIXNUM. ; The result is a (VALUES ; (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL #3=(-9223372036854775808) ; #4=(9223372036854775807))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a (OR (RATIONAL #1# #2#) DOUBLE-FLOAT SINGLE-FLOAT), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL #3# #4#)) ; . #5#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a (RATIONAL #2=(-9223372036854775808) ; #3=(9223372036854775807)), not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a (RATIONAL #2# #3#), not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline (unsigned-byte 64) comparison (cost 5) because: ; The first argument is a (RATIONAL #1=(-4611686018427387904) ; #2=(9223372036854775807)), not a (UNSIGNED-BYTE ; 64). ; unable to do inline (signed-byte 64) comparison (cost 5) because: ; The first argument is a (RATIONAL #1# #2#), not a (SIGNED-BYTE 64). ; (+ CL-BASE64::X (THE FIXNUM (- CL-BASE64::N CL-BASE64::REMAINDER))) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) &REST ; T). ; etc. ; processing (DEFMACRO DEF-*-TO-BASE64-* ...) ; processing (DEF-*-TO-BASE64-* :STRING ...) ; file: /usr/share/common-lisp/source/cl-base64/encode.lisp ; in: DEF-*-TO-BASE64-* :STRING ; (CL-BASE64::DEF-*-TO-BASE64-* :STRING :STRING) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK LET LET* LABELS DO BLOCK LET TAGBODY RETURN-FROM PROGN COND IF ; --> CL-BASE64::OUTPUT-GROUP THE + THE ASH CHAR-CODE THE ; ==> ; (CHAR CL-BASE64::INPUT CL-BASE64::ISOURCE) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ==> ; (CHAR CL-BASE64::INPUT (THE FIXNUM (1+ CL-BASE64::ISOURCE))) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK LET LET* LABELS DO BLOCK LET TAGBODY RETURN-FROM PROGN COND IF IF ; --> CL-BASE64::OUTPUT-GROUP THE ASH CHAR-CODE THE ; ==> ; (CHAR CL-BASE64::INPUT CL-BASE64::ISOURCE) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK LET LET* LABELS DO BLOCK LET TAGBODY TAGBODY ; --> CL-BASE64::OUTPUT-GROUP THE ; ==> ; (+ (THE FIXNUM (ASH (THE FIXNUM (CHAR-CODE #)) 16)) ; (THE FIXNUM (ASH (THE FIXNUM (CHAR-CODE #)) 8)) ; (THE FIXNUM (CHAR-CODE (THE CHARACTER (CHAR CL-BASE64::INPUT #))))) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; processing (DEF-*-TO-BASE64-* :STRING ...) ; file: /usr/share/common-lisp/source/cl-base64/encode.lisp ; in: DEF-*-TO-BASE64-* :STRING ; (CL-BASE64::DEF-*-TO-BASE64-* :STRING :STREAM) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK LET LET* LABELS DO BLOCK LET TAGBODY RETURN-FROM PROGN COND IF ; --> CL-BASE64::OUTPUT-GROUP THE + THE ASH CHAR-CODE THE ; ==> ; (CHAR CL-BASE64::INPUT CL-BASE64::ISOURCE) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ==> ; (CHAR CL-BASE64::INPUT (THE FIXNUM (1+ CL-BASE64::ISOURCE))) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK LET LET* LABELS DO BLOCK LET TAGBODY RETURN-FROM PROGN COND IF IF ; --> CL-BASE64::OUTPUT-GROUP THE ASH CHAR-CODE THE ; ==> ; (CHAR CL-BASE64::INPUT CL-BASE64::ISOURCE) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK LET LET* LABELS DO BLOCK LET TAGBODY TAGBODY ; --> CL-BASE64::OUTPUT-GROUP THE ; ==> ; (+ (THE FIXNUM (ASH (THE FIXNUM (CHAR-CODE #)) 16)) ; (THE FIXNUM (ASH (THE FIXNUM (CHAR-CODE #)) 8)) ; (THE FIXNUM (CHAR-CODE (THE CHARACTER (CHAR CL-BASE64::INPUT #))))) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; processing (DEF-*-TO-BASE64-* :USB8-ARRAY ...) ; file: /usr/share/common-lisp/source/cl-base64/encode.lisp ; in: DEF-*-TO-BASE64-* :USB8-ARRAY ; (CL-BASE64::DEF-*-TO-BASE64-* :USB8-ARRAY :STRING) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK LET LET* LABELS DO BLOCK LET TAGBODY RETURN-FROM PROGN COND IF ; --> CL-BASE64::OUTPUT-GROUP THE + THE ASH THE ; ==> ; (AREF CL-BASE64::INPUT CL-BASE64::ISOURCE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ==> ; (AREF CL-BASE64::INPUT (THE FIXNUM (1+ CL-BASE64::ISOURCE))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK LET LET* LABELS DO BLOCK LET TAGBODY RETURN-FROM PROGN COND IF IF ; --> CL-BASE64::OUTPUT-GROUP THE ASH THE ; ==> ; (AREF CL-BASE64::INPUT CL-BASE64::ISOURCE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK LET LET* LABELS DO BLOCK LET TAGBODY TAGBODY ; --> CL-BASE64::OUTPUT-GROUP THE ; ==> ; (+ ; (THE FIXNUM ; (ASH (THE FIXNUM (AREF CL-BASE64::INPUT CL-BASE64::ISOURCE)) 16)) ; (THE FIXNUM (ASH (THE FIXNUM (AREF CL-BASE64::INPUT #)) 8)) ; (THE FIXNUM (AREF CL-BASE64::INPUT (+ 2 CL-BASE64::ISOURCE)))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; processing (DEF-*-TO-BASE64-* :USB8-ARRAY ...) ; file: /usr/share/common-lisp/source/cl-base64/encode.lisp ; in: DEF-*-TO-BASE64-* :USB8-ARRAY ; (CL-BASE64::DEF-*-TO-BASE64-* :USB8-ARRAY :STREAM) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK LET LET* LABELS DO BLOCK LET TAGBODY RETURN-FROM PROGN COND IF ; --> CL-BASE64::OUTPUT-GROUP THE + THE ASH THE ; ==> ; (AREF CL-BASE64::INPUT CL-BASE64::ISOURCE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ==> ; (AREF CL-BASE64::INPUT (THE FIXNUM (1+ CL-BASE64::ISOURCE))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK LET LET* LABELS DO BLOCK LET TAGBODY RETURN-FROM PROGN COND IF IF ; --> CL-BASE64::OUTPUT-GROUP THE ASH THE ; ==> ; (AREF CL-BASE64::INPUT CL-BASE64::ISOURCE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK LET LET* LABELS DO BLOCK LET TAGBODY TAGBODY ; --> CL-BASE64::OUTPUT-GROUP THE ; ==> ; (+ ; (THE FIXNUM ; (ASH (THE FIXNUM (AREF CL-BASE64::INPUT CL-BASE64::ISOURCE)) 16)) ; (THE FIXNUM (ASH (THE FIXNUM (AREF CL-BASE64::INPUT #)) 8)) ; (THE FIXNUM (AREF CL-BASE64::INPUT (+ 2 CL-BASE64::ISOURCE)))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; processing (DEFUN INTEGER-TO-BASE64-STRING ...) ; file: /usr/share/common-lisp/source/cl-base64/encode.lisp ; in: DEFUN INTEGER-TO-BASE64-STRING ; (MOD CL-BASE64::PADDED-BITS 24) ; ; 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). ; (ZEROP CL-BASE64::REMAINDER-PADDING) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL 0 (24)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (MOD CL-BASE64::PADDED-BITS 24) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL (-24) (24)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a (OR (RATIONAL (-24) (24)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR (RATIONAL (-24) (24)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (- 24 CL-BASE64::REMAINDER-PADDING) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The second argument is a (OR (RATIONAL 0 (24)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a FLOAT. ; (/ CL-BASE64::PADDING-BITS 6) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL 0 24)), not a FLOAT. ; ; note: unable to ; convert x/2^k to shift ; due to type uncertainty: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL 0 24)), not a INTEGER. ; (+ CL-BASE64::PADDED-BITS CL-BASE64::PADDING-BITS) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a RATIONAL. ; The second argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL 0 24)), not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL 0 24)), not a RATIONAL. ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL 0 24)), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL 0 24)), not a SINGLE-FLOAT. ; (/ (+ CL-BASE64::PADDED-BITS CL-BASE64::PADDING-BITS) 6) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; note: unable to ; convert x/2^k to shift ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; (/ CL-BASE64::PADDING-BITS 3) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL 0 24)), not a FLOAT. ; ; note: unable to ; convert x/2^k to shift ; due to type uncertainty: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL 0 24)), not a INTEGER. ; (INTEGER-LENGTH CL-BASE64::INPUT) ; ; note: forced to do full call ; unable to do inline positive fixnum integer-length (cost 24) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 62). ; unable to do inline fixnum integer-length (cost 25) because: ; The first argument is a INTEGER, not a FIXNUM. ; etc. ; (MOD CL-BASE64::PADDED-BITS 24) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a (OR (RATIONAL #2=(-24) #3=(24)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a FIXNUM. ; The result is a (VALUES ; (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL #4=(0) #5=(48))) ; . #6=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (OR (RATIONAL #2# #3#) DOUBLE-FLOAT SINGLE-FLOAT), not a FIXNUM. ; The result is a (VALUES (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL #4# #5#)) ; . #6#), not a (VALUES FIXNUM &REST T). ; etc. ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a (RATIONAL #2=(-24) #3=(48)), not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a (RATIONAL #2# #3#), not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a (RATIONAL 0 #2=(48)), not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a (RATIONAL 0 #2#), not a FIXNUM. ; etc. ; (- 24 CL-BASE64::REMAINDER-PADDING) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a (OR (RATIONAL 0 #1=(24)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a FIXNUM. ; The result is a (VALUES ; (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL #2=(0) 24)) ; . #3=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The second argument is a (OR (RATIONAL 0 #1#) DOUBLE-FLOAT SINGLE-FLOAT), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL #2# 24)) ; . #3#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; (+ CL-BASE64::PADDED-BITS CL-BASE64::PADDING-BITS) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline float arithmetic (cost 2) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL 0 24)), not a DOUBLE-FLOAT. ; The result is a (VALUES REAL . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT &REST ; T). ; unable to do #1# (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL 0 24)), not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; (* CL-BASE64::COLUMNS (TRUNCATE CL-BASE64::PADDED-LENGTH CL-BASE64::COLUMNS)) ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653957237540927630737409) ; . #1=(&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 ; 21267647932558653957237540927630737409) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; (- CL-BASE64::PADDED-LENGTH ; (* CL-BASE64::COLUMNS ; (TRUNCATE CL-BASE64::PADDED-LENGTH CL-BASE64::COLUMNS))) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653957237540927630737409), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125313 ; 21267647932558653966460912964485513215) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The second argument is a (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653957237540927630737409), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125313 ; 21267647932558653966460912964485513215) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; (ASH CL-BASE64::INPUT (/ CL-BASE64::PADDING-BITS 3)) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 3) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (OR (RATIONAL 0 8) DOUBLE-FLOAT SINGLE-FLOAT), not a (UNSIGNED-BYTE ; 62). ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 3) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (OR (RATIONAL 0 8) DOUBLE-FLOAT SINGLE-FLOAT), not a (UNSIGNED-BYTE ; 62). ; The result is a (VALUES INTEGER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (ASH CL-BASE64::INT -6) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 3) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #2#), not a (VALUES (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; processing (DEFUN INTEGER-TO-BASE64-STREAM ...) ; file: /usr/share/common-lisp/source/cl-base64/encode.lisp ; in: DEFUN INTEGER-TO-BASE64-STREAM ; (MOD CL-BASE64::PADDED-BITS 24) ; ; 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). ; (ZEROP CL-BASE64::REMAINDER-PADDING) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL 0 (24)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (MOD CL-BASE64::PADDED-BITS 24) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL (-24) (24)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a (OR (RATIONAL (-24) (24)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR (RATIONAL (-24) (24)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (- 24 CL-BASE64::REMAINDER-PADDING) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The second argument is a (OR (RATIONAL 0 (24)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a FLOAT. ; (/ CL-BASE64::PADDING-BITS 6) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL 0 24)), not a FLOAT. ; ; note: unable to ; convert x/2^k to shift ; due to type uncertainty: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL 0 24)), not a INTEGER. ; (+ CL-BASE64::PADDED-BITS CL-BASE64::PADDING-BITS) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a RATIONAL. ; The second argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL 0 24)), not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL 0 24)), not a RATIONAL. ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL 0 24)), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL 0 24)), not a SINGLE-FLOAT. ; (/ (+ CL-BASE64::PADDED-BITS CL-BASE64::PADDING-BITS) 6) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; note: unable to ; convert x/2^k to shift ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; (- CL-BASE64::STRLEN CL-BASE64::PADDING-CHARS) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The second argument is a (OR (RATIONAL 0 4) DOUBLE-FLOAT ; SINGLE-FLOAT), not a FLOAT. ; (1- CL-BASE64::NONPAD-CHARS) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL -4611686018427387908 ; 4611686018427387903)), not a FLOAT. ; (/ CL-BASE64::PADDING-BITS 3) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL 0 24)), not a FLOAT. ; ; note: unable to ; convert x/2^k to shift ; due to type uncertainty: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL 0 24)), not a INTEGER. ; (= CL-BASE64::STRPOS CL-BASE64::NONPAD-CHARS) ; ; note: unable to open code because: The operands might not be the same type. ; (INTEGER-LENGTH CL-BASE64::INPUT) ; ; note: forced to do full call ; unable to do inline positive fixnum integer-length (cost 24) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 62). ; unable to do inline fixnum integer-length (cost 25) because: ; The first argument is a INTEGER, not a FIXNUM. ; etc. ; (MOD CL-BASE64::PADDED-BITS 24) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a (OR (RATIONAL #2=(-24) #3=(24)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a FIXNUM. ; The result is a (VALUES ; (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL #4=(0) #5=(48))) ; . #6=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (OR (RATIONAL #2# #3#) DOUBLE-FLOAT SINGLE-FLOAT), not a FIXNUM. ; The result is a (VALUES (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL #4# #5#)) ; . #6#), not a (VALUES FIXNUM &REST T). ; etc. ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a (RATIONAL #2=(-24) #3=(48)), not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a (RATIONAL #2# #3#), not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a (RATIONAL 0 #2=(48)), not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a (RATIONAL 0 #2#), not a FIXNUM. ; etc. ; (- 24 CL-BASE64::REMAINDER-PADDING) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a (OR (RATIONAL 0 #1=(24)) DOUBLE-FLOAT ; SINGLE-FLOAT), not a FIXNUM. ; The result is a (VALUES ; (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL #2=(0) 24)) ; . #3=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The second argument is a (OR (RATIONAL 0 #1#) DOUBLE-FLOAT SINGLE-FLOAT), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL #2# 24)) ; . #3#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; (+ CL-BASE64::PADDED-BITS CL-BASE64::PADDING-BITS) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline float arithmetic (cost 2) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL 0 24)), not a DOUBLE-FLOAT. ; The result is a (VALUES REAL . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT &REST ; T). ; unable to do #1# (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL 0 24)), not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; (- CL-BASE64::STRLEN CL-BASE64::PADDING-CHARS) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a (OR (RATIONAL 0 4) DOUBLE-FLOAT SINGLE-FLOAT), not a FIXNUM. ; The result is a (VALUES ; (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL -4611686018427387908 4611686018427387903)) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The second argument is a (OR (RATIONAL 0 4) DOUBLE-FLOAT SINGLE-FLOAT), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL -4611686018427387908 4611686018427387903)) ; . #1#), not a (VALUES (SIGNED-BYTE 64) &REST T). ; etc. ; (1- CL-BASE64::NONPAD-CHARS) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL -4611686018427387908 ; 4611686018427387903)), not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL -4611686018427387909 4611686018427387902) ; DOUBLE-FLOAT SINGLE-FLOAT) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT ; (RATIONAL -4611686018427387908 ; 4611686018427387903)), not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL -4611686018427387909 4611686018427387902) ; DOUBLE-FLOAT SINGLE-FLOAT) ; . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (ASH CL-BASE64::INPUT (/ CL-BASE64::PADDING-BITS 3)) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 3) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (OR (RATIONAL 0 8) DOUBLE-FLOAT SINGLE-FLOAT), not a (UNSIGNED-BYTE ; 62). ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 3) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (OR (RATIONAL 0 8) DOUBLE-FLOAT SINGLE-FLOAT), not a (UNSIGNED-BYTE ; 62). ; The result is a (VALUES INTEGER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (ASH CL-BASE64::INT -6) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 3) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #2#), not a (VALUES (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-base64/encode-tmp1MDGH4SW.fasl ; compilation finished in 0:00:01.603 ; compiling file "/usr/share/common-lisp/source/cl-base64/decode.lisp" (written 30 SEP 2020 06:06:36 AM): ; processing (IN-PACKAGE #:CL-BASE64) ; processing (DEFINE-CONDITION BASE64-ERROR ...) ; processing (DEFINE-CONDITION BAD-BASE64-CHARACTER ...) ; processing (DEFINE-CONDITION INCOMPLETE-BASE64-DATA ...) ; processing (DEFTYPE ARRAY-INDEX ...) ; processing (DEFTYPE ARRAY-LENGTH ...) ; processing (DEFTYPE CHARACTER-CODE ...) ; processing (DEFMACRO ETYPECASE/UNROLL ...) ; processing (DEFMACRO LET/TYPED ...) ; processing (DEFMACRO DEFINE-BASE64-DECODER ...) ; processing (DEFINE-BASE64-DECODER :STRING ...) ; file: /usr/share/common-lisp/source/cl-base64/decode.lisp ; in: DEFINE-BASE64-DECODER :STRING ; (CL-BASE64::DEFINE-BASE64-DECODER :STRING :USB8-ARRAY) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK CL-BASE64::LET/TYPED LET FLET LET CL-BASE64::ETYPECASE/UNROLL ; --> ETYPECASE LET COND IF IF IF PROGN CL-BASE64::LET/TYPED LET LOOP BLOCK ; --> TAGBODY PROGN IF SETQ THE CHAR-CODE ; ==> ; (AREF CL-BASE64::INPUT CL-BASE64::IPOS) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; processing (DEFINE-BASE64-DECODER :STRING ...) ; file: /usr/share/common-lisp/source/cl-base64/decode.lisp ; in: DEFINE-BASE64-DECODER :STRING ; (CL-BASE64::DEFINE-BASE64-DECODER :STRING :STRING) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK CL-BASE64::LET/TYPED LET FLET LET CL-BASE64::ETYPECASE/UNROLL ; --> ETYPECASE LET COND IF IF IF PROGN CL-BASE64::LET/TYPED LET LOOP BLOCK ; --> TAGBODY PROGN IF SETQ THE CHAR-CODE ; ==> ; (AREF CL-BASE64::INPUT CL-BASE64::IPOS) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; processing (DEFINE-BASE64-DECODER :STRING ...) ; file: /usr/share/common-lisp/source/cl-base64/decode.lisp ; in: DEFINE-BASE64-DECODER :STRING ; (CL-BASE64::DEFINE-BASE64-DECODER :STRING :INTEGER) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK CL-BASE64::LET/TYPED LET FLET LET CL-BASE64::ETYPECASE/UNROLL ; --> ETYPECASE LET COND IF IF IF PROGN CL-BASE64::LET/TYPED LET LOOP BLOCK ; --> TAGBODY PROGN IF SETQ THE CHAR-CODE ; ==> ; (AREF CL-BASE64::INPUT CL-BASE64::IPOS) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK CL-BASE64::LET/TYPED LET FLET LET CL-BASE64::ETYPECASE/UNROLL ; --> ETYPECASE LET COND IF IF PROGN CL-BASE64::LET/TYPED LET LOOP BLOCK ; --> TAGBODY PROGN COND IF IF IF IF THE PROGN WHEN IF PROGN LET SETQ THE ; --> LOGIOR ; ==> ; (ASH CL-BASE64::RESULT 8) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #2=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do #1# (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #2#), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK CL-BASE64::LET/TYPED LET FLET LET CL-BASE64::ETYPECASE/UNROLL ; --> ETYPECASE LET COND IF IF PROGN CL-BASE64::LET/TYPED LET LOOP BLOCK ; --> TAGBODY PROGN COND IF IF IF IF THE PROGN WHEN IF PROGN LET SETQ THE ; ==> ; (LOGIOR (ASH CL-BASE64::RESULT 8) BYTE) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK CL-BASE64::LET/TYPED LET FLET LET CL-BASE64::ETYPECASE/UNROLL ; --> ETYPECASE LET COND IF IF IF PROGN CL-BASE64::LET/TYPED LET LOOP BLOCK ; --> TAGBODY PROGN COND IF IF IF IF THE PROGN WHEN IF PROGN LET SETQ THE ; --> LOGIOR ; ==> ; (ASH CL-BASE64::RESULT 8) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #2=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do #1# (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #2#), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK CL-BASE64::LET/TYPED LET FLET LET CL-BASE64::ETYPECASE/UNROLL ; --> ETYPECASE LET COND IF IF IF PROGN CL-BASE64::LET/TYPED LET LOOP BLOCK ; --> TAGBODY PROGN COND IF IF IF IF THE PROGN WHEN IF PROGN LET SETQ THE ; ==> ; (LOGIOR (ASH CL-BASE64::RESULT 8) BYTE) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK CL-BASE64::LET/TYPED LET FLET LET CL-BASE64::ETYPECASE/UNROLL ; --> ETYPECASE LET COND IF PROGN CL-BASE64::LET/TYPED LET LOOP BLOCK TAGBODY ; --> PROGN COND IF IF IF IF THE PROGN WHEN IF PROGN LET SETQ THE LOGIOR ; ==> ; (ASH CL-BASE64::RESULT 8) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #2=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do #1# (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #2#), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK CL-BASE64::LET/TYPED LET FLET LET CL-BASE64::ETYPECASE/UNROLL ; --> ETYPECASE LET COND IF PROGN CL-BASE64::LET/TYPED LET LOOP BLOCK TAGBODY ; --> PROGN COND IF IF IF IF THE PROGN WHEN IF PROGN LET SETQ THE ; ==> ; (LOGIOR (ASH CL-BASE64::RESULT 8) BYTE) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; processing (DEFINE-BASE64-DECODER :STRING ...) ; file: /usr/share/common-lisp/source/cl-base64/decode.lisp ; in: DEFINE-BASE64-DECODER :STRING ; (CL-BASE64::DEFINE-BASE64-DECODER :STRING :STREAM) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK CL-BASE64::LET/TYPED LET FLET LET CL-BASE64::ETYPECASE/UNROLL ; --> ETYPECASE LET COND IF IF IF PROGN CL-BASE64::LET/TYPED LET LOOP BLOCK ; --> TAGBODY PROGN IF SETQ THE CHAR-CODE ; ==> ; (AREF CL-BASE64::INPUT CL-BASE64::IPOS) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; processing (DEFINE-BASE64-DECODER :STREAM ...) ; processing (DEFINE-BASE64-DECODER :STREAM ...) ; processing (DEFINE-BASE64-DECODER :STREAM ...) ; file: /usr/share/common-lisp/source/cl-base64/decode.lisp ; in: DEFINE-BASE64-DECODER :STREAM ; (CL-BASE64::DEFINE-BASE64-DECODER :STREAM :INTEGER) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK CL-BASE64::LET/TYPED LET FLET CL-BASE64::LET/TYPED LET LOOP BLOCK ; --> TAGBODY PROGN COND IF IF IF IF THE PROGN WHEN IF PROGN LET SETQ THE ; --> LOGIOR ; ==> ; (ASH CL-BASE64::RESULT 8) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #2=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do #1# (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #2#), not a (VALUES ; (UNSIGNED-BYTE 64) ; &REST T). ; etc. ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK CL-BASE64::LET/TYPED LET FLET CL-BASE64::LET/TYPED LET LOOP BLOCK ; --> TAGBODY PROGN COND IF IF IF IF THE PROGN WHEN IF PROGN LET SETQ THE ; ==> ; (LOGIOR (ASH CL-BASE64::RESULT 8) BYTE) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES ; (SIGNED-BYTE 64) ; &REST T). ; etc. ; processing (DEFINE-BASE64-DECODER :STREAM ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-base64/decode-tmpV8WTFLZM.fasl ; compilation finished in 0:00:02.455 ; compiling file "/usr/share/common-lisp/source/chunga/packages.lisp" (written 02 APR 2020 01:21:00 PM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE :CHUNGA ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/chunga/packages-tmpX2YW1LTJ.fasl ; compilation finished in 0:00:00.011 ; compiling file "/usr/share/common-lisp/source/chunga/specials.lisp" (written 02 APR 2020 01:21:00 PM): ; processing (IN-PACKAGE :CHUNGA) ; processing (DEFMACRO DEFINE-CONSTANT ...) ; processing (DEFCONSTANT +OUTPUT-BUFFER-SIZE+ ...) ; processing (DEFINE-CONSTANT +CRLF+ ...) ; processing (DEFINE-CONSTANT +HEX-DIGITS+ ...) ; processing (DEFVAR *CURRENT-ERROR-MESSAGE* ...) ; processing (DEFVAR *CURRENT-ERROR-FUNCTION* ...) ; processing (DEFVAR *ACCEPT-BOGUS-EOLS* ...) ; processing (DEFVAR *TREAT-SEMICOLON-AS-CONTINUATION* ...) ; processing (DEFVAR *CHAR-BUFFER* ...) ; processing (PUSHNEW :CHUNGA ...) ; processing (DEFVAR *HYPERDOC-BASE-URI* ...) ; processing (LET (#) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/chunga/specials-tmpLB88W1T5.fasl ; compilation finished in 0:00:00.139 ; compiling file "/usr/share/common-lisp/source/chunga/util.lisp" (written 02 APR 2020 01:21:00 PM): ; processing (IN-PACKAGE :CHUNGA) ; processing (DEFMACRO WHEN-LET ...) ; processing (DEFUN ENDS-WITH-P ...) ; processing (DEFUN MAKE-KEYWORD ...) ; processing (DEFUN READ-CHAR* ...) ; processing (DEFUN UNREAD-CHAR* ...) ; processing (DEFUN PEEK-CHAR* ...) ; processing (DEFMACRO WITH-CHARACTER-STREAM-SEMANTICS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/chunga/util-tmp3F80YMF6.fasl ; compilation finished in 0:00:00.191 ; compiling file "/usr/share/common-lisp/source/chunga/known-words.lisp" (written 02 APR 2020 01:21:00 PM): ; processing (IN-PACKAGE :CHUNGA) ; processing (DEFINE-CONSTANT +KNOWN-WORDS+ ...) ; processing (DEFINE-CONSTANT +STRING-TO-KEYWORD-HASH+ ...) ; processing (DEFINE-CONSTANT +KEYWORD-TO-STRING-HASH+ ...) ; processing (DEFUN AS-KEYWORD ...) ; processing (DEFUN AS-CAPITALIZED-STRING ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/chunga/known-words-tmpJJORT7HU.fasl ; compilation finished in 0:00:00.123 ; compiling file "/usr/share/common-lisp/source/chunga/conditions.lisp" (written 02 APR 2020 01:21:00 PM): ; processing (IN-PACKAGE :CHUNGA) ; processing (DEFINE-CONDITION CHUNGA-CONDITION ...) ; processing (DEFINE-CONDITION CHUNGA-ERROR ...) ; processing (DEFINE-CONDITION CHUNGA-SIMPLE-ERROR ...) ; processing (DEFINE-CONDITION PARAMETER-ERROR ...) ; processing (DEFINE-CONDITION SYNTAX-ERROR ...) ; processing (DEFINE-CONDITION CHUNGA-WARNING ...) ; processing (DEFINE-CONDITION CHUNGA-SIMPLE-WARNING ...) ; processing (DEFINE-CONDITION INPUT-CHUNKING-UNEXPECTED-END-OF-FILE ...) ; processing (DEFINE-CONDITION INPUT-CHUNKING-BODY-CORRUPTED ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/chunga/conditions-tmp5DBB8JTB.fasl ; compilation finished in 0:00:00.067 ; compiling file "/usr/share/common-lisp/source/chunga/read.lisp" (written 02 APR 2020 01:21:00 PM): ; processing (IN-PACKAGE :CHUNGA) ; processing (DEFUN SIGNAL-UNEXPECTED-CHARS ...) ; processing (DEFUN CHARP ...) ; processing (DEFUN CONTROLP ...) ; processing (DEFUN SEPARATORP ...) ; processing (DEFUN WHITESPACEP ...) ; processing (DEFUN TOKEN-CHAR-P ...) ; processing (DEFUN ASSERT-CHAR ...) ; processing (DEFUN ASSERT-CRLF ...) ; processing (DEFUN READ-LINE* ...) ; processing (DEFUN TRIM-WHITESPACE ...) ; file: /usr/share/common-lisp/source/chunga/read.lisp ; in: DEFUN TRIM-WHITESPACE ; (CHAR STRING CHUNGA::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; processing (DEFUN READ-HTTP-HEADERS ...) ; processing (DEFUN SKIP-WHITESPACE ...) ; processing (DEFUN READ-TOKEN ...) ; processing (DEFUN READ-QUOTED-STRING ...) ; processing (DEFUN READ-COOKIE-VALUE ...) ; processing (DEFUN READ-NAME-VALUE-PAIR ...) ; processing (DEFUN READ-NAME-VALUE-PAIRS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/chunga/read-tmpZSBL0HHQ.fasl ; compilation finished in 0:00:00.715 ; compiling file "/usr/share/common-lisp/source/chunga/streams.lisp" (written 02 APR 2020 01:21:00 PM): ; processing (IN-PACKAGE :CHUNGA) ; processing (DEFCLASS CHUNKED-STREAM ...) ; processing (DEFCLASS CHUNKED-INPUT-STREAM ...) ; processing (DEFCLASS CHUNKED-OUTPUT-STREAM ...) ; processing (DEFCLASS CHUNKED-IO-STREAM ...) ; processing (DEFMETHOD STREAM-ELEMENT-TYPE ...) ; processing (DEFMETHOD OPEN-STREAM-P ...) ; processing (DEFMETHOD CLOSE ...) ; processing (DEFUN MAKE-CHUNKED-STREAM ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/chunga/streams-tmpV1RXKPB.fasl ; compilation finished in 0:00:00.147 ; compiling file "/usr/share/common-lisp/source/chunga/input.lisp" (written 02 APR 2020 01:21:00 PM): ; processing (IN-PACKAGE :CHUNGA) ; processing (DEFMETHOD CHUNKED-INPUT-STREAM-EXTENSIONS ...) ; processing (DEFMETHOD CHUNKED-INPUT-STREAM-TRAILERS ...) ; processing (DEFMETHOD CHUNKED-STREAM-INPUT-CHUNKING-P ...) ; processing (DEFMETHOD (SETF CHUNKED-STREAM-INPUT-CHUNKING-P) ...) ; processing (DEFMETHOD STREAM-CLEAR-INPUT ...) ; processing (DEFMETHOD CHUNKED-INPUT-AVAILABLE-P ...) ; processing (DEFMETHOD STREAM-LISTEN ...) ; processing (DEFMETHOD FILL-BUFFER ...) ; processing (DEFMETHOD STREAM-READ-BYTE ...) ; processing (DEFMETHOD STREAM-READ-SEQUENCE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/chunga/input-tmp3SZ0XWQD.fasl ; compilation finished in 0:00:00.507 ; compiling file "/usr/share/common-lisp/source/chunga/output.lisp" (written 02 APR 2020 01:21:00 PM): ; processing (IN-PACKAGE :CHUNGA) ; processing (DEFMETHOD CHUNKED-STREAM-OUTPUT-CHUNKING-P ...) ; processing (DEFMETHOD WRITE-CHUNK ...) ; processing (DEFMETHOD FLUSH-BUFFER ...) ; processing (DEFMETHOD (SETF CHUNKED-STREAM-OUTPUT-CHUNKING-P) ...) ; processing (DEFMETHOD STREAM-CLEAR-OUTPUT ...) ; processing (DEFMETHOD STREAM-FINISH-OUTPUT ...) ; processing (DEFMETHOD STREAM-FORCE-OUTPUT ...) ; processing (DEFMETHOD STREAM-WRITE-BYTE ...) ; processing (DEFMETHOD STREAM-WRITE-SEQUENCE ...) ; processing (DEFMETHOD CLOSE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/chunga/output-tmp9YHAVVS9.fasl ; compilation finished in 0:00:01.035 ; compiling file "/usr/share/common-lisp/source/drakma/packages.lisp" (written 23 OCT 2019 08:11:43 AM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE :DRAKMA ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/drakma/packages-tmp92WUBED1.fasl ; compilation finished in 0:00:00.019 ; compiling file "/usr/share/common-lisp/source/drakma/specials.lisp" (written 23 OCT 2019 08:11:43 AM): ; processing (IN-PACKAGE :DRAKMA) ; processing (DEFPARAMETER *DRAKMA-VERSION* ...) ; processing (DEFMACRO DEFINE-CONSTANT ...) ; processing (DEFINE-CONSTANT +LATIN-1+ ...) ; processing (DEFINE-CONSTANT +REDIRECT-CODES+ ...) ; processing (DEFINE-CONSTANT +REDIRECT-TO-GET-CODES+ ...) ; processing (DEFINE-CONSTANT +KNOWN-METHODS+ ...) ; processing (DEFINE-CONSTANT +REDIRECT-TO-GET-METHODS+ ...) ; processing (DEFCONSTANT +BUFFER-SIZE+ ...) ; processing (DEFVAR *DRAKMA-DEFAULT-EXTERNAL-FORMAT* ...) ; processing (DEFVAR *HEADER-STREAM* ...) ; processing (DEFVAR *ALLOW-DOTLESS-COOKIE-DOMAINS-P* ...) ; processing (DEFVAR *IGNORE-UNPARSEABLE-COOKIE-DATES-P* ...) ; processing (DEFVAR *REMOVE-DUPLICATE-COOKIES-P* ...) ; processing (DEFVAR *TEXT-CONTENT-TYPES* ...) ; processing (DEFVAR *BODY-FORMAT-FUNCTION* ...) ; processing (DEFVAR *TIME-ZONE-MAP* ...) ; processing (DEFVAR *DEFAULT-HTTP-PROXY* ...) ; processing (DEFVAR *NO-PROXY-DOMAINS* ...) ; processing (DEFVAR *HYPERDOC-BASE-URI* ...) ; processing (LET (#) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/drakma/specials-tmpAHBBVXUF.fasl ; compilation finished in 0:00:00.187 ; compiling file "/usr/share/common-lisp/source/drakma/conditions.lisp" (written 23 OCT 2019 08:11:43 AM): ; processing (IN-PACKAGE :DRAKMA) ; processing (DEFINE-CONDITION DRAKMA-CONDITION ...) ; processing (DEFINE-CONDITION DRAKMA-ERROR ...) ; processing (DEFINE-CONDITION DRAKMA-SIMPLE-ERROR ...) ; processing (DEFINE-CONDITION DRAKMA-WARNING ...) ; processing (DEFINE-CONDITION DRAKMA-SIMPLE-WARNING ...) ; processing (DEFUN DRAKMA-WARN ...) ; processing (DEFINE-CONDITION PARAMETER-ERROR ...) ; processing (DEFUN PARAMETER-ERROR ...) ; processing (DEFINE-CONDITION SYNTAX-ERROR ...) ; processing (DEFUN SYNTAX-ERROR ...) ; processing (DEFINE-CONDITION COOKIE-ERROR ...) ; processing (DEFUN COOKIE-ERROR ...) ; processing (DEFINE-CONDITION COOKIE-DATE-PARSE-ERROR ...) ; processing (DEFUN COOKIE-DATE-PARSE-ERROR ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/drakma/conditions-tmpFIDDIIG7.fasl ; compilation finished in 0:00:00.099 ; compiling file "/usr/share/common-lisp/source/drakma/util.lisp" (written 23 OCT 2019 08:11:43 AM): ; processing (IN-PACKAGE :DRAKMA) ; processing (DEFMACRO WHEN-LET ...) ; processing (DEFMACRO WITH-UNIQUE-NAMES ...) ; processing (DEFUN ENDS-WITH-P ...) ; processing (DEFUN STARTS-WITH-P ...) ; processing (DEFUN URL-ENCODE ...) ; processing (DEFUN ALIST-TO-URL-ENCODED-STRING ...) ; processing (DEFUN DEFAULT-PORT ...) ; processing (DEFUN NON-DEFAULT-PORT ...) ; processing (DEFUN USER-AGENT-STRING ...) ; file: /usr/share/common-lisp/source/drakma/util.lisp ; in: DEFUN USER-AGENT-STRING ; (OR (LISP-IMPLEMENTATION-TYPE) "Common Lisp") ; --> LET IF ; ==> ; "Common Lisp" ; ; note: deleting unreachable code ; (OR (LISP-IMPLEMENTATION-VERSION) "") ; --> LET IF ; ==> ; "" ; ; note: deleting unreachable code ; processing (DEFUN HEADER-VALUE ...) ; processing (DEFUN PARAMETER-PRESENT-P ...) ; processing (DEFUN PARAMETER-VALUE ...) ; processing (DEFUN MAKE-RANDOM-STRING ...) ; processing (DEFUN SAFE-PARSE-INTEGER ...) ; processing (DEFUN INTERPRET-AS-MONTH ...) ; processing (DEFUN INTERPRET-AS-TIME-ZONE ...) ; file: /usr/share/common-lisp/source/drakma/util.lisp ; in: DEFUN INTERPRET-AS-TIME-ZONE ; (CL-PPCRE:REGISTER-GROUPS-BIND (DRAKMA::SIGN DRAKMA::HOURS DRAKMA::MINUTES) ; ("(?:GMT|)\\s*([+-]?)(\\d\\d):?(\\d\\d)" STRING) ; (* ; (IF (EQUAL DRAKMA::SIGN "-") ; 1 ; -1) ; (+ (PARSE-INTEGER DRAKMA::HOURS) (/ (PARSE-INTEGER DRAKMA::MINUTES) 60)))) ; --> LET MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION WHEN IF LET* LET IF ; ==> ; NIL ; ; caught STYLE-WARNING: ; This is not a STRING: ; NIL ; See also: ; The SBCL Manual, Node "Handling of Types" ; ; caught STYLE-WARNING: ; This is not a STRING: ; NIL ; See also: ; The SBCL Manual, Node "Handling of Types" ; processing (DEFUN SET-REFERER ...) ; processing (DEFUN TEXT-CONTENT-TYPE-P ...) ; processing (DEFMACRO WITH-SEQUENCE-FROM-STRING ...) ; processing (DEFUN SPLIT-SET-COOKIE-STRING ...) ; processing (DEFUN MAKE-SSL-STREAM ...) ; processing (DEFUN DISSECT-QUERY ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/drakma/util-tmpB1G5I0B3.fasl ; compilation finished in 0:00:01.191 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/drakma/read.lisp" (written 23 OCT 2019 08:11:43 AM): ; processing (IN-PACKAGE :DRAKMA) ; processing (DEFUN READ-STATUS-LINE ...) ; processing (DEFUN GET-CONTENT-TYPE ...) ; processing (DEFUN READ-TOKEN-AND-PARAMETERS ...) ; processing (DEFUN SKIP-MORE-COMMAS ...) ; processing (DEFUN READ-TOKENS-AND-PARAMETERS ...) ; processing (DEFUN SPLIT-TOKENS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/drakma/read-tmp6W3P1H2J.fasl ; compilation finished in 0:00:00.231 ; compiling file "/usr/share/common-lisp/source/drakma/cookies.lisp" (written 23 OCT 2019 08:11:43 AM): ; processing (IN-PACKAGE :DRAKMA) ; processing (DEFCLASS COOKIE ...) ; processing (DEFUN RENDER-COOKIE-DATE ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN NORMALIZE-COOKIE-DOMAIN ...) ; processing (DEFUN VALID-COOKIE-DOMAIN-P ...) ; processing (DEFUN COOKIE-DOMAIN-MATCHES ...) ; processing (DEFUN SEND-COOKIE-P ...) ; processing (DEFUN CHECK-COOKIE ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD (SETF COOKIE-NAME) ...) ; processing (DEFMETHOD (SETF COOKIE-VALUE) ...) ; processing (DEFMETHOD (SETF COOKIE-DOMAIN) ...) ; processing (DEFMETHOD (SETF COOKIE-PATH) ...) ; processing (DEFMETHOD (SETF COOKIE-EXPIRES) ...) ; processing (DEFUN COOKIE= ...) ; processing (DEFCLASS COOKIE-JAR ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN PARSE-COOKIE-DATE ...) ; processing (DEFUN PARSE-SET-COOKIE ...) ; processing (DEFUN GET-COOKIES ...) ; processing (DEFUN UPDATE-COOKIES ...) ; processing (DEFUN DELETE-OLD-COOKIES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/drakma/cookies-tmpGOHEOA1Y.fasl ; compilation finished in 0:00:00.579 ; compiling file "/usr/share/common-lisp/source/drakma/encoding.lisp" (written 23 OCT 2019 08:11:43 AM): ; processing (IN-PACKAGE :DRAKMA) ; processing (DEFGENERIC DECODE-STREAM ...) ; processing (DEFMETHOD DECODE-STREAM ...) ; processing (DEFMETHOD DECODE-STREAM ...) ; processing (DEFMETHOD DECODE-STREAM ...) ; processing (DEFMETHOD DECODE-STREAM ...) ; processing (DEFMETHOD DECODE-STREAM ...) ; processing (DEFUN DECODE-RESPONSE-STREAM ...) ; processing (DEFUN DECODE-FLEXI-STREAM ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/drakma/encoding-tmpT2G5POAL.fasl ; compilation finished in 0:00:00.155 ; compiling file "/usr/share/common-lisp/source/drakma/request.lisp" (written 23 OCT 2019 08:11:43 AM): ; processing (IN-PACKAGE :DRAKMA) ; processing (DEFUN DETERMINE-BODY-FORMAT ...) ; processing (DEFUN SEND-CONTENT ...) ; processing (DEFUN MAKE-FORM-DATA-FUNCTION ...) ; processing (DEFUN %READ-BODY ...) ; processing (DEFUN READ-BODY ...) ; processing (DEFUN TRIVIAL-URI-PATH ...) ; processing (DEFUN HTTP-REQUEST ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/drakma/request-tmpT5NQ1VS1.fasl ; compilation finished in 0:00:01.771 ; compiling file "/usr/share/common-lisp/source/local-time/src/package.lisp" (written 26 FEB 2018 03:02:47 AM): ; processing (DEFPACKAGE #:LOCAL-TIME ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/local-time/src/package-tmpZVTPRQAR.fasl ; compilation finished in 0:00:00.007 ; compiling file "/usr/share/common-lisp/source/local-time/src/local-time.lisp" (written 05 JAN 2021 12:18:15 AM): ; processing (IN-PACKAGE #:LOCAL-TIME) ; processing (DEFCLASS TIMESTAMP ...) ; processing (DEFSTRUCT SUBZONE ...) ; processing (DEFSTRUCT TIMEZONE ...) ; processing (DEFTYPE TIMEZONE-OFFSET ...) ; processing (DEFUN %VALID-TIME-OF-DAY? ...) ; processing (DEFTYPE TIME-OF-DAY ...) ; processing (DEFUN %VALID-DATE? ...) ; processing (DEFTYPE DATE ...) ; processing (DEFINE-CONDITION INVALID-TIMEZONE-FILE ...) ; processing (DEFINE-CONDITION INVALID-TIME-SPECIFICATION ...) ; processing (DEFINE-CONDITION INVALID-TIMESTRING ...) ; processing (DEFMETHOD MAKE-LOAD-FORM ...) ; processing (DECLAIM (INLINE NOW ...) ...) ; processing (DEFVAR *DEFAULT-TIMEZONE*) ; processing (DEFPARAMETER *DEFAULT-TIMEZONE-REPOSITORY-PATH* ...) ; file: /usr/share/common-lisp/source/local-time/src/local-time.lisp ; in: DEFPARAMETER *DEFAULT-TIMEZONE-REPOSITORY-PATH* ; (OR #P"/usr/share/common-lisp/source/local-time/src/local-time.lisp" ; *LOAD-TRUENAME*) ; --> LET IF ; ==> ; *LOAD-TRUENAME* ; ; note: deleting unreachable code ; processing (DEFPARAMETER +MONTH-NAMES+ ...) ; processing (DEFPARAMETER +SHORT-MONTH-NAMES+ ...) ; processing (DEFPARAMETER +DAY-NAMES+ ...) ; processing (DEFPARAMETER +DAY-NAMES-AS-KEYWORDS+ ...) ; processing (DEFPARAMETER +SHORT-DAY-NAMES+ ...) ; processing (DEFPARAMETER +MINIMAL-DAY-NAMES+ ...) ; processing (DEFCONSTANT +MONTHS-PER-YEAR+ ...) ; processing (DEFCONSTANT +DAYS-PER-WEEK+ ...) ; processing (DEFCONSTANT +HOURS-PER-DAY+ ...) ; processing (DEFCONSTANT +MINUTES-PER-DAY+ ...) ; processing (DEFCONSTANT +MINUTES-PER-HOUR+ ...) ; processing (DEFCONSTANT +SECONDS-PER-DAY+ ...) ; processing (DEFCONSTANT +SECONDS-PER-HOUR+ ...) ; processing (DEFCONSTANT +SECONDS-PER-MINUTE+ ...) ; processing (DEFCONSTANT +USECS-PER-DAY+ ...) ; processing (DEFPARAMETER +ISO-8601-DATE-FORMAT+ ...) ; processing (DEFPARAMETER +ISO-8601-TIME-FORMAT+ ...) ; processing (DEFPARAMETER +ISO-8601-FORMAT+ ...) ; processing (DEFPARAMETER +RFC3339-FORMAT+ ...) ; processing (DEFPARAMETER +RFC3339-FORMAT/DATE-ONLY+ ...) ; processing (DEFPARAMETER +ASCTIME-FORMAT+ ...) ; processing (DEFPARAMETER +RFC-1123-FORMAT+ ...) ; processing (DEFPARAMETER +ISO-WEEK-DATE-FORMAT+ ...) ; processing (DEFPARAMETER +ROTATED-MONTH-DAYS-WITHOUT-LEAP-DAY+ ...) ; processing (DEFPARAMETER +ROTATED-MONTH-OFFSETS-WITHOUT-LEAP-DAY+ ...) ; processing (DEFPARAMETER +ASTRONOMICAL-JULIAN-DATE-OFFSET+ ...) ; processing (DEFPARAMETER +MODIFIED-JULIAN-DATE-OFFSET+ ...) ; processing (DEFUN %GUESS-OFFSET ...) ; processing (DEFUN %READ-BINARY-INTEGER ...) ; processing (DEFUN %STRING-FROM-UNSIGNED-BYTE-VECTOR ...) ; processing (DEFUN %FIND-FIRST-STD-OFFSET ...) ; processing (DEFUN %TZ-VERIFY-MAGIC-NUMBER ...) ; processing (DEFUN %TZ-READ-HEADER ...) ; processing (DEFUN %TZ-READ-TRANSITIONS ...) ; processing (DEFUN %TZ-READ-INDEXES ...) ; processing (DEFUN %TZ-READ-SUBZONE ...) ; processing (DEFUN LEAP-SECONDS-SEC ...) ; processing (DEFUN LEAP-SECONDS-ADJUSTMENT ...) ; processing (DEFUN %TZ-READ-LEAP-SECONDS ...) ; processing (DEFUN %TZ-READ-ABBREVS ...) ; processing (DEFUN %TZ-READ-INDICATORS ...) ; processing (DEFUN %TZ-MAKE-SUBZONES ...) ; processing (DEFUN %REALIZE-TIMEZONE ...) ; processing (DEFUN %MAKE-SIMPLE-TIMEZONE ...) ; processing (DEFUN PACKAGE-WITH-SYMBOL? ...) ; processing (DEFPARAMETER +UTC-ZONE+ ...) ; processing (DEFPARAMETER +GMT-ZONE+ ...) ; processing (DEFPARAMETER +NONE-ZONE+ ...) ; processing (DEFMACRO DEFINE-TIMEZONE ...) ; processing (LET (#) ...) ; processing (DEFPARAMETER *LOCATION-NAME->TIMEZONE* ...) ; processing (DEFPARAMETER *ABBREVIATED-SUBZONE-NAME->TIMEZONE-LIST* ...) ; processing (DEFUN FIND-TIMEZONE-BY-LOCATION-NAME ...) ; processing (DEFUN TIMEZONE= ...) ; processing (DEFUN REREAD-TIMEZONE-REPOSITORY ...) ; processing (DEFMACRO MAKE-TIMESTAMP ...) ; processing (DEFUN CLONE-TIMESTAMP ...) ; processing (DEFUN TRANSITION-POSITION ...) ; processing (DEFUN TIMESTAMP-SUBTIMEZONE ...) ; processing (DEFUN %ADJUST-TO-OFFSET ...) ; processing (DEFUN %ADJUST-TO-TIMEZONE ...) ; processing (DEFUN TIMESTAMP-MINIMIZE-PART ...) ; file: /usr/share/common-lisp/source/local-time/src/local-time.lisp ; in: DEFUN TIMESTAMP-MINIMIZE-PART ; (IF LOCAL-TIME::TIMEZONE ; NIL ; LOCAL-TIME::OFFSET) ; ==> ; LOCAL-TIME::OFFSET ; ; note: deleting unreachable code ; processing (DEFUN TIMESTAMP-MAXIMIZE-PART ...) ; file: /usr/share/common-lisp/source/local-time/src/local-time.lisp ; in: DEFUN TIMESTAMP-MAXIMIZE-PART ; (IF LOCAL-TIME::TIMEZONE ; NIL ; LOCAL-TIME::OFFSET) ; ==> ; LOCAL-TIME::OFFSET ; ; note: deleting unreachable code ; processing (DEFMACRO WITH-DECODED-TIMESTAMP ...) ; processing (DEFUN %NORMALIZE-MONTH-YEAR-PAIR ...) ; processing (DEFUN DAYS-IN-MONTH ...) ; processing (DEFUN %FIX-OVERFLOW-IN-DAYS ...) ; processing (DEFUN %LIST-LENGTH= ...) ; processing (DEFUN %EXPAND-ADJUST-TIMESTAMP-CHANGES ...) ; processing (DEFUN %EXPAND-ADJUST-TIMESTAMP ...) ; processing (DEFMACRO ADJUST-TIMESTAMP ...) ; processing (DEFMACRO ADJUST-TIMESTAMP! ...) ; processing (DEFUN %SET-TIMESTAMP-PART ...) ; processing (DEFUN %OFFSET-TIMESTAMP-PART ...) ; processing (DEFUN TIMESTAMP-WHOLE-YEAR-DIFFERENCE ...) ; processing (DEFUN TIMESTAMP-DIFFERENCE ...) ; processing (DEFUN TIMESTAMP+ ...) ; processing (DEFUN TIMESTAMP- ...) ; processing (DEFUN TIMESTAMP-DAY-OF-WEEK ...) ; processing (DEFUN VALID-TIMESTAMP-P ...) ; processing (DEFUN ENCODE-TIMESTAMP-INTO-VALUES ...) ; processing (DEFUN ENCODE-TIMESTAMP ...) ; processing (DEFUN UNIVERSAL-TO-TIMESTAMP ...) ; processing (DEFUN TIMESTAMP-TO-UNIVERSAL ...) ; processing (DEFUN UNIX-TO-TIMESTAMP ...) ; processing (DEFUN TIMESTAMP-VALUES-TO-UNIX ...) ; processing (DEFUN TIMESTAMP-TO-UNIX ...) ; processing (DEFUN %GET-CURRENT-TIME ...) ; processing (DEFVAR *CLOCK* ...) ; processing (DEFUN NOW ...) ; processing (DEFUN TODAY ...) ; processing (DEFGENERIC CLOCK-NOW ...) ; processing (DEFGENERIC CLOCK-TODAY ...) ; processing (DEFUN %LEAP-SECONDS-OFFSET ...) ; processing (DEFUN %ADJUST-SEC-FOR-LEAP-SECONDS ...) ; processing (DEFMETHOD CLOCK-NOW ...) ; processing (DEFMETHOD CLOCK-NOW ...) ; processing (DEFMETHOD CLOCK-TODAY ...) ; processing (DEFMACRO %DEFCOMPARATOR ...) ; processing (DEFUN %TIMESTAMP-COMPARE ...) ; processing (%DEFCOMPARATOR TIMESTAMP< ...) ; processing (%DEFCOMPARATOR TIMESTAMP<= ...) ; file: /usr/share/common-lisp/source/local-time/src/local-time.lisp ; in: %DEFCOMPARATOR TIMESTAMP<= ; (LOCAL-TIME::%DEFCOMPARATOR LOCAL-TIME:TIMESTAMP<= ; (NOT ; (NULL ; (MEMBER ; (LOCAL-TIME::%TIMESTAMP-COMPARE LOCAL-TIME::TIME-A LOCAL-TIME::TIME-B) ; '(< =))))) ; --> PROGN DEFINE-COMPILER-MACRO PROGN EVAL-WHEN ; ==> ; (SB-C::%DEFINE-COMPILER-MACRO 'LOCAL-TIME:TIMESTAMP<= ; (SB-INT:NAMED-LAMBDA (COMPILER-MACRO ; LOCAL-TIME:TIMESTAMP<=) ; (#:EXPR #:ENV) ; (DECLARE ; (SB-C::LAMBDA-LIST ; (&REST LOCAL-TIME::TIMES))) ; (DECLARE (IGNORE #:ENV)) ; (SB-INT:NAMED-DS-BIND (:MACRO ; LOCAL-TIME:TIMESTAMP<= ; . DEFINE-COMPILER-MACRO) ; (&REST LOCAL-TIME::TIMES) ; (SB-C::COMPILER-MACRO-ARGS #:EXPR) ; (DECLARE ; (SB-C::CONSTANT-VALUE LOCAL-TIME::TIMES)) ; (BLOCK LOCAL-TIME:TIMESTAMP<= ; (LET # ; `#))))) ; ; caught STYLE-WARNING: ; 1 call to LOCAL-TIME:TIMESTAMP<= was compiled before a compiler-macro was ; defined for it. A declaration of NOTINLINE at the call site will eliminate this ; warning, as will defining the compiler-macro before its first potential use. ; processing (%DEFCOMPARATOR TIMESTAMP> ...) ; processing (%DEFCOMPARATOR TIMESTAMP>= ...) ; processing (%DEFCOMPARATOR TIMESTAMP= ...) ; processing (DEFUN TIMESTAMP/= ...) ; processing (DEFUN CONTEST ...) ; processing (DEFUN TIMESTAMP-MINIMUM ...) ; processing (DEFUN TIMESTAMP-MAXIMUM ...) ; processing (DEFUN YEARS-TO-DAYS ...) ; processing (DEFUN DAYS-TO-YEARS ...) ; processing (DEFUN %TIMESTAMP-DECODE-DATE ...) ; processing (DEFUN %TIMESTAMP-DECODE-ISO-WEEK ...) ; processing (DEFUN %TIMESTAMP-DECODE-TIME ...) ; processing (DEFUN DECODE-TIMESTAMP ...) ; processing (DEFUN TIMESTAMP-YEAR ...) ; processing (DEFUN TIMESTAMP-CENTURY ...) ; processing (DEFUN TIMESTAMP-MILLENNIUM ...) ; processing (DEFUN TIMESTAMP-DECADE ...) ; processing (DEFUN TIMESTAMP-MONTH ...) ; processing (DEFUN TIMESTAMP-DAY ...) ; processing (DEFUN TIMESTAMP-HOUR ...) ; processing (DEFUN TIMESTAMP-MINUTE ...) ; processing (DEFUN TIMESTAMP-SECOND ...) ; processing (DEFUN TIMESTAMP-MICROSECOND ...) ; processing (DEFUN TIMESTAMP-MILLISECOND ...) ; processing (DEFUN SPLIT-TIMESTRING ...) ; processing (DEFUN %SPLIT-TIMESTRING ...) ; file: /usr/share/common-lisp/source/local-time/src/local-time.lisp ; in: DEFUN %SPLIT-TIMESTRING ; (- (CDAR LOCAL-TIME::PARTS) (CAAR LOCAL-TIME::PARTS)) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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. ; (= (- (CDAR LOCAL-TIME::PARTS) (CAAR LOCAL-TIME::PARTS)) 4) ; ; 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. ; (+ (CAAR LOCAL-TIME::PARTS) 2) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; (+ (CAAR LOCAL-TIME::PARTS) 4) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; (- (CDAR LOCAL-TIME::PARTS) (CAAR LOCAL-TIME::PARTS)) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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. ; (= (- (CDAR LOCAL-TIME::PARTS) (CAAR LOCAL-TIME::PARTS)) 2) ; ; 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. ; (+ (CAAR LOCAL-TIME::PARTS) 2) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; (- (CDAR LOCAL-TIME::PARTS) (CAAR LOCAL-TIME::PARTS)) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; (+ (CAAR LOCAL-TIME::PARTS) 2) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (+ (CAAR LOCAL-TIME::PARTS) 4) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (- (CDAR LOCAL-TIME::PARTS) (CAAR LOCAL-TIME::PARTS)) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; (+ (CAAR LOCAL-TIME::PARTS) 2) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (LOCAL-TIME::FULL-DATE (LOCAL-TIME::START-END) ; (LET ((LOCAL-TIME::PARTS (LOCAL-TIME::SPLIT # # LOCAL-TIME::DATE-SEPARATOR))) ; (LOCAL-TIME::PASSERT (LOCAL-TIME::%LIST-LENGTH= 3 LOCAL-TIME::PARTS)) ; (LOCAL-TIME::DATE-FULLYEAR (FIRST LOCAL-TIME::PARTS)) ; (LOCAL-TIME::DATE-MONTH (SECOND LOCAL-TIME::PARTS)) ; (LOCAL-TIME::DATE-MDAY (THIRD LOCAL-TIME::PARTS)))) ; ; note: Return type not fixed values, so can't use known return convention: ; * ; processing (DEFUN PARSE-RFC3339-TIMESTRING ...) ; processing (DEFUN PARSE-TIMESTRING ...) ; processing (DEFUN ORDINALIZE ...) ; processing (DEFUN %CONSTRUCT-TIMESTRING ...) ; file: /usr/share/common-lisp/source/local-time/src/local-time.lisp ; in: DEFUN %CONSTRUCT-TIMESTRING ; (DEFUN LOCAL-TIME::%CONSTRUCT-TIMESTRING ; (LOCAL-TIME:TIMESTAMP FORMAT LOCAL-TIME::TIMEZONE) ; "Constructs a string representing TIMESTAMP given the FORMAT of the string and the TIMEZONE. See the documentation of FORMAT-TIMESTRING for the structure of FORMAT." ; (DECLARE (TYPE LOCAL-TIME:TIMESTAMP LOCAL-TIME:TIMESTAMP) ; (OPTIMIZE (SPEED 3))) ; (MULTIPLE-VALUE-BIND ; (LOCAL-TIME::NSEC LOCAL-TIME::SEC LOCAL-TIME::MINUTE LOCAL-TIME::HOUR ; LOCAL-TIME::DAY LOCAL-TIME::MONTH LOCAL-TIME::YEAR LOCAL-TIME::WEEKDAY ; LOCAL-TIME::DAYLIGHT-P LOCAL-TIME::OFFSET LOCAL-TIME::ABBREV) ; (LOCAL-TIME:DECODE-TIMESTAMP LOCAL-TIME:TIMESTAMP :TIMEZONE ; LOCAL-TIME::TIMEZONE) ; (DECLARE (IGNORE LOCAL-TIME::DAYLIGHT-P)) ; (MULTIPLE-VALUE-BIND ; (LOCAL-TIME::ISO-YEAR LOCAL-TIME::ISO-WEEK LOCAL-TIME::ISO-WEEKDAY) ; (LOCAL-TIME::%TIMESTAMP-DECODE-ISO-WEEK LOCAL-TIME:TIMESTAMP) ; (LET (# #) ; (WITH-OUTPUT-TO-STRING # #))))) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; ==> ; (SB-C::%FUNCALL #'%CONSTRUCT-TIMESTRING #:G38 #:G39 #:G40) ; ; note: can't open-code test of unknown type TIMESTAMP ; (AREF LOCAL-TIME:+MONTH-NAMES+ LOCAL-TIME::MONTH) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (AREF LOCAL-TIME:+SHORT-MONTH-NAMES+ LOCAL-TIME::MONTH) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (AREF LOCAL-TIME:+DAY-NAMES+ LOCAL-TIME::WEEKDAY) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (AREF LOCAL-TIME:+SHORT-DAY-NAMES+ LOCAL-TIME::WEEKDAY) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (AREF LOCAL-TIME::+MINIMAL-DAY-NAMES+ LOCAL-TIME::WEEKDAY) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (MINUSP LOCAL-TIME::VAL) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (ABS LOCAL-TIME::VAL) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (DOUBLE-FLOAT * (0.0d0)) (SINGLE-FLOAT * (0.0)) ; (RATIONAL * (0))), not a RATIONAL. ; (MINUSP LOCAL-TIME::VAL) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a T, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a T, not a FIXNUM. ; etc. ; (ABS LOCAL-TIME::VAL) ; ; note: forced to do full call ; unable to do #1=inline float arithmetic (cost 1) because: ; The first argument is a (OR (DOUBLE-FLOAT * #2=(0.0d0)) ; (SINGLE-FLOAT * #3=(0.0)) (RATIONAL * #4=(0))), not a DOUBLE-FLOAT. ; The result is a (VALUES ; (OR (RATIONAL #5=(0)) (SINGLE-FLOAT #6=(-0.0)) ; (DOUBLE-FLOAT #7=(-0.0d0))) ; . #8=(&OPTIONAL)), not a (VALUES DOUBLE-FLOAT &REST T). ; unable to do #1# (cost 1) because: ; The first argument is a (OR (DOUBLE-FLOAT * #2#) (SINGLE-FLOAT * #3#) ; (RATIONAL * #4#)), not a SINGLE-FLOAT. ; The result is a (VALUES ; (OR (RATIONAL #5#) (SINGLE-FLOAT #6#) ; (DOUBLE-FLOAT #7#)) ; . #8#), not a (VALUES SINGLE-FLOAT &REST T). ; processing (DEFUN FORMAT-TIMESTRING ...) ; processing (DEFUN FORMAT-RFC1123-TIMESTRING ...) ; processing (DEFUN TO-RFC1123-TIMESTRING ...) ; processing (DEFUN FORMAT-RFC3339-TIMESTRING ...) ; processing (DEFUN TO-RFC3339-TIMESTRING ...) ; processing (DEFUN %READ-TIMESTRING ...) ; processing (DEFUN %READ-UNIVERSAL-TIME ...) ; processing (DEFUN ENABLE-READ-MACROS ...) ; processing (DEFVAR *DEBUG-TIMESTAMP* ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN ASTRONOMICAL-JULIAN-DATE ...) ; processing (DEFUN MODIFIED-JULIAN-DATE ...) ; processing (DECLAIM (NOTINLINE FORMAT-TIMESTRING)) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/local-time/src/local-time-tmpTWZBZGN3.fasl ; compilation finished in 0:00:06.639 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/command-line-arguments/pkgdcl.lisp" (written 17 NOV 2015 08:20:48 PM): ; processing (DEFPACKAGE :COMMAND-LINE-ARGUMENTS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/command-line-arguments/pkgdcl-tmpVLA2P6BV.fasl ; compilation finished in 0:00:00.008 ; compiling file "/usr/share/common-lisp/source/command-line-arguments/argv.lisp" (written 17 NOV 2015 08:20:48 PM): ; processing (IN-PACKAGE :COMMAND-LINE-ARGUMENTS) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN GET-COMMAND-LINE-ARGUMENTS ...) ; processing (DEFUN COMPUTE-AND-PROCESS-COMMAND-LINE-OPTIONS ...) ; processing (DEFUN INVOKE-COMMAND-LINE-HANDLER ...) ; processing (DEFUN HANDLE-COMMAND-LINE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/command-line-arguments/argv-tmpC1S9JRL9.fasl ; compilation finished in 0:00:00.103 ; compiling file "/usr/share/common-lisp/source/command-line-arguments/parse.lisp" (written 17 NOV 2015 08:20:48 PM): ; processing (IN-PACKAGE :COMMAND-LINE-ARGUMENTS) ; processing (DEFVAR *COMMAND-LINE-OPTIONS* ...) ; processing (DEFVAR *COMMAND-LINE-OPTION-SPECIFICATION* ...) ; processing (DEFUN MAKE-OPTION-ACTION ...) ; processing (DEFUN FINALIZE-LIST ...) ; processing (DEFUN ACTUAL-ACTION-FROM-SPEC ...) ; processing (DEFUN COMMAND-LINE-ACTION ...) ; processing (DEFUN PREPARE-COMMAND-LINE-OPTIONS-SPECIFICATION ...) ; processing (DEFUN MAKE-NEGATED-NAMES ...) ; processing (DEFUN COMMAND-LINE-OPTION-SPECIFICATION ...) ; processing (DEFUN SHORT-OPTION-P ...) ; processing (DEFUN NEGATED-SHORT-OPTION-P ...) ; processing (DEFUN LONG-OPTION-P ...) ; processing (DEFUN OPTION-END-P ...) ; processing (DEFUN OPTION-LIKE-P ...) ; processing (DEFUN OPTION-NAME ...) ; processing (DEFUN COERCE-OPTION-PARAMETER ...) ; processing (DEFUN GET-OPTION-PARAMETER ...) ; processing (DEFUN PROCESS-OPTION ...) ; processing (DEFUN PROCESS-SHORT-OPTION ...) ; processing (DEFUN DECOMPOSE-LONG-OPTION-STRING ...) ; processing (DEFUN PROCESS-LONG-OPTION ...) ; processing (DEFUN DO-PROCESS-COMMAND-LINE-OPTIONS ...) ; processing (DEFUN PROCESS-COMMAND-LINE-OPTIONS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/command-line-arguments/parse-tmpYZ5WO3E4.fasl ; compilation finished in 0:00:00.799 ; compiling file "/usr/share/common-lisp/source/command-line-arguments/help.lisp" (written 17 NOV 2015 08:20:48 PM): ; processing (IN-PACKAGE :COMMAND-LINE-ARGUMENTS) ; processing (DEFUN SPLIT-SEQUENCE ...) ; processing (DEFUN SHOW-OPTION-HELP ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/command-line-arguments/help-tmpHJA5IVPZ.fasl ; compilation finished in 0:00:00.491 ; compiling file "/usr/share/common-lisp/source/abnf/package.lisp" (written 06 MAY 2015 05:08:23 AM): ; processing (DEFPACKAGE #:ABNF ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/abnf/package-tmp3WS4A21E.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/abnf/abnf.lisp" (written 06 MAY 2015 05:08:23 AM): ; processing (IN-PACKAGE #:ABNF) ; processing (DEFVAR *ABNF-RFC2234-ABNF-DEFINITION* ...) ; processing (DEFVAR *ABNF-RFC-SYSLOG-DRAFT-15* ...) ; processing (DEFVAR *ABNF-RSYSLOG* ...) ; processing (DEFVAR *ABNF-RFC5424-SYSLOG-PROTOCOL* ...) ; processing (DEFVAR *ABNF-DEFAULT-RULES* ...) ; processing (DEFUN RULE-NAME-CHARACTER-P ...) ; processing (DEFUN VCHARP ...) ; processing (DEFRULE VCHAR ...) ; processing (DEFRULE WSP ...) ; processing (DEFRULE COMMENT ...) ; processing (DEFRULE C-NL ...) ; processing (DEFRULE C-WSP ...) ; processing (DEFRULE N-WSP ...) ; processing (DEFUN RULE-NAME-SYMBOL ...) ; processing (DEFRULE RULE-NAME ...) ; processing (DEFRULE EQUAL ...) ; processing (DEFRULE END-OF-RULE ...) ; processing (DEFRULE DIGIT ...) ; processing (DEFRULE DIGITS ...) ; processing (DEFUN CHAR-VAL-CHAR-P ...) ; processing (DEFRULE CHAR-VAL ...) ; processing (DEFRULE DEC-STRING ...) ; processing (DEFRULE DEC-RANGE ...) ; processing (DEFRULE DEC-VAL ...) ; processing (DEFUN HEXADECIMAL-CHAR-P ...) ; processing (DEFRULE HEXDIGITS ...) ; processing (DEFRULE HEX-STRING ...) ; processing (DEFRULE HEX-RANGE ...) ; processing (DEFRULE HEX-VAL ...) ; processing (DEFRULE NUM-VAL ...) ; processing (DEFRULE RULE-NAME-REFERENCE ...) ; processing (DEFUN PROCESS-QUOTED-REGEX ...) ; processing (DEFRULE SINGLE-QUOTED-REGEX ...) ; processing (DEFRULE DOUBLE-QUOTED-REGEX ...) ; processing (DEFRULE PARENS-QUOTED-REGEX ...) ; processing (DEFRULE BRACES-QUOTED-REGEX ...) ; processing (DEFRULE CHEVRON-QUOTED-REGEX ...) ; processing (DEFRULE BRACKETS-QUOTED-REGEX ...) ; processing (DEFRULE SLASH-QUOTED-REGEX ...) ; processing (DEFRULE PIPE-QUOTED-REGEX ...) ; processing (DEFRULE SHARP-QUOTED-REGEX ...) ; processing (DEFRULE QUOTED-REGEX ...) ; processing (DEFRULE ELEMENT ...) ; processing (DEFRULE NUMBER ...) ; processing (DEFRULE REPEAT-VAR ...) ; processing (DEFRULE REPEAT-SPECIFIC ...) ; processing (DEFRULE REPEAT ...) ; processing (DEFRULE REPETITION ...) ; processing (DEFRULE CONCATENATION-ELEMENT ...) ; processing (DEFRULE CONCATENATION ...) ; processing (DEFRULE ALTERNATION-ELEMENT ...) ; processing (DEFRULE ALTERNATION ...) ; processing (DEFRULE GROUP ...) ; processing (DEFRULE OPTION ...) ; processing (DEFRULE TOPLEVEL-ELEMENT ...) ; processing (DEFRULE ALTERNATIONS ...) ; processing (DEFRULE ELEMENTS ...) ; processing (DEFRULE RULE ...) ; processing (DEFRULE RULE-LIST ...) ; processing (DEFUN EXPAND-RULE-DEFINITION ...) ; processing (DEFUN EXPAND-RULE ...) ; processing (DEFUN PARSE-ABNF-GRAMMAR ...) ; processing (DEFUN TEST ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/abnf/abnf-tmpPQ4U054N.fasl ; compilation finished in 0:00:01.375 ; compiling file "/usr/share/common-lisp/source/db3/package.lisp" (written 12 FEB 2020 07:50:33 AM): ; processing (DEFPACKAGE #:DB3 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/db3/package-tmpC8SA9SZN.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/db3/db3.lisp" (written 12 FEB 2020 07:50:33 AM): ; processing (IN-PACKAGE :DB3) ; processing (DEFPARAMETER *EXTERNAL-FORMAT* ...) ; processing (DEFVAR *CODE-PAGE-LIST* ...) ; processing (DEFUN LANGUAGE-DRIVER-TO-ENCODING ...) ; processing (DEFUN READ-UINT32 ...) ; processing (DEFUN READ-UINT16 ...) ; processing (DEFCLASS DB3 ...) ; processing (DEFCLASS DB3-FIELD ...) ; processing (DEFCLASS DB3-MEMO ...) ; processing (DEFCLASS DB3-MEMO-BLOCK ...) ; processing (DEFUN ASCIIZ->STRING ...) ; processing (DEFUN ASCII->STRING ...) ; processing (DECLAIM (INLINE UNSIGNED-TO-SIGNED ...)) ; processing (DEFUN UNSIGNED-TO-SIGNED ...) ; processing (DEFUN BYTES->INTEGER ...) ; processing (DEFUN BYTES->BIGINT ...) ; processing (DEFUN LOAD-FIELD-DESCRIPTOR ...) ; processing (DEFMETHOD FIELD-COUNT ...) ; processing (DEFMETHOD LOAD-HEADER ...) ; processing (DEFMETHOD LOAD-MEMO-HEADER ...) ; processing (DEFMETHOD LOAD-MEMO-RECORD ...) ; processing (DEFMETHOD CLOSE-MEMO ...) ; processing (DEFMETHOD CONVERT-FIELD ...) ; processing (DEFMETHOD CONVERT-FIELD ...) ; processing (DEFMETHOD CONVERT-FIELD ...) ; processing (DEFMETHOD CONVERT-FIELD ...) ; processing (DEFMETHOD CONVERT-FIELD ...) ; processing (DEFMETHOD CONVERT-FIELD ...) ; processing (DEFMETHOD CONVERT-FIELD ...) ; processing (DEFMETHOD CONVERT-FIELD ...) ; processing (DEFMETHOD LOAD-FIELD ...) ; processing (DEFMETHOD LOAD-RECORD ...) ; processing (DEFUN WRITE-RECORD ...) ; processing (DEFUN DUMP-DB3 ...) ; processing (DEFUN SAMPLE-DB3 ...) ; processing (DEFUN INSPECT-DB3 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/db3/db3-tmpWC0QU1SK.fasl ; compilation finished in 0:00:01.807 ; compiling file "/usr/share/common-lisp/source/ieee-floats/ieee-floats.lisp" (written 24 AUG 2017 07:52:41 AM): ; processing (DEFPACKAGE :IEEE-FLOATS ...) ; processing (IN-PACKAGE :IEEE-FLOATS) ; processing (DEFMACRO MAKE-FLOAT-CONVERTERS ...) ; processing (DECLAIM (INLINE ENCODE-FLOAT32 ...)) ; processing (MAKE-FLOAT-CONVERTERS ENCODE-FLOAT32 ...) ; processing (MAKE-FLOAT-CONVERTERS ENCODE-FLOAT64 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ieee-floats/ieee-floats-tmpQQZMKNNN.fasl ; compilation finished in 0:00:00.503 ; compiling file "/usr/share/common-lisp/source/ixf/package.lisp" (written 06 MAY 2017 01:08:15 AM): ; processing (DEFPACKAGE #:IXF ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ixf/package-tmpIDPPBBFN.fasl ; compilation finished in 0:00:00.008 ; compiling file "/usr/share/common-lisp/source/ixf/records.lisp" (written 06 MAY 2017 01:08:15 AM): ; processing (IN-PACKAGE :IXF) ; processing (DEFSTRUCT (IXF-FIELD # ...) ...) ; processing (DEFVAR *IXF-HEADER* ...) ; processing (DEFVAR *IXF-TABLE* ...) ; processing (DEFVAR *IXF-COLUMN* ...) ; processing (DEFVAR *IXF-DATA* ...) ; processing (DEFVAR *IXF-APPLICATION* ...) ; processing (DEFVAR *RECORD-TYPES* ...) ; processing (DEFUN READ-INTEGER ...) ; processing (DEFUN READ-CHARACTER ...) ; processing (DEFUN READ-ASCII-STRING ...) ; processing (DEFUN READ-BINARY-DATA ...) ; processing (DEFUN READ-FIELD ...) ; processing (DEFUN READ-RECORD ...) ; processing (DEFUN READ-NEXT-RECORD ...) ; processing (DEFUN HEADER-RECORD-P ...) ; processing (DEFUN TABLE-RECORD-P ...) ; processing (DEFUN COLUMN-RECORD-P ...) ; processing (DEFUN DATA-RECORD-P ...) ; processing (DEFUN GET-RECORD-PROPERTY ...) ; processing (DEFUN CHECK-RECORD ...) ; processing (DEFUN VALIDATE-FILE ...) ; processing (DEFUN COLLECT-RECORDS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ixf/records-tmp9FP9ZO2K.fasl ; compilation finished in 0:00:00.815 ; compiling file "/usr/share/common-lisp/source/ixf/types.lisp" (written 06 MAY 2017 01:08:15 AM): ; processing (IN-PACKAGE :IXF) ; processing (DEFCONSTANT +BIGINT+ ...) ; processing (DEFCONSTANT +BLOB+ ...) ; processing (DEFCONSTANT +CLOB+ ...) ; processing (DEFCONSTANT +BLOB-FILE+ ...) ; processing (DEFCONSTANT +CLOB-FILE+ ...) ; processing (DEFCONSTANT +DBCLOB-FILE+ ...) ; processing (DEFCONSTANT +CHAR+ ...) ; processing (DEFCONSTANT +DATE+ ...) ; processing (DEFCONSTANT +DBCLOB+ ...) ; processing (DEFCONSTANT +DECIMAL+ ...) ; processing (DEFCONSTANT +DECFLOAT+ ...) ; processing (DEFCONSTANT +FLOAT+ ...) ; processing (DEFCONSTANT +GRAPHIC+ ...) ; processing (DEFCONSTANT +INTEGER+ ...) ; processing (DEFCONSTANT +LONGVARCHAR+ ...) ; processing (DEFCONSTANT +LONGVARGRAPHIC+ ...) ; processing (DEFCONSTANT +SMALLINT+ ...) ; processing (DEFCONSTANT +TIME+ ...) ; processing (DEFCONSTANT +TIMESTAMP+ ...) ; processing (DEFCONSTANT +VARCHAR+ ...) ; processing (DEFCONSTANT +VARGRAPHIC+ ...) ; processing (DEFCONSTANT +BLOB-LOCATION-SPEC+ ...) ; processing (DEFCONSTANT +DBCLOB-LOCATION-SPEC+ ...) ; processing (DEFCONSTANT +DBBLOB-LOCATION-SPEC+ ...) ; processing (DEFUN PARSE-IXF-NULL ...) ; processing (DEFUN UNSIGNED-TO-SIGNED ...) ; processing (DEFUN PARSE-IXF-SMALLINT ...) ; processing (DEFUN PARSE-IXF-UNSIGNED-INTEGER ...) ; processing (DEFUN PARSE-IXF-UNSIGNED-BIGINT ...) ; processing (DEFUN PARSE-IXF-INTEGER ...) ; processing (DEFUN PARSE-IXF-BIGINT ...) ; processing (DEFUN PARSE-IXF-DECIMAL ...) ; processing (DEFUN PARSE-IXF-FLOAT ...) ; processing (DEFUN PARSE-IXF-STRING ...) ; processing (DEFUN PARSE-IXF-TIMESTAMP ...) ; processing (DEFUN PARSE-IXF-TIME ...) ; processing (DEFUN PARSE-IXF-DATE ...) ; processing (DEFUN PARSE-IXF-LLS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ixf/types-tmpTHQO2IGY.fasl ; compilation finished in 0:00:00.811 ; compiling file "/usr/share/common-lisp/source/ixf/encodings.lisp" (written 06 MAY 2017 01:08:15 AM): ; processing (IN-PACKAGE #:IXF) ; processing (DEFVAR *IXF-ENCODINGS-MAPPING* ...) ; processing (DEFUN BABEL-ENCODING-FOR-CODE-PAGE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ixf/encodings-tmpXGCY36O9.fasl ; compilation finished in 0:00:00.039 ; compiling file "/usr/share/common-lisp/source/ixf/structs.lisp" (written 06 MAY 2017 01:08:15 AM): ; processing (IN-PACKAGE #:IXF) ; processing (DEFSTRUCT IXF-HEADER ...) ; processing (DEFSTRUCT IXF-COLUMN ...) ; processing (DEFSTRUCT IXF-TABLE ...) ; processing (DEFSTRUCT IXF-FILE ...) ; processing (DECLAIM (INLINE GET-CODE-PAGE)) ; processing (DEFUN GET-CODE-PAGE ...) ; processing (DEFUN PARSE-ENCODING ...) ; processing (DEFMETHOD PARSE-HEADER ...) ; processing (DEFMETHOD PARSE-TABLE-DEFINITION ...) ; processing (DEFMETHOD PARSE-COLUMN-DEFINITION ...) ; processing (DEFMETHOD READ-HEADERS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ixf/structs-tmpAZECCWRG.fasl ; compilation finished in 0:00:01.403 ; compiling file "/usr/share/common-lisp/source/ixf/data.lisp" (written 06 MAY 2017 01:08:15 AM): ; processing (IN-PACKAGE #:IXF) ; processing (DEFUN PARSE-IXF-DATA ...) ; processing (DEFMETHOD MAYBE-READ-RECORD ...) ; processing (DEFMETHOD READ-NEXT-ROW ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ixf/data-tmpG300S9SF.fasl ; compilation finished in 0:00:00.371 ; compiling file "/usr/share/common-lisp/source/ixf/ixf.lisp" (written 06 MAY 2017 01:08:15 AM): ; processing (IN-PACKAGE #:IXF) ; processing (DEFMACRO WITH-IXF-STREAM ...) ; processing (DEFMACRO WITH-IXF-FILE ...) ; processing (DEFUN MAP-DATA ...) ; processing (DEFMETHOD READ-DATA ...) ; processing (DEFUN READ-IXF-FILE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/ixf/ixf-tmp809IFK9M.fasl ; compilation finished in 0:00:00.287 ; compiling file "/usr/share/common-lisp/source/py-configparser/package.lisp" (written 09 MAR 2009 09:47:15 AM): ; processing (DEFPACKAGE #:PY-CONFIGPARSER ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/py-configparser/package-tmpSB12JM8J.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/py-configparser/config.lisp" (written 31 AUG 2013 11:54:28 PM): ; processing (IN-PACKAGE :PY-CONFIGPARSER) ; processing (DEFINE-CONDITION CONFIGPARSER-ERROR ...) ; processing (DEFINE-CONDITION CONFIG-ERROR ...) ; processing (DEFINE-CONDITION NO-SECTION-ERROR ...) ; processing (DEFINE-CONDITION DUPLICATE-SECTION-ERROR ...) ; processing (DEFINE-CONDITION NO-OPTION-ERROR ...) ; processing (DEFINE-CONDITION INTERPOLATION-ERROR ...) ; processing (DEFINE-CONDITION INTERPOLATION-DEPTH-ERROR ...) ; processing (DEFINE-CONDITION INTERPOLATION-MISSING-OPTION-ERROR ...) ; processing (DEFINE-CONDITION INTERPOLATION-SYNTAX-ERROR ...) ; processing (DEFSTRUCT SECTION ...) ; processing (DEFSTRUCT CONFIG ...) ; processing (DEFUN NORM-OPTION-NAME ...) ; processing (DEFUN NORM-SECTION-NAME ...) ; processing (DEFUN %VALIDATE-SECTION-NAME ...) ; processing (DEFUN %VALIDATE-OPTION-NAME ...) ; processing (DEFUN %GET-SECTION ...) ; processing (DEFUN %GET-OPTION ...) ; processing (DEFUN DEFAULTS ...) ; processing (DEFUN SECTIONS ...) ; processing (DEFUN HAS-SECTION-P ...) ; processing (DEFUN ADD-SECTION ...) ; processing (DEFUN OPTIONS ...) ; processing (DEFUN HAS-OPTION-P ...) ; processing (DEFUN %EXTRACT-REPLACEMENT ...) ; processing (DEFUN %OPTION-VALUE ...) ; processing (DEFUN %EXPAND-OPTION-VALUE ...) ; processing (DEFUN GET-OPTION ...) ; processing (DEFUN SET-OPTION ...) ; processing (DEFUN ITEMS ...) ; processing (DEFUN REMOVE-OPTION ...) ; processing (DEFUN REMOVE-SECTION ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/py-configparser/config-tmpBPQSLJ17.fasl ; compilation finished in 0:00:01.315 ; compiling file "/usr/share/common-lisp/source/py-configparser/parser.lisp" (written 13 JUN 2008 08:11:01 PM): ; processing (IN-PACKAGE #:PY-CONFIGPARSER) ; processing (DECLAIM (SPECIAL *LINE-NO* ...)) ; processing (DEFINE-CONDITION PARSING-ERROR ...) ; processing (DEFINE-CONDITION MISSING-SECTION-HEADER-ERROR ...) ; processing (DECLAIM (INLINE %READ-CHAR ...)) ; processing (DEFUN %READ-CHAR ...) ; processing (DEFUN ENSURE-SECTION ...) ; processing (DEFUN IS-WHITESPACE ...) ; processing (DEFUN IS-COMMENT-CHAR ...) ; processing (DEFUN SKIP-WHITESPACE ...) ; processing (DEFUN SKIP-EMPTY-LINE ...) ; processing (DEFUN SKIP-TO-EOL ...) ; processing (DEFUN EXPECT-CHAR ...) ; processing (DEFUN EXPECT-ONE-OF ...) ; processing (DEFUN MAKE-INPUT-BUFFER ...) ; processing (DECLAIM (INLINE EXTEND-INPUT)) ; processing (DEFUN EXTEND-INPUT ...) ; file: /usr/share/common-lisp/source/py-configparser/parser.lisp ; in: DEFUN EXTEND-INPUT ; (DEFUN PY-CONFIGPARSER::EXTEND-INPUT (PY-CONFIGPARSER::P PY-CONFIGPARSER::C) ; (VECTOR-PUSH-EXTEND PY-CONFIGPARSER::C PY-CONFIGPARSER::*CURRENT-INPUT* 20)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA PY-CONFIGPARSER::EXTEND-INPUT ; (PY-CONFIGPARSER::P PY-CONFIGPARSER::C) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK PY-CONFIGPARSER::EXTEND-INPUT ; (VECTOR-PUSH-EXTEND PY-CONFIGPARSER::C PY-CONFIGPARSER::*CURRENT-INPUT* ; 20))) ; ; caught STYLE-WARNING: ; The variable P is defined but never used. ; processing (DEFUN FINALIZE-INPUT ...) ; processing (DEFUN READ-SECTION-NAME ...) ; file: /usr/share/common-lisp/source/py-configparser/parser.lisp ; in: DEFUN READ-SECTION-NAME ; (PY-CONFIGPARSER::EXTEND-INPUT PY-CONFIGPARSER::P PY-CONFIGPARSER::C) ; ; caught STYLE-WARNING: ; The variable P is defined but never used. ; processing (DEFUN READ-OPTION-NAME ...) ; file: /usr/share/common-lisp/source/py-configparser/parser.lisp ; in: DEFUN READ-OPTION-NAME ; (PY-CONFIGPARSER::EXTEND-INPUT PY-CONFIGPARSER::P PY-CONFIGPARSER::C) ; ; caught STYLE-WARNING: ; The variable P is defined but never used. ; processing (DEFUN READ-OPTION-VALUE ...) ; file: /usr/share/common-lisp/source/py-configparser/parser.lisp ; in: DEFUN READ-OPTION-VALUE ; (PY-CONFIGPARSER::EXTEND-INPUT PY-CONFIGPARSER::P #\ ) ; ; caught STYLE-WARNING: ; The variable P is defined but never used. ; (PY-CONFIGPARSER::EXTEND-INPUT PY-CONFIGPARSER::P PY-CONFIGPARSER::C) ; ; caught STYLE-WARNING: ; The variable P is defined but never used. ; processing (DEFUN READING-DRIVER ...) ; processing (DEFUN READ-FILES ...) ; processing (DEFUN READ-STREAM ...) ; processing (DEFUN %FORMAT-VALUE ...) ; processing (DEFUN WRITE-STREAM ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/py-configparser/parser-tmpTAX50JN7.fasl ; compilation finished in 0:00:01.035 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/sqlite/sqlite-ffi.lisp" (written 09 MAY 2011 09:45:30 PM): ; processing (DEFPACKAGE :SQLITE-FFI ...) ; processing (IN-PACKAGE :SQLITE-FFI) ; processing (DEFINE-FOREIGN-LIBRARY SQLITE3-LIB ...) ; processing (USE-FOREIGN-LIBRARY SQLITE3-LIB) ; processing (DEFCENUM ERROR-CODE ...) ; processing (DEFCSTRUCT SQLITE3) ; processing (DEFCTYPE P-SQLITE3 ...) ; file: /usr/share/common-lisp/source/sqlite/sqlite-ffi.lisp ; in: DEFCTYPE P-SQLITE3 ; (CFFI:DEFCTYPE SQLITE-FFI:P-SQLITE3 (:POINTER SQLITE-FFI::SQLITE3)) ; ; caught STYLE-WARNING: ; bare references to struct types are deprecated. Please use (:POINTER ; #1=(:STRUCT ; SQLITE3)) or #1# instead. ; processing (DEFCFUN SQLITE3-OPEN ...) ; processing (DEFCFUN SQLITE3-CLOSE ...) ; processing (DEFCFUN SQLITE3-ERRMSG ...) ; processing (DEFCFUN SQLITE3-BUSY-TIMEOUT ...) ; processing (DEFCSTRUCT SQLITE3-STMT) ; processing (DEFCTYPE P-SQLITE3-STMT ...) ; file: /usr/share/common-lisp/source/sqlite/sqlite-ffi.lisp ; in: DEFCTYPE P-SQLITE3-STMT ; (CFFI:DEFCTYPE SQLITE-FFI:P-SQLITE3-STMT (:POINTER SQLITE-FFI::SQLITE3-STMT)) ; ; caught STYLE-WARNING: ; bare references to struct types are deprecated. Please use (:POINTER ; #1=(:STRUCT ; SQLITE3-STMT)) or #1# instead. ; processing (DEFCFUN (SQLITE3-PREPARE "sqlite3_prepare_v2") ...) ; processing (DEFCFUN SQLITE3-FINALIZE ...) ; processing (DEFCFUN SQLITE3-STEP ...) ; processing (DEFCFUN SQLITE3-RESET ...) ; processing (DEFCFUN SQLITE3-CLEAR-BINDINGS ...) ; processing (DEFCFUN SQLITE3-COLUMN-COUNT ...) ; processing (DEFCENUM TYPE-CODE ...) ; processing (DEFCFUN SQLITE3-COLUMN-TYPE ...) ; processing (DEFCFUN SQLITE3-COLUMN-TEXT ...) ; processing (DEFCFUN SQLITE3-COLUMN-INT64 ...) ; processing (DEFCFUN SQLITE3-COLUMN-DOUBLE ...) ; processing (DEFCFUN SQLITE3-COLUMN-BYTES ...) ; processing (DEFCFUN SQLITE3-COLUMN-BLOB ...) ; processing (DEFCFUN SQLITE3-COLUMN-NAME ...) ; processing (DEFCFUN SQLITE3-BIND-PARAMETER-COUNT ...) ; processing (DEFCFUN SQLITE3-BIND-PARAMETER-NAME ...) ; processing (DEFCFUN SQLITE3-BIND-PARAMETER-INDEX ...) ; processing (DEFCFUN SQLITE3-BIND-DOUBLE ...) ; processing (DEFCFUN SQLITE3-BIND-INT64 ...) ; processing (DEFCFUN SQLITE3-BIND-NULL ...) ; processing (DEFCFUN SQLITE3-BIND-TEXT ...) ; processing (DEFCFUN SQLITE3-BIND-BLOB ...) ; processing (DEFCONSTANT DESTRUCTOR-TRANSIENT-ADDRESS ...) ; processing (DEFUN DESTRUCTOR-TRANSIENT ...) ; processing (DEFUN DESTRUCTOR-STATIC ...) ; processing (DEFCFUN SQLITE3-LAST-INSERT-ROWID ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/sqlite/sqlite-ffi-tmpLPRKFQ4F.fasl ; compilation finished in 0:00:02.339 WARNING: Lisp compilation had style-warnings while compiling # WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT SQLITE3)) or (:STRUCT SQLITE3) instead. WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT SQLITE3-STMT)) or (:STRUCT SQLITE3-STMT) instead. ; compiling file "/usr/share/common-lisp/source/sqlite/cache.lisp" (written 09 MAY 2011 09:45:30 PM): ; processing (DEFPACKAGE :SQLITE.CACHE ...) ; processing (IN-PACKAGE :SQLITE.CACHE) ; processing (DEFCLASS MRU-CACHE ...) ; processing (DEFUN GET-FROM-CACHE ...) ; processing (DEFUN REMOVE-EMPTY-OBJECTS-STACKS ...) ; processing (DEFUN POP-FROM-CACHE ...) ; processing (DEFUN PUT-TO-CACHE ...) ; processing (DEFUN PURGE-CACHE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/sqlite/cache-tmp8VQNX3K0.fasl ; compilation finished in 0:00:00.395 ; compiling file "/usr/share/common-lisp/source/sqlite/sqlite.lisp" (written 09 MAY 2011 09:45:30 PM): ; processing (DEFPACKAGE :SQLITE ...) ; processing (IN-PACKAGE :SQLITE) ; processing (DEFINE-CONDITION SQLITE-ERROR ...) ; processing (DEFINE-CONDITION SQLITE-CONSTRAINT-ERROR ...) ; processing (DEFUN SQLITE-ERROR ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFCLASS SQLITE-HANDLE ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFUN CONNECT ...) ; processing (DEFUN SET-BUSY-TIMEOUT ...) ; processing (DEFUN DISCONNECT ...) ; file: /usr/share/common-lisp/source/sqlite/sqlite.lisp ; in: DEFUN DISCONNECT ; (COPY-LIST (SQLITE::SQLITE-HANDLE-STATEMENTS SQLITE::HANDLE)) ; ; note: could not stack allocate: (COPY-LIST (SQLITE-HANDLE-STATEMENTS HANDLE)) ; processing (DEFCLASS SQLITE-STATEMENT ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFUN PREPARE-STATEMENT ...) ; processing (DEFUN REALLY-FINALIZE-STATEMENT ...) ; processing (DEFUN FINALIZE-STATEMENT ...) ; processing (DEFUN STEP-STATEMENT ...) ; processing (DEFUN RESET-STATEMENT ...) ; processing (DEFUN CLEAR-STATEMENT-BINDINGS ...) ; processing (DEFUN STATEMENT-COLUMN-VALUE ...) ; processing (DEFMACRO WITH-PREPARED-STATEMENT ...) ; processing (DEFMACRO WITH-PREPARED-STATEMENT/NAMED ...) ; processing (DEFUN EXECUTE-NON-QUERY ...) ; processing (DEFUN EXECUTE-NON-QUERY/NAMED ...) ; processing (DEFUN EXECUTE-TO-LIST ...) ; processing (DEFUN EXECUTE-TO-LIST/NAMED ...) ; processing (DEFUN EXECUTE-ONE-ROW-M-V ...) ; processing (DEFUN EXECUTE-ONE-ROW-M-V/NAMED ...) ; processing (DEFUN STATEMENT-PARAMETER-INDEX ...) ; processing (DEFUN BIND-PARAMETER ...) ; processing (DEFUN EXECUTE-SINGLE ...) ; processing (DEFUN EXECUTE-SINGLE/NAMED ...) ; processing (DEFUN LAST-INSERT-ROWID ...) ; processing (DEFMACRO WITH-TRANSACTION ...) ; processing (DEFMACRO WITH-OPEN-DATABASE ...) ; processing (DEFMACRO-DRIVER (FOR VARS ...) ...) ; processing (DEFMACRO-DRIVER (FOR VARS ...) ...) ; processing (DEFMACRO-DRIVER (FOR VARS ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/sqlite/sqlite-tmpD0G9A1XR.fasl ; compilation finished in 0:00:03.647 ; compiling file "/usr/share/common-lisp/source/trivial-backtrace/dev/packages.lisp" (written 11 MAY 2020 01:46:26 AM): ; processing (IN-PACKAGE #:COMMON-LISP-USER) ; processing (DEFPACKAGE #:TRIVIAL-BACKTRACE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/trivial-backtrace/dev/packages-tmp94C6TZKL.fasl ; compilation finished in 0:00:00.024 ; compiling file "/usr/share/common-lisp/source/trivial-backtrace/dev/utilities.lisp" (written 11 MAY 2020 01:46:26 AM): ; processing (IN-PACKAGE #:TRIVIAL-BACKTRACE) ; processing (DEFPARAMETER *DATE-TIME-FORMAT* ...) ; processing (DEFMACRO GENERATE-TIME-PART-FUNCTION ...) ; processing (GENERATE-TIME-PART-FUNCTION SECOND ...) ; processing (GENERATE-TIME-PART-FUNCTION MINUTE ...) ; processing (GENERATE-TIME-PART-FUNCTION HOUR ...) ; processing (GENERATE-TIME-PART-FUNCTION DATE ...) ; processing (GENERATE-TIME-PART-FUNCTION MONTH ...) ; processing (GENERATE-TIME-PART-FUNCTION YEAR ...) ; processing (GENERATE-TIME-PART-FUNCTION DAY-OF-WEEK ...) ; processing (GENERATE-TIME-PART-FUNCTION DAYLIGHT-SAVINGS-TIME-P ...) ; processing (DEFUN DATE-TIME-STRING ...) ; processing (DEFUN FORMAT-DATE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/trivial-backtrace/dev/utilities-tmpVSFQJ80K.fasl ; compilation finished in 0:00:00.911 ; compiling file "/usr/share/common-lisp/source/trivial-backtrace/dev/backtrace.lisp" (written 11 MAY 2020 01:46:26 AM): ; processing (IN-PACKAGE #:TRIVIAL-BACKTRACE) ; processing (DEFUN PRINT-CONDITION ...) ; processing (DEFUN PRINT-BACKTRACE ...) ; processing (WHEN (FIND-SYMBOL "*DEBUG-PRINT-VARIABLE-ALIST*" ...) ...) ; processing (DEFUN PRINT-BACKTRACE-TO-STREAM ...) ; processing (SETF (DOCUMENTATION # ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/trivial-backtrace/dev/backtrace-tmpPLK5HVAF.fasl ; compilation finished in 0:00:00.255 ; compiling file "/usr/share/common-lisp/source/trivial-backtrace/dev/map-backtrace.lisp" (written 11 MAY 2020 01:46:26 AM): ; processing (IN-PACKAGE #:TRIVIAL-BACKTRACE) ; processing (DEFSTRUCT FRAME ...) ; processing (DEFSTRUCT VAR ...) ; processing (DEFSTRUCT POS-FORM-NUMBER ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFVAR *TRIVIAL-BACKTRACE-FRAME-PRINT-SPECIALS* ...) ; processing (DEFUN PRINT-FRAME ...) ; processing (DEFUN MAP-BACKTRACE ...) ; processing (DEFUN PRINT-MAP-BACKTRACE ...) ; processing (DEFUN BACKTRACE-STRING ...) ; processing (DEFUN IMPL-MAP-BACKTRACE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/trivial-backtrace/dev/map-backtrace-tmp5FHTGX61.fasl ; compilation finished in 0:00:01.111 ; compiling file "/usr/share/common-lisp/source/trivial-backtrace/dev/fallback.lisp" (written 11 MAY 2020 01:46:26 AM): ; processing (IN-PACKAGE #:TRIVIAL-BACKTRACE) ; processing (UNLESS (FBOUNDP #) ...) ; processing (UNLESS (FBOUNDP #) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/trivial-backtrace/dev/fallback-tmpKUF556D3.fasl ; compilation finished in 0:00:00.035 ; compiling file "/usr/share/common-lisp/source/metatilities-base/dev/package.lisp" (written 30 MAR 2017 12:37:26 AM): ; processing (IN-PACKAGE #:COMMON-LISP-USER) ; processing (DEFPACKAGE #:METABANG.UTILITIES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/metatilities-base/dev/package-tmpS8HGASGU.fasl ; compilation finished in 0:00:00.031 ; compiling file "/usr/share/common-lisp/source/metatilities-base/dev/api.lisp" (written 30 MAR 2017 12:37:26 AM): ; processing (IN-PACKAGE #:METATILITIES) ; processing (DEFGENERIC CHOOSE-DIRECTORY-QUESTION* ...) ; processing (DEFGENERIC CHOOSE-FILE-QUESTION* ...) ; processing (DEFGENERIC CHOOSE-ITEM-FROM-PUP* ...) ; processing (DEFGENERIC CHOOSE-ITEM-QUESTION* ...) ; processing (DEFGENERIC CHOOSE-NEW-FILE-QUESTION* ...) ; processing (DEFGENERIC Y-OR-N-QUESTION* ...) ; processing (DEFGENERIC GUI-ERROR* ...) ; processing (DEFGENERIC GUI-WARN* ...) ; processing (DEFGENERIC REPORT-CONDITION ...) ; processing (DEFGENERIC HELP-SPEC ...) ; processing (DEFGENERIC INTERFACE-BEEP* ...) ; processing (DEFGENERIC MAKE-COLOR** ...) ; processing (DEFGENERIC MAKE-GRAY* ...) ; processing (DEFGENERIC MAKE-SCALED-COLOR* ...) ; processing (DEFGENERIC NAME ...) ; processing (DEFGENERIC PROCESS-PARAMETERS* ...) ; processing (DEFGENERIC PROMPT-FOR* ...) ; processing (DEFGENERIC PUT-ITEM-ON-CLIPBOARD* ...) ; processing (DEFGENERIC SELECT-INSTRUMENT* ...) ; processing (DEFGENERIC INSPECT-THING* ...) ; processing (DEFGENERIC SOUND-NOTE* ...) ; processing (DEFGENERIC STOP-NOTES* ...) ; processing (DEFGENERIC MAKE-PROGRESS-BAR ...) ; processing (DEFGENERIC PROGRESS-BAR-VALUE ...) ; processing (DEFGENERIC (SETF PROGRESS-BAR-VALUE) ...) ; processing (DEFGENERIC CLOSE-PROGRESS-BAR ...) ; processing (DEFGENERIC MAKE-UI-POINT* ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/metatilities-base/dev/api-tmpLXEY4I7N.fasl ; compilation finished in 0:00:00.023 ; compiling file "/usr/share/common-lisp/source/metatilities-base/dev/l0-utils.lisp" (written 30 MAR 2017 12:37:26 AM): ; processing (IN-PACKAGE #:METATILITIES) ; processing (DEFUN FIXNUMP ...) ; processing (DEFMACRO WITH-STANDARD-PRINTING ...) ; processing (DEFUN NEQ ...) ; processing (DECLAIM (INLINE NEQ)) ; processing (DEFINE-COMPILER-MACRO NEQ ...) ; processing (DEFUN FORM-SYMBOL-IN-PACKAGE ...) ; processing (DEFUN FORM-SYMBOL ...) ; processing (DEFUN FORM-KEYWORD ...) ; processing (DEFUN FORM-UNINTERNED-SYMBOL ...) ; processing (DEFUN CURRENT-LOAD-FILE ...) ; processing (DEFMACRO WITH-UNIQUE-NAMES ...) ; processing (DEFUN ENSURE-LIST ...) ; processing (DEFUN ENSURE-FUNCTION ...) ; processing (DEFVAR *NEWSYM-COUNTER* ...) ; processing (DEFUN NEWSYM ...) ; processing (DEFUN EXPORT-EXPORTED-SYMBOLS ...) ; processing (DEFGENERIC LENGTH-AT-LEAST-P ...) ; processing (DEFMETHOD LENGTH-AT-LEAST-P ...) ; processing (DEFMETHOD LENGTH-AT-LEAST-P ...) ; processing (DEFGENERIC LENGTH-AT-MOST-P ...) ; processing (DEFMETHOD LENGTH-AT-MOST-P ...) ; processing (DEFMETHOD LENGTH-AT-MOST-P ...) ; processing (DECLAIM (INLINE LENGTH-1-LIST-P)) ; processing (DEFUN LENGTH-1-LIST-P ...) ; processing (DEFUN NEARLY-ZERO-P ...) ; file: /usr/share/common-lisp/source/metatilities-base/dev/l0-utils.lisp ; in: DEFUN NEARLY-ZERO-P ; (< 0.0 METABANG.UTILITIES::X) ; ; note: unable to ; open-code float conversion of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code RATIONAL to FLOAT comparison ; due to type uncertainty: ; The first argument is a REAL, not a RATIONAL. ; (> METABANG.UTILITIES::THRESHOLD METABANG.UTILITIES::X) ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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. ; (> METABANG.UTILITIES::X METABANG.UTILITIES::THRESHOLD) ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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. ; (< 0.0 METABANG.UTILITIES::X) ; ; 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. ; (> METABANG.UTILITIES::X METABANG.UTILITIES::THRESHOLD) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do #1=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 #1# (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; etc. ; (> METABANG.UTILITIES::THRESHOLD METABANG.UTILITIES::X) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do #1=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 #1# (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; etc. ; processing (DEFUN NEARLY-EQUAL-P ...) ; processing (DEFUN DOTTED-PAIR-P ...) ; processing (DEFUN APPLY-IF-EXISTS ...) ; processing (DEFUN FUNCALL-IF-EXISTS ...) ; processing (DEFUN CALL-IF-EXISTS ...) ; processing (DEFUN ITERATE-OVER-INDEXES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/metatilities-base/dev/l0-utils-tmp1PA6XKV0.fasl ; compilation finished in 0:00:01.227 ; compiling file "/usr/share/common-lisp/source/metatilities-base/dev/l0-strings.lisp" (written 30 MAR 2017 12:37:26 AM): ; processing (IN-PACKAGE #:METATILITIES) ; processing (DEFPARAMETER +WHITESPACE-CHARACTERS+ ...) ; processing (DEFUN WHITESPACEP ...) ; processing (DEFUN STRING-STARTS-WITH ...) ; processing (DEFUN STRING-ENDS-WITH ...) ; processing (DEFUN STRING-TRIM-IF ...) ; processing (DEFUN STRIP-WHITESPACE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/metatilities-base/dev/l0-strings-tmpEW48DPG8.fasl ; compilation finished in 0:00:00.319 ; compiling file "/usr/share/common-lisp/source/metatilities-base/dev/l0-macros.lisp" (written 30 MAR 2017 12:37:26 AM): ; processing (IN-PACKAGE #:METATILITIES) ; processing (DEFMACRO NYI ...) ; processing (DEFMACRO DEPRECATED ...) ; processing (DEFMACRO ONCE-ONLY ...) ; processing (DEFMACRO WITH-VARIABLES ...) ; processing (DEFMACRO EVAL-ALWAYS ...) ; processing (DEFMACRO DEFCLASS-PROPERTY ...) ; processing (DEFMACRO WITH-ATOMIC-EXECUTION ...) ; processing (DEFMACRO HANDLER-BIND* ...) ; processing (DEFMACRO WITH-GENSYMS ...) ; processing (DEFVAR *FILE-IF-EXISTS* ...) ; processing (DEFVAR *FILE-PRINT-RIGHT-MARGIN* ...) ; processing (DEFMACRO WITH-NEW-FILE ...) ; processing (DEFMACRO WITH-STREAM-FROM-SPECIFIER ...) ; processing (DEFMACRO WITH-INPUT ...) ; processing (DEFMACRO WITH-OUTPUT ...) ; processing (DEFMACRO MUFFLE-REDEFINITION-WARNINGS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/metatilities-base/dev/l0-macros-tmp4ULRYCDK.fasl ; compilation finished in 0:00:01.675 ; compiling file "/usr/share/common-lisp/source/metatilities-base/dev/l0-arrays.lisp" (written 30 MAR 2017 12:37:26 AM): ; processing (IN-PACKAGE #:METATILITIES) ; processing (DEFUN LINEARIZE-ARRAY ...) ; processing (DEFUN COPY-ARRAY ...) ; processing (DEFUN MAPARRAY ...) ; processing (DEFUN MAPARRAY! ...) ; processing (DEFUN ARRAY-ROW ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/metatilities-base/dev/l0-arrays-tmpV4ITDAY7.fasl ; compilation finished in 0:00:00.231 ; compiling file "/usr/share/common-lisp/source/metatilities-base/dev/l0-clos.lisp" (written 30 MAR 2017 12:37:26 AM): ; processing (IN-PACKAGE #:METATILITIES) ; processing (DEFUN FINALIZE-CLASS-IF-NECESSARY ...) ; processing (DEFGENERIC GET-CLASS ...) ; processing (DECLAIM (SPECIAL *SAMEP-TOLERANCE*)) ; processing (DEFVAR *SAMEP-TOLERANCE* ...) ; processing (DECLAIM (SPECIAL *SAMEP-TEST*)) ; processing (DEFVAR *SAMEP-TEST* ...) ; processing (DEFGENERIC SAMEP ...) ; processing (DEFGENERIC NEARLY-SAMEP ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/metatilities-base/dev/l0-clos-tmpTU3G94ZX.fasl ; compilation finished in 0:00:00.523 ; compiling file "/usr/share/common-lisp/source/metatilities-base/dev/l0-files.lisp" (written 30 MAR 2017 12:37:26 AM): ; processing (IN-PACKAGE #:METATILITIES) ; processing (DEFINE-CONDITION INVALID-STREAM-SPECIFIER-ERROR ...) ; processing (DEFUN INVALID-STREAM-SPECIFIER-ERROR ...) ; processing (DEFUN PATHNAME-NAME+TYPE ...) ; processing (DEFUN PHYSICAL-PATHNAME-DIRECTORY-SEPARATOR ...) ; processing (DEFUN RELATIVE-PATHNAME ...) ; processing (DEFUN DIRECTORY-PATHNAME-P ...) ; processing (DEFUN ENSURE-DIRECTORY-PATHNAME ...) ; processing (DEFUN PATHNAME-SAMEP ...) ; processing (DEFGENERIC MAKE-STREAM-FROM-SPECIFIER ...) ; processing (DEFGENERIC CLOSE-STREAM-SPECIFIER ...) ; processing (DEFMETHOD MAKE-STREAM-FROM-SPECIFIER ...) ; processing (DEFMETHOD MAKE-STREAM-FROM-SPECIFIER ...) ; processing (DEFMETHOD MAKE-STREAM-FROM-SPECIFIER ...) ; processing (DEFMETHOD MAKE-STREAM-FROM-SPECIFIER ...) ; processing (DEFMETHOD MAKE-STREAM-FROM-SPECIFIER ...) ; processing (DEFMETHOD MAKE-STREAM-FROM-SPECIFIER ...) ; processing (DEFMETHOD MAKE-STREAM-FROM-SPECIFIER ...) ; processing (DEFMETHOD MAKE-STREAM-FROM-SPECIFIER ...) ; processing (DEFMETHOD MAKE-STREAM-FROM-SPECIFIER ...) ; processing (DEFMETHOD CLOSE-STREAM-SPECIFIER ...) ; processing (DEFMETHOD CLOSE-STREAM-SPECIFIER ...) ; processing (DEFUN MAP-FORMS ...) ; processing (DEFUN MAP-LINES ...) ; processing (DEFUN COLLECT-FORMS ...) ; processing (DEFUN COLLECT-LINES ...) ; processing (DEFUN MAP-MATCHING-FILES ...) ; processing (DEFUN COMPILE-EXPRESSION ...) ; processing (DEFUN COLLECT-MATCHING-FILES ...) ; processing (DEFUN FILE-NEWER-THAN-FILE-P ...) ; processing (DEFUN PATHNAME-WITHOUT-NAME+TYPE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/metatilities-base/dev/l0-files-tmp135V1U5P.fasl ; compilation finished in 0:00:01.359 ; compiling file "/usr/share/common-lisp/source/metatilities-base/dev/l0-time.lisp" (written 30 MAR 2017 12:37:26 AM): ; processing (IN-PACKAGE #:METATILITIES) ; processing (DEFCONSTANT +MINUTES-PER-HOUR+ ...) ; processing (DEFCONSTANT +SECONDS-PER-MINUTE+ ...) ; processing (DEFCONSTANT +USUAL-DAYS-PER-YEAR+ ...) ; processing (DEFCONSTANT +SECONDS-PER-HOUR+ ...) ; processing (DEFCONSTANT +HOURS-PER-DAY+ ...) ; processing (DEFCONSTANT +SECONDS-PER-DAY+ ...) ; processing (DEFPARAMETER +DAYS-PER-MONTH+ ...) ; processing (EVAL-ALWAYS (DEFMACRO GENERATE-TIME-PART-FUNCTION ...) ...) ; processing (DEFUN DAYS-IN-MONTH ...) ; processing (DEFUN LEAP-YEAR-P ...) ; processing (DEFUN DAY-OF-YEAR ...) ; processing (DEFUN FORMAT-DATE ...) ; processing (DEFCONSTANT +LONGER-FORMAT-INDEX+ ...) ; processing (DEFCONSTANT +SHORTER-FORMAT-INDEX+ ...) ; processing (DEFPARAMETER +MONTH-OUTPUT-LIST+ ...) ; processing (DEFPARAMETER +DOW-OUTPUT-LIST ...) ; processing (DEFUN DAY->STRING ...) ; processing (DEFUN MONTH->STRING ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/metatilities-base/dev/l0-time-tmpCWE62HDI.fasl ; compilation finished in 0:00:01.511 ; compiling file "/usr/share/common-lisp/source/metatilities-base/dev/set-equal.lisp" (written 30 MAR 2017 12:37:26 AM): ; processing (IN-PACKAGE #:METATILITIES) ; processing (DEFUN SET-EQUAL ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/metatilities-base/dev/set-equal-tmpS0IX89E9.fasl ; compilation finished in 0:00:00.059 ; compiling file "/usr/share/common-lisp/source/metatilities-base/dev/generic-lisp.lisp" (written 30 MAR 2017 12:37:26 AM): ; processing (IN-PACKAGE #:METATILITIES) ; processing (DEFVAR *DEFAULT-INTERFACE* ...) ; processing (DEFUN DEFAULT-INTERFACE ...) ; processing (DEFUN (SETF DEFAULT-INTERFACE) ...) ; processing (DEFGENERIC IS-INTERFACE-AVAILABLE-P ...) ; processing (DEFMETHOD IS-INTERFACE-AVAILABLE-P ...) ; processing (DEFUN IS-DEFAULT-INTERFACE-AVAILABLE-P ...) ; processing (DEFGENERIC QUIT-LISP* ...) ; processing (DEFMETHOD QUIT-LISP* ...) ; processing (DEFUN QUIT-LISP ...) ; processing (DEFGENERIC TOTAL-BYTES-ALLOCATED* ...) ; processing (DEFUN TOTAL-BYTES-ALLOCATED ...) ; processing (DEFGENERIC GC-TIME* ...) ; processing (DEFUN GC-TIME ...) ; processing (DEFGENERIC COLLECT-GARBAGE* ...) ; processing (DEFUN COLLECT-GARBAGE ...) ; processing (DEFMACRO MAKE-LOAD-FORM* ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/metatilities-base/dev/generic-lisp-tmpYZNO705I.fasl ; compilation finished in 0:00:00.195 ; compiling file "/usr/share/common-lisp/source/metatilities-base/dev/generic-interface.lisp" (written 30 MAR 2017 12:37:26 AM): ; processing (IN-PACKAGE #:METATILITIES) ; processing (DECLAIM (SPECIAL *DEVELOPMENT-MODE* ...)) ; processing (DEFVAR *DEVELOPMENT-MODE* ...) ; processing (DEFVAR *USE-NATIVE-DEBUGGER* ...) ; processing (DEFVAR *DUMMY-PROGRESS-VARIABLE*) ; processing (DEFVAR *PROGRESS-BAR-COUNT* ...) ; processing (DEFMACRO WITH-PROGRESS-BAR ...) ; processing (DEFMACRO WITH-PROCESS-MESSAGE ...) ; processing (DEFMACRO HANDLE-ERRORS ...) ; processing (DEFMETHOD INTERFACE-BEEP* ...) ; processing (DEFUN INTERFACE-BEEP ...) ; processing (DEFMETHOD MAKE-PROGRESS-BAR ...) ; processing (DEFMETHOD PROGRESS-BAR-VALUE ...) ; processing (DEFMETHOD (SETF PROGRESS-BAR-VALUE) ...) ; processing (DEFMETHOD CLOSE-PROGRESS-BAR ...) ; processing (DEFMETHOD REPORT-CONDITION ...) ; processing (DEFMETHOD GUI-ERROR* ...) ; processing (DEFUN GUI-ERROR ...) ; processing (DEFMETHOD GUI-WARN* ...) ; processing (DEFUN GUI-WARN ...) ; processing (DEFMETHOD MAKE-COLOR** ...) ; processing (DEFUN MAKE-COLOR* ...) ; processing (DEFMETHOD MAKE-GRAY* ...) ; processing (DEFUN MAKE-GRAY ...) ; processing (DEFMETHOD MAKE-SCALED-COLOR* ...) ; processing (DEFUN MAKE-SCALED-COLOR ...) ; processing (DEFMETHOD Y-OR-N-QUESTION* ...) ; processing (DEFUN Y-OR-N-QUESTION ...) ; processing (DEFMETHOD CHOOSE-FILE-QUESTION* ...) ; processing (DEFUN CHOOSE-FILE-QUESTION ...) ; processing (DEFMETHOD CHOOSE-NEW-FILE-QUESTION* ...) ; processing (DEFUN CHOOSE-NEW-FILE-QUESTION ...) ; processing (DEFMETHOD CHOOSE-DIRECTORY-QUESTION* ...) ; processing (DEFUN CHOOSE-DIRECTORY-QUESTION ...) ; processing (DEFMETHOD CHOOSE-ITEM-QUESTION* ...) ; processing (DEFUN CHOOSE-ITEM-QUESTION ...) ; processing (DEFMETHOD CHOOSE-ITEM-FROM-PUP* ...) ; processing (DEFUN CHOOSE-ITEM-FROM-PUP ...) ; processing (DEFUN CHOOSE-ITEM-FROM-PUP-NO-SINGLETONS ...) ; processing (DEFMETHOD MAKE-UI-POINT* ...) ; processing (DEFUN MAKE-UI-POINT ...) ; processing (DEFMETHOD PROCESS-PARAMETERS* ...) ; processing (DEFUN PROCESS-PARAMETERS ...) ; processing (DEFMETHOD PUT-ITEM-ON-CLIPBOARD* ...) ; processing (DEFUN PUT-ITEM-ON-CLIPBOARD ...) ; processing (DEFMETHOD INSPECT-THING* ...) ; processing (DEFUN INSPECT-THING ...) ; processing (DEFUN INSPECT-THINGS ...) ; processing (DEFMETHOD SOUND-NOTE* ...) ; processing (DEFUN SOUND-NOTE ...) ; processing (DEFMETHOD STOP-NOTES* ...) ; processing (DEFUN STOP-NOTES ...) ; processing (DEFMETHOD SELECT-INSTRUMENT* ...) ; processing (DEFUN SELECT-INSTRUMENT ...) ; processing (DEFUN QUERY-USER-FOR-STRING ...) ; processing (DEFUN QUERY-USER-FOR-INTEGER ...) ; processing (DEFMETHOD PROMPT-FOR* ...) ; processing (DEFMETHOD PROMPT-FOR* ...) ; processing (DEFMETHOD PROMPT-FOR* ...) ; processing (DEFUN PROMPT-FOR ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/metatilities-base/dev/generic-interface-tmpZCDMKLMV.fasl ; compilation finished in 0:00:01.691 ; compiling file "/usr/share/common-lisp/source/metatilities-base/dev/defclass-star.lisp" (written 30 MAR 2017 12:37:26 AM): ; processing (IN-PACKAGE #:METATILITIES) ; processing (DEFVAR *AUTOMATIC-SLOT-ACCESSORS?* ...) ; processing (DEFVAR *AUTOMATIC-SLOT-INITARGS?* ...) ; processing (DEFVAR *CLOS-SLOT-OPTIONS* ...) ; processing (DEFVAR *PRUNE-UNKNOWN-SLOT-OPTIONS* ...) ; processing (DEFUN PARSE-BRIEF-SLOT ...) ; processing (DEFMACRO DEFCLASS-BRIEF ...) ; processing (DEFPARAMETER *DEFCLASS-COPY-CONDITION-FUNCTION* ...) ; processing (DEFVAR *DEFCLASS-GENERATE-MAKE-LOAD-FORM* ...) ; processing (DEFCLASS-PROPERTY DEFCLASS*-SUPERCLASSES) ; processing (DEFUN CLASS-COPYABLE-P ...) ; processing (DEFMACRO DEFCLASS* ...) ; processing (DEFPARAMETER *DEFCONDITION-OPTIONS* ...) ; processing (DEFMACRO DEFCONDITION ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/metatilities-base/dev/defclass-star-tmp8PPPCD7W.fasl ; compilation finished in 0:00:02.375 ; compiling file "/usr/share/common-lisp/source/metatilities-base/dev/copy-file.lisp" (written 30 MAR 2017 12:37:26 AM): ; processing (IN-PACKAGE #:METATILITIES) ; processing (EVAL-ALWAYS (EXPORT #)) ; processing (DEFINE-CONDITION SOURCE/TARGET-FILE-ERROR ...) ; processing (DEFINE-CONDITION SOURCE/TARGET-TARGET-ALREADY-EXISTS-ERROR ...) ; processing (DEFINE-CONDITION SOURCE/TARGET-SOURCE-DOES-NOT-EXIST-ERROR ...) ; processing (DEFUN COPY-FILE ...) ; processing (DEFUN MOVE-FILE ...) ; processing (DEFVAR *STREAM-BUFFER-SIZE* ...) ; processing (DEFUN COPY-STREAM ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/metatilities-base/dev/copy-file-tmp9XWMC5IU.fasl ; compilation finished in 0:00:00.359 ; compiling file "/usr/share/common-lisp/source/metabang-bind/dev/packages.lisp" (written 29 NOV 2017 02:36:43 AM): ; processing (IN-PACKAGE #:COMMON-LISP-USER) ; processing (DEFPACKAGE #:METABANG.BIND ...) ; processing (DEFPACKAGE #:METABANG.BIND.DEVELOPER ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/metabang-bind/dev/packages-tmpHZ96ZBZW.fasl ; compilation finished in 0:00:00.015 ; compiling file "/usr/share/common-lisp/source/metabang-bind/dev/macros.lisp" (written 29 NOV 2017 02:36:43 AM): ; processing (IN-PACKAGE #:METABANG.BIND) ; processing (DEFMETHOD DOCUMENTATION ...) ; processing (DEFUN BINDING-FORM-DOCSTRING ...) ; processing (DEFUN (SETF BINDING-FORM-DOCSTRING) ...) ; processing (DEFMACRO DEFBINDING-FORM ...) ; processing (DEFUN NEXT-VALUE ...) ; processing (DEFMACRO LAMBDA-BIND ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/metabang-bind/dev/macros-tmpBGQALD1G.fasl ; compilation finished in 0:00:00.839 ; compiling file "/usr/share/common-lisp/source/metabang-bind/dev/bind.lisp" (written 29 NOV 2017 02:36:43 AM): ; processing (IN-PACKAGE #:METABANG.BIND) ; processing (DEFCONSTANT +CODE-MARKER+ ...) ; processing (DEFCONSTANT +DECL-MARKER+ ...) ; processing (DEFGENERIC BINDING-FORM-ACCEPTS-MULTIPLE-FORMS-P ...) ; processing (DEFMETHOD BINDING-FORM-ACCEPTS-MULTIPLE-FORMS-P ...) ; processing (DEFPARAMETER *UNUSED-DECLARATIONS-BEHAVIOR* ...) ; processing (DEFPARAMETER *BIND-ALL-DECLARATIONS* ...) ; processing (DEFPARAMETER *BIND-NON-VAR-DECLARATIONS* ...) ; processing (DEFPARAMETER *BIND-SIMPLE-VAR-DECLARATIONS* ...) ; processing (DEFPARAMETER *BIND-LAMBDA-LIST-MARKERS* ...) ; processing (DEFINE-CONDITION SIMPLE-STYLE-WARNING ...) ; processing (DEFUN SIMPLE-STYLE-WARNING ...) ; processing (DEFINE-CONDITION BIND-MISSING-VALUE-FORM-WARNING ...) ; processing (DEFINE-CONDITION BIND-TOO-MANY-VALUE-FORMS-ERROR ...) ; processing (DEFINE-CONDITION BIND-ERROR ...) ; processing (DEFINE-CONDITION BIND-KEYWORD/OPTIONAL-NIL-WITH-DEFAULT-ERROR ...) ; processing (DEFINE-CONDITION BIND-UNUSED-DECLARATIONS-CONDITION ...) ; processing (DEFINE-CONDITION BIND-UNUSED-DECLARATIONS-WARNING ...) ; processing (DEFINE-CONDITION BIND-UNUSED-DECLARATIONS-ERROR ...) ; processing (DEFUN BINDING-FORMS ...) ; processing (DEFUN BINDING-FORM-GROUPS ...) ; processing (DEFUN BINDING-FORM-SYNONYMS ...) ; processing (DEFVAR *ALL-DECLARATIONS*) ; processing (DEFMACRO BIND ...) ; processing (DEFUN CHECK-FOR-UNUSED-VARIABLE-DECLARATIONS ...) ; processing (DEFUN BIND-MACRO-HELPER ...) ; processing (DEFUN VAR-IGNORABLE-P ...) ; processing (DEFUN MINT-IGNORABLE-VARIABLE ...) ; processing (DEFUN BIND-FIX-NILS ...) ; processing (DEFUN BIND-FIX-NILS-DESTRUCTURED ...) ; processing (DEFUN DOTTED-PAIR-P ...) ; processing (DEFMETHOD BIND-COLLECT-VARIABLES ...) ; processing (DEFUN BIND-GET-VARS-FROM-LAMBDA-LIST ...) ; processing (DEFUN BIND-EXPAND-DECLARATIONS ...) ; processing (DEFUN BIND-FILTER-DECLARATIONS ...) ; processing (DEFUN MERGE-BINDING-FORMS-P ...) ; processing (DEFUN MAP-TREE ...) ; processing (DEFUN TREE-FIND ...) ; processing (DEFMACRO FLUID-BIND ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/metabang-bind/dev/bind-tmp2DOYW25X.fasl ; compilation finished in 0:00:01.775 ; compiling file "/usr/share/common-lisp/source/metabang-bind/dev/binding-forms.lisp" (written 29 NOV 2017 02:36:43 AM): ; processing (IN-PACKAGE #:METABANG.BIND) ; processing (DEFGENERIC BIND-GENERATE-BINDINGS ...) ; processing (DEFBINDING-FORM (ARRAY :USE-VALUES-P ...) ...) ; processing (DEFBINDING-FORM (SYMBOL :USE-VALUES-P ...) ...) ; processing (DEFBINDING-FORM (:FLET :DOCSTRING ...) ...) ; processing (DEFBINDING-FORM (# :DOCSTRING ...) ...) ; processing (DEFBINDING-FORM (:LABELS :DOCSTRING ...) ...) ; processing (DEFBINDING-FORM (# :DOCSTRING ...) ...) ; processing (DEFBINDING-FORM (CONS :USE-VALUES-P ...) ...) ; processing (DEFBINDING-FORM (# :DOCSTRING ...) ...) ; processing (DEFBINDING-FORM (# :DOCSTRING ...) ...) ; processing (DEFBINDING-FORM (# :DOCSTRING ...) ...) ; processing (DEFUN FIND-TYPE-DECLARATION ...) ; processing (DEFBINDING-FORM (# :DOCSTRING ...) ...) ; processing (DEFBINDING-FORM (# :DOCSTRING ...) ...) ; processing (DEFBINDING-FORM (:SLOTS :DOCSTRING ...) ...) ; processing (DEFBINDING-FORM (# :DOCSTRING ...) ...) ; processing (DEFBINDING-FORM (# :DOCSTRING ...) ...) ; processing (DEFBINDING-FORM (# :DOCSTRING ...) ...) ; processing (DEFBINDING-FORM (:PLIST- :DOCSTRING ...) ...) ; processing (DEFUN HANDLE-PLIST ...) ; processing (DEFBINDING-FORM (:FILE :USE-VALUES-P ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/metabang-bind/dev/binding-forms-tmp9030DGPL.fasl ; compilation finished in 0:00:02.691 ; compiling file "/usr/share/common-lisp/source/dynamic-classes/dev/package.lisp" (written 21 DEC 2010 01:45:02 AM): ; processing (IN-PACKAGE #:COMMON-LISP-USER) ; processing (DEFPACKAGE #:METABANG-DYNAMIC-CLASSES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/dynamic-classes/dev/package-tmpU3EEB71F.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/dynamic-classes/dev/define-class.lisp" (written 21 DEC 2010 01:45:02 AM): ; processing (IN-PACKAGE #:METABANG-DYNAMIC-CLASSES) ; processing (DEFVAR *DEFINE-CLASS-FORM* ...) ; processing (DEFUN SIMPLE-DEFINE-CLASS ...) ; processing (DEFUN SIMPLE-DEFINE-CLASS-NAME ...) ; processing (DEFUN DEFINE-CLASS ...) ; processing (DEFUN MAP-SUBCLASSES ...) ; processing (DEFUN SUPERCLASSES ...) ; processing (DEFUN FIND-EXISTING-SUBCLASS ...) ; processing (DEFUN FIND-OR-CREATE-CLASS ...) ; processing (DEFUN REMOVE-REDUNDANT-CLASSES ...) ; processing (DEFUN CLASS-REDUNDANT-P ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/dynamic-classes/dev/define-class-tmpY35TOM58.fasl ; compilation finished in 0:00:00.387 ; compiling file "/usr/share/common-lisp/source/dynamic-classes/dev/dynamic-class.lisp" (written 21 DEC 2010 01:45:02 AM): ; processing (IN-PACKAGE #:METABANG-DYNAMIC-CLASSES) ; processing (DEFGENERIC INCLUDE-CLASS-DEPENDENCIES ...) ; processing (DEFGENERIC EXISTING-SUBCLASS ...) ; processing (DEFVAR *PARAMETER-DYNAMIC-CLASS-TABLE* ...) ; processing (DEFUN TYPE->PARAMETER-TABLE ...) ; processing (DEFUN (SETF TYPE->PARAMETER-TABLE) ...) ; processing (DEFUN PARAMETER->DYNAMIC-CLASS ...) ; processing (DEFUN (SETF PARAMETER->DYNAMIC-CLASS) ...) ; processing (DEFUN TABLE&PARAMETER->DYNAMIC-CLASS ...) ; processing (DEFUN ADD-PARAMETER->DYNAMIC-CLASS ...) ; processing (DEFUN ADD-DYNAMIC-CLASS-FOR-PARAMETERS ...) ; processing (DEFUN EMPTY-ADD-PARAMETER->DYNAMIC-CLASS ...) ; processing (DEFUN EMPTY-ALL-ADD-PARAMETER->DYNAMIC-CLASS ...) ; processing (DEFUN DYNAMIC-CLASS-INFORMATION ...) ; processing (DEFMETHOD INCLUDE-CLASS-DEPENDENCIES ...) ; processing (DEFMETHOD EXISTING-SUBCLASS ...) ; processing (DEFUN DETERMINE-DYNAMIC-CLASS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/dynamic-classes/dev/dynamic-class-tmp2N9C8E1O.fasl ; compilation finished in 0:00:00.427 ; compiling file "/usr/share/common-lisp/source/cl-containers/dev/package.lisp" (written 28 MAR 2017 01:15:31 AM): ; processing (IN-PACKAGE #:COMMON-LISP-USER) ; processing (DEFPACKAGE #:METABANG.CL-CONTAINERS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-containers/dev/package-tmpK6PVYHW5.fasl ; compilation finished in 0:00:00.039 ; compiling file "/usr/share/common-lisp/source/cl-containers/dev/conditions.lisp" (written 28 MAR 2017 01:15:31 AM): ; processing (IN-PACKAGE #:CL-CONTAINERS) ; processing (DEFCONDITION CONTAINER-CONDITION ...) ; processing (DEFCONDITION CONTAINER-ERROR ...) ; processing (DEFCONDITION INDEX-OUT-OF-RANGE-ERROR ...) ; processing (DEFINE-CONDITION KEY-DOES-NOT-EXIST-ERROR ...) ; processing (DEFINE-CONDITION QUEUE-EMPTY ...) ; processing (DEFINE-CONDITION RECORD-NOT-FOUND-ERROR ...) ; processing (DEFCONDITION ELEMENT-NOT-FOUND-ERROR ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-containers/dev/conditions-tmpQ4PVTQY4.fasl ; compilation finished in 0:00:00.115 ; compiling file "/usr/share/common-lisp/source/cl-containers/dev/container-api.lisp" (written 28 MAR 2017 01:15:31 AM): ; processing (IN-PACKAGE #:CONTAINERS) ; processing (DEFGENERIC SAMPLE-ELEMENTS ...) ; processing (DEFGENERIC SAMPLE-KEY ...) ; processing (DEFGENERIC SAMPLE-UNIQUE-ELEMENTS ...) ; processing (DEFGENERIC SAMPLE-ELEMENT ...) ; processing (DEFGENERIC SAMPLE-ITEM ...) ; processing (DEFGENERIC BEST-ITEM ...) ; processing (DEFGENERIC ARGMAX ...) ; processing (DEFGENERIC ARGMIN ...) ; processing (DEFGENERIC SIZE ...) ; processing (DEFGENERIC EMPTY! ...) ; processing (DEFGENERIC SOME-ITEM-P ...) ; processing (DEFGENERIC EVERY-ITEM-P ...) ; processing (DEFGENERIC MAKE-CONTAINER-FOR-CONTENTS ...) ; processing (DEFGENERIC NTH-ELEMENT ...) ; processing (DEFGENERIC NTH-ITEM ...) ; processing (DEFGENERIC ITEM-AT ...) ; processing (DEFGENERIC (SETF ITEM-AT) ...) ; processing (DEFGENERIC ITEM-AT! ...) ; processing (DEFGENERIC (SETF ITEM-AT-1) ...) ; processing (DEFGENERIC FIND-ITEM ...) ; processing (DEFGENERIC FIND-NODE ...) ; processing (DEFGENERIC FIND-ELEMENT ...) ; processing (DEFGENERIC SEARCH-FOR-ITEM ...) ; processing (DEFGENERIC SEARCH-FOR-MATCH ...) ; processing (DEFGENERIC ITERATE-NODES ...) ; processing (DEFGENERIC PRINT-CONTAINER ...) ; processing (DEFGENERIC COLLECT-NODES ...) ; processing (DEFGENERIC COLLECT-ELEMENTS ...) ; processing (DEFGENERIC COLLECT-KEY-VALUE ...) ; processing (DEFGENERIC COLLECT-KEYS ...) ; processing (DEFGENERIC ITERATE-VALUE-KEY ...) ; processing (DEFGENERIC (SETF FIRST-ELEMENT) ...) ; processing (DEFUN FIRST-ITEM ...) ; processing (DEFUN LAST-ITEM ...) ; processing (DEFGENERIC DELETE-FIRST ...) ; processing (DEFGENERIC DELETE-LAST ...) ; processing (DEFGENERIC INSERT-ITEM ...) ; processing (DEFGENERIC APPEND-ITEM ...) ; processing (DEFGENERIC INSERT-NEW-ITEM ...) ; processing (DEFGENERIC APPEND-NEW-ITEM ...) ; processing (DEFGENERIC INSERT-SEQUENCE ...) ; processing (DEFGENERIC INSERT-LIST ...) ; processing (DEFGENERIC DELETE-LIST ...) ; processing (DEFGENERIC REVERSE-FIND ...) ; processing (DEFGENERIC ENSURE-SORTED ...) ; processing (DEFGENERIC FORCE-SORT ...) ; processing (DEFGENERIC REMOVE-ITEMS-IF ...) ; processing (DEFGENERIC CONTAINER->ARRAY ...) ; processing (DEFGENERIC ELEMENT-POSITION ...) ; processing (DEFGENERIC REVERSE-CONTAINER ...) ; processing (DEFGENERIC UNIQUE-ELEMENTS ...) ; processing (DEFGENERIC UNIQUE-NODES ...) ; processing (DEFGENERIC ADD-DEFAULT-ITEM ...) ; processing (DEFGENERIC ADD-INITIAL-CONTENTS ...) ; processing (DEFGENERIC BEST-ELEMENT ...) ; processing (DEFGENERIC BEST-NODE ...) ; processing (DEFGENERIC BIGGEST-ITEM ...) ; processing (DEFGENERIC CHILDREN ...) ; processing (DEFGENERIC CLEAN-UP ...) ; processing (DEFGENERIC COLLECT-ELEMENTS-STABLY ...) ; processing (DEFGENERIC COLLECT-ITEMS ...) ; processing (DEFGENERIC COLLECT-KEY-VALUE-STABLY ...) ; processing (DEFGENERIC COMBINE-ELEMENTS ...) ; processing (DEFGENERIC CONTAINER-DIFFERENCE ...) ; processing (DEFGENERIC CONTAINER-DIMENSION ...) ; processing (DEFGENERIC COUNT-ELEMENTS ...) ; processing (DEFGENERIC COUNT-ELEMENTS-IF ...) ; processing (DEFGENERIC COUNT-ITEMS ...) ; processing (DEFGENERIC DELETE-BIGGEST-ITEM ...) ; processing (DEFGENERIC DELETE-ELEMENT ...) ; processing (DEFGENERIC DELETE-ITEM ...) ; processing (DEFGENERIC DELETE-ITEM-AFTER ...) ; processing (DEFGENERIC DELETE-ITEM-AT ...) ; processing (DEFGENERIC DELETE-ITEM-BEFORE ...) ; processing (DEFGENERIC DELETE-ITEM-IF ...) ; processing (DEFGENERIC DELETE-NODE ...) ; processing (DEFGENERIC DEQUEUE ...) ; processing (DEFGENERIC ENQUEUE ...) ; processing (DEFGENERIC ERROR-IF-QUEUE-EMPTY ...) ; processing (DEFGENERIC EVERY-ELEMENT-P ...) ; processing (DEFGENERIC EVERY-KEY-VALUE-P ...) ; processing (DEFGENERIC EXCHANGE-HEAP-NODES ...) ; processing (DEFGENERIC FIND-CHILD-NODE ...) ; processing (DEFGENERIC FIND-SET ...) ; processing (DEFGENERIC FIND-VALUE ...) ; processing (DEFGENERIC FIRST-ELEMENT ...) ; processing (DEFGENERIC GRAFT-NODES ...) ; processing (DEFGENERIC HAS-CHILDREN-P ...) ; processing (DEFGENERIC HEAP-NODE-PARENT ...) ; processing (DEFGENERIC HEAPIFY ...) ; processing (DEFGENERIC HEIGHT ...) ; processing (DEFGENERIC INCREMENT-END ...) ; processing (DEFGENERIC INITIALIZE-CONTAINER ...) ; processing (DEFGENERIC INORDER-WALK ...) ; processing (DEFGENERIC INORDER-WALK-NODES ...) ; processing (DEFGENERIC INSERT-ITEM-AFTER ...) ; processing (DEFGENERIC INSERT-ITEM-AT ...) ; processing (DEFGENERIC INSERT-ITEM-BEFORE ...) ; processing (DEFGENERIC INSERT-ITEM-ORDERED ...) ; processing (DEFGENERIC INSERT-ITEM-ORDERED-ABOUT-NODE ...) ; processing (DEFGENERIC ITEM-AT-1 ...) ; processing (DEFGENERIC ITEM-AT-1! ...) ; processing (DEFGENERIC ITEM-KEY ...) ; processing (DEFGENERIC ITERATE-CONTAINER ...) ; processing (DEFGENERIC ITERATE-ELEMENTS ...) ; processing (DEFGENERIC ITERATE-ELEMENTS-STABLY ...) ; processing (DEFGENERIC ITERATE-KEY-VALUE ...) ; processing (DEFGENERIC ITERATE-KEY-VALUE-STABLY ...) ; processing (DEFGENERIC ITERATE-KEYS ...) ; processing (DEFGENERIC ITERATE-LEFT ...) ; processing (DEFGENERIC ITERATE-LEFT-NODES ...) ; processing (DEFGENERIC ITERATE-NODES-ABOUT-NODE ...) ; processing (DEFGENERIC ITERATE-RIGHT ...) ; processing (DEFGENERIC ITERATE-RIGHT-NODES ...) ; processing (DEFGENERIC L-CHILD ...) ; processing (DEFGENERIC L-CHILD-INDEX ...) ; processing (DEFGENERIC LAST-ELEMENT ...) ; processing (DEFGENERIC (SETF LAST-ELEMENT) ...) ; processing (DEFGENERIC LEFT-AND-RIGHT-NODES-FOR-ITEM ...) ; processing (DEFGENERIC LEFT-NODE-FOR-ITEM ...) ; processing (DEFGENERIC LINK-NODES ...) ; processing (DEFGENERIC MAKE-INITIAL-ELEMENT ...) ; processing (DEFGENERIC MAKE-NODE-FOR-CONTAINER ...) ; processing (DEFGENERIC MAKE-SET ...) ; processing (DEFGENERIC NEXT-ITEM ...) ; processing (DEFGENERIC NODE-EMPTY-P ...) ; processing (DEFGENERIC NODE-PARENT-INDEX ...) ; processing (DEFGENERIC POP-ITEM ...) ; processing (DEFGENERIC POSTORDER-WALK ...) ; processing (DEFGENERIC POSTORDER-WALK-NODES ...) ; processing (DEFGENERIC PREDECESSOR ...) ; processing (DEFGENERIC PREORDER-WALK ...) ; processing (DEFGENERIC PREORDER-WALK-NODES ...) ; processing (DEFGENERIC PRINT-CONTAINER-CONTENTS ...) ; processing (DEFGENERIC PRINT-CONTAINER-SUMMARY ...) ; processing (DEFGENERIC PUSH-ITEM ...) ; processing (DEFGENERIC R-CHILD ...) ; processing (DEFGENERIC R-CHILD-INDEX ...) ; processing (DEFGENERIC RB-DELETE-FIXUP ...) ; processing (DEFGENERIC REDUCE-CONTAINER ...) ; processing (DEFGENERIC REDUCE-ELEMENTS ...) ; processing (DEFGENERIC REDUCE-NODES ...) ; processing (DEFGENERIC REPLACE-ITEM ...) ; processing (DEFGENERIC REPRESENTATIVE ...) ; processing (DEFGENERIC REPRESENTATIVE-NODE ...) ; processing (DEFGENERIC RIGHT-NODE-FOR-ITEM ...) ; processing (DEFGENERIC ROTATE-LEFT ...) ; processing (DEFGENERIC ROTATE-RIGHT ...) ; processing (DEFGENERIC SEARCH-FOR-ELEMENT ...) ; processing (DEFGENERIC SEARCH-FOR-KEY ...) ; processing (DEFGENERIC SEARCH-FOR-MATCHING-NODE ...) ; processing (DEFGENERIC SEARCH-FOR-NODE ...) ; processing (DEFGENERIC SEARCH-FOR-NODE* ...) ; processing (DEFGENERIC SET-DIRTY-FLAG ...) ; processing (DEFGENERIC SOME-ELEMENT-P ...) ; processing (DEFGENERIC SOME-KEY-VALUE-P ...) ; processing (DEFGENERIC SORT-CONTAINER ...) ; processing (DEFGENERIC SORT-ELEMENTS ...) ; processing (DEFGENERIC SORT-KEYS ...) ; processing (DEFGENERIC SORT-UPDATE-LEFT ...) ; processing (DEFGENERIC SORT-UPDATE-RIGHT ...) ; processing (DEFGENERIC SUCCESSOR ...) ; processing (DEFGENERIC TOTAL-SIZE ...) ; processing (DEFGENERIC UPDATE-ELEMENT ...) ; processing (DEFGENERIC UPDATE-ITEM ...) ; processing (DEFGENERIC WALK-TREE ...) ; processing (DEFGENERIC WALK-TREE-NODES ...) ; processing (DEFGENERIC (SETF PACKAGES) ...) ; processing (DEFGENERIC CONTAINER->LIST ...) ; processing (DEFGENERIC CURRENT-ITEM ...) ; processing (DEFGENERIC ITERATE-CHILDREN ...) ; processing (DEFGENERIC FIRST-NODE ...) ; processing (DEFGENERIC %OPERATE-AFTER-FINDING ...) ; processing (DEFGENERIC INSERT-INITIAL-CONTENTS-P ...) ; processing (DEFGENERIC ITERATABLE-P ...) ; processing (DEFGENERIC KEY-VALUE-ITERATABLE-P ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-containers/dev/container-api-tmpQ5W1BFSI.fasl ; compilation finished in 0:00:00.215 ; compiling file "/usr/share/common-lisp/source/cl-containers/dev/containers.lisp" (written 28 MAR 2017 01:15:31 AM): ; processing (IN-PACKAGE #:CONTAINERS) ; processing (DEFPARAMETER +EMPTY-INITIAL-ELEMENT+ ...) ; processing (DEFCLASS* ABSTRACT-CONTAINER ...) ; processing (DEFCLASS* CONCRETE-CONTAINER ...) ; processing (DEFCLASS* CONTAINER-NODE-MIXIN ...) ; processing (DEFCLASS* PARENT-NODE-MIXIN ...) ; processing (DEFCLASS* TWO-CHILD-NODE ...) ; processing (DEFCLASS* KEYED-CONTAINER-MIXIN ...) ; processing (DEFCLASS* TYPED-CONTAINER-MIXIN ...) ; processing (DEFCLASS* BOUNDED-CONTAINER-MIXIN ...) ; processing (DEFCLASS* INDEXED-CONTAINER-MIXIN ...) ; processing (DEFMETHOD (SETF ITEM-AT) ...) ; processing (DEFCLASS* INITIAL-ELEMENT-MIXIN ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFUN RETURN-EMPTY-INITIAL-ELEMENT ...) ; processing (DEFMETHOD MAKE-INITIAL-ELEMENT ...) ; processing (DEFCLASS* BASIC-INITIAL-CONTENTS-MIXIN ...) ; processing (DEFCLASS* INITIAL-CONTENTS-MIXIN ...) ; processing (DEFCLASS* INITIAL-CONTENTS-KEY-VALUE-MIXIN ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFCLASS* TEST-CONTAINER-MIXIN ...) ; processing (DEFCLASS* CONTAINER-USES-NODES-MIXIN ...) ; processing (DEFCLASS* FINDABLE-CONTAINER-MIXIN ...) ; processing (DEFCLASS* SEARCHABLE-CONTAINER-MIXIN ...) ; processing (DEFCLASS* ITERATABLE-CONTAINER-MIXIN ...) ; processing (DEFCLASS* KEY-VALUE-ITERATABLE-CONTAINER-MIXIN ...) ; processing (DEFMETHOD ITERATE-CONTAINER ...) ; processing (DEFMETHOD COLLECT-ITEMS ...) ; processing (DEFCLASS* I-KNOW-MY-NODE-MIXIN ...) ; processing (DEFMETHOD MAKE-NODE-FOR-CONTAINER ...) ; processing (DEFCLASS* NON-ASSOCIATIVE-CONTAINER-MIXIN ...) ; processing (DEFCLASS* UNORDERED-CONTAINER-MIXIN ...) ; processing (DEFCLASS* ORDERED-CONTAINER-MIXIN ...) ; processing (DEFCLASS* SORTED-CONTAINER-MIXIN ...) ; processing (DEFCLASS* CLASSIFIED-CONTAINER-MIXIN ...) ; processing (DEFCLASS* USES-CONTENTS-MIXIN ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COLLECT-ELEMENTS ...) ; processing (DEFMETHOD ITERATE-NODES ...) ; processing (DEFCLASS* CONTENTS-AS-SEQUENCE-MIXIN ...) ; processing (DEFCLASS* CONTENTS-AS-ARRAY-MIXIN ...) ; processing (DEFMETHOD SIZE ...) ; processing (DEFMETHOD TOTAL-SIZE ...) ; processing (DEFMETHOD INSERT-INITIAL-CONTENTS-P ...) ; processing (DEFMETHOD MAKE-CONTAINER-FOR-CONTENTS ...) ; processing (DEFCLASS* CONTENTS-AS-LIST-MIXIN ...) ; processing (DEFMETHOD MAKE-CONTAINER-FOR-CONTENTS ...) ; processing (DEFCLASS* LIST-CONTAINER ...) ; processing (DEFCLASS* CONTENTS-AS-HASHTABLE-MIXIN ...) ; processing (DEFCLASS* ASSOCIATIVE-CONTAINER-MIXIN ...) ; processing (DEFCLASS* ARRAY-CONTAINER-ABSTRACT ...) ; processing (DEFCLASS* ARRAY-CONTAINER ...) ; processing (DEFCLASS* SPARSE-ARRAY-CONTAINER ...) ; processing (DEFCLASS* SIMPLE-ASSOCIATIVE-CONTAINER ...) ; processing (DEFCLASS* ASSOCIATIVE-CONTAINER ...) ; processing (DEFCLASS* BIASSOCIATIVE-CONTAINER-MIXIN ...) ; processing (DEFCLASS* ALIST-CONTAINER ...) ; processing (DEFCLASS* STABLE-ASSOCIATIVE-CONTAINER ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFCLASS* ASSOCIATIVE-ARRAY ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD INSERT-INITIAL-CONTENTS-P ...) ; processing (DEFMETHOD ITERATABLE-P ...) ; processing (DEFMETHOD KEY-VALUE-ITERATABLE-P ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-containers/dev/containers-tmpKFZB7CG6.fasl ; compilation finished in 0:00:02.235 ; compiling file "/usr/share/common-lisp/source/cl-containers/dev/basic-operations.lisp" (written 28 MAR 2017 01:15:31 AM): ; processing (IN-PACKAGE #:CONTAINERS) ; processing (DEFGENERIC MAKE-CONTAINER ...) ; processing (DEFGENERIC EMPTY-P ...) ; processing (DEFMETHOD ITERATE-ELEMENTS ...) ; processing (DEFMETHOD ITERATE-ELEMENTS ...) ; processing (DEFMETHOD FIND-ELEMENT ...) ; processing (DEFMETHOD DELETE-ITEM ...) ; processing (DEFMETHOD DELETE-ELEMENT ...) ; processing (DEFMETHOD PRINT-CONTAINER ...) ; processing (DEFMETHOD NTH-ELEMENT ...) ; processing (DEFMETHOD NTH-ELEMENT ...) ; processing (DEFMETHOD COLLECT-NODES ...) ; processing (DEFMETHOD COLLECT-ELEMENTS ...) ; processing (DEFUN COLLECTOR-INTERNAL ...) ; processing (DEFMETHOD SEARCH-FOR-ITEM ...) ; processing (DEFMETHOD SEARCH-FOR-ELEMENT ...) ; processing (DEFMETHOD SEARCH-FOR-NODE ...) ; processing (DEFUN %SEARCH-IN-CONTAINER ...) ; processing (DEFMETHOD SEARCH-FOR-MATCH ...) ; processing (DEFUN %SEARCH-FOR-MATCH ...) ; processing (DEFMETHOD SEARCH-FOR-MATCHING-NODE ...) ; processing (DEFMETHOD SEARCH-FOR-NODE ...) ; processing (DEFMETHOD SEARCH-FOR-NODE ...) ; processing (DEFMETHOD SEARCH-FOR-NODE* ...) ; processing (DEFMETHOD SEARCH-FOR-NODE* ...) ; processing (DEFMETHOD BEST-ITEM ...) ; processing (DEFMETHOD BEST-ITEM ...) ; processing (DEFMETHOD BEST-NODE ...) ; processing (DEFMETHOD BEST-ELEMENT ...) ; processing (DEFUN %BEST-HELPER ...) ; processing (DEFMETHOD ARGMAX ...) ; processing (DEFMETHOD ARGMIN ...) ; processing (DEFMETHOD REDUCE-CONTAINER ...) ; processing (DEFMETHOD REDUCE-ELEMENTS ...) ; processing (DEFMETHOD REDUCE-NODES ...) ; processing (DEFUN REDUCE-INTERNAL ...) ; processing (DEFMETHOD DELETE-ITEM-IF ...) ; processing (DEFMETHOD FIRST-ELEMENT ...) ; processing (DEFMETHOD (SETF FIRST-ELEMENT) ...) ; processing (DEFMETHOD DELETE-ITEM ...) ; processing (DEFMETHOD DELETE-LIST ...) ; processing (DEFMETHOD INSERT-LIST ...) ; processing (DEFMETHOD INSERT-SEQUENCE ...) ; processing (DEFMETHOD INSERT-SEQUENCE ...) ; processing (DEFMETHOD INSERT-SEQUENCE ...) ; processing (DEFMETHOD INSERT-NEW-ITEM ...) ; processing (DEFMETHOD SUCCESSOR ...) ; processing (DEFMETHOD PREDECESSOR ...) ; processing (DEFMETHOD %OPERATE-AFTER-FINDING ...) ; processing (DEFMETHOD SIZE ...) ; processing (DEFMETHOD EMPTY-P ...) ; processing (DEFMETHOD SORT-ELEMENTS ...) ; processing (DEFMETHOD EMPTY! ...) ; processing (DEFMETHOD SEARCH-FOR-ITEM ...) ; processing (DEFMETHOD ITERATE-NODES ...) ; processing (DEFMETHOD FIND-ITEM ...) ; processing (DEFMETHOD SOME-ITEM-P ...) ; processing (DEFMETHOD EVERY-ITEM-P ...) ; processing (DEFMETHOD SOME-ELEMENT-P ...) ; processing (DEFMETHOD EVERY-ELEMENT-P ...) ; processing (DEFUN %EVERY-THING-P ...) ; processing (DEFUN %SOME-THING-P ...) ; processing (DEFMETHOD INSERT-ITEM ...) ; processing (DEFMETHOD APPEND-ITEM ...) ; processing (DEFMETHOD APPEND-NEW-ITEM ...) ; processing (DEFMETHOD EMPTY-P ...) ; processing (DEFMETHOD EMPTY! ...) ; processing (DEFMETHOD SEARCH-FOR-ITEM ...) ; processing (DEFMETHOD MAKE-CONTAINER-FOR-CONTENTS ...) ; processing (DEFMETHOD SIZE ...) ; processing (DEFMETHOD EMPTY! ...) ; processing (DEFMETHOD SEARCH-FOR-ITEM ...) ; processing (DEFMETHOD ITERATE-NODES ...) ; processing (DEFMETHOD ITERATE-KEYS ...) ; processing (DEFMETHOD COLLECT-KEY-VALUE ...) ; processing (DEFUN %COLLECT-KEY-VALUE ...) ; processing (DEFMETHOD FIND-ITEM ...) ; processing (DEFMETHOD REVERSE-FIND ...) ; processing (DEFMETHOD FIND-VALUE ...) ; processing (DEFMETHOD ITEM-AT! ...) ; processing (DEFMETHOD ADD-DEFAULT-ITEM ...) ; processing (DEFMETHOD ITEM-AT ...) ; processing (DEFMETHOD SIZE ...) ; processing (DEFMETHOD ITERATE-KEYS ...) ; processing (DEFMETHOD ITERATE-NODES ...) ; processing (DEFMETHOD ITERATE-ELEMENTS-STABLY ...) ; processing (DEFMETHOD ITERATE-KEY-VALUE ...) ; processing (DEFMETHOD COLLECT-KEYS ...) ; processing (DEFMETHOD ITERATE-KEY-VALUE-STABLY ...) ; processing (DEFMETHOD COLLECT-KEY-VALUE-STABLY ...) ; processing (DEFMETHOD COLLECT-ELEMENTS-STABLY ...) ; processing (DEFMETHOD EMPTY! ...) ; processing (DEFMETHOD ITEM-AT! ...) ; processing (DEFUN TUPLE-INDEX ...) ; processing (DEFMETHOD ITEM-AT ...) ; processing (DEFMETHOD ITERATE-NODES ...) ; processing (DEFMETHOD CONTAINER-DIMENSION ...) ; processing (DEFMETHOD DIMENSIONS ...) ; processing (DEFMETHOD FIND-ITEM ...) ; processing (DEFMETHOD INSERT-ITEM ...) ; processing (DEFUN COLLECT-USING ...) ; processing (DEFUN COUNT-USING ...) ; processing (DEFMETHOD CONTAINER-DIFFERENCE ...) ; processing (DEFUN ASSOCIATIVE-CONTAINER-P ...) ; processing (DEFMETHOD ADD-INITIAL-CONTENTS ...) ; processing (DEFMETHOD ADD-INITIAL-CONTENTS ...) ; processing (DEFUN ADD-INITIAL-CONTENTS-INTERNAL ...) ; processing (DEFMETHOD ADD-INITIAL-CONTENTS ...) ; processing (DEFMETHOD ELEMENT-POSITION ...) ; processing (DEFMETHOD ELEMENT-POSITION ...) ; processing (DEFMETHOD SAMEP ...) ; processing (DEFMETHOD SAMEP ...) ; processing (DEFMETHOD SAMEP ...) ; processing (DEFMETHOD SAMEP ...) ; processing (DEFMETHOD REVERSE-CONTAINER ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-containers/dev/basic-operations-tmpEBQXHK8C.fasl ; compilation finished in 0:00:06.963 ; compiling file "/usr/share/common-lisp/source/cl-containers/dev/queues.lisp" (written 28 MAR 2017 01:15:31 AM): ; processing (IN-PACKAGE #:CONTAINERS) ; processing (DEFCLASS* ABSTRACT-QUEUE ...) ; processing (DEFMETHOD ENQUEUE ...) ; processing (DEFMETHOD DEQUEUE ...) ; processing (DEFMETHOD EMPTY! ...) ; processing (DEFMETHOD FIRST-ELEMENT ...) ; processing (DEFMETHOD DELETE-FIRST ...) ; processing (DEFMETHOD ERROR-IF-QUEUE-EMPTY ...) ; processing (DEFCLASS* PRIORITY-QUEUE-ON-CONTAINER ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD INSERT-ITEM ...) ; processing (DEFMETHOD DELETE-FIRST ...) ; processing (DEFMETHOD EMPTY-P ...) ; processing (DEFMETHOD EMPTY! ...) ; processing (DEFMETHOD SIZE ...) ; processing (DEFMETHOD FIRST-ELEMENT ...) ; processing (DEFMETHOD (SETF FIRST-ELEMENT) ...) ; processing (DEFMETHOD FIND-ITEM ...) ; processing (DEFMETHOD FIND-NODE ...) ; processing (DEFMETHOD FIND-ELEMENT ...) ; processing (DEFMETHOD DELETE-ITEM ...) ; processing (DEFMETHOD DELETE-NODE ...) ; processing (DEFMETHOD DELETE-ELEMENT ...) ; processing (DEFMETHOD DELETE-ITEM-IF ...) ; processing (DEFMETHOD ITERATE-NODES ...) ; processing (DEFMETHOD ITERATE-ELEMENTS ...) ; processing (DEFCLASS* BASIC-QUEUE ...) ; processing (DEFUN FRONT-OF-QUEUE ...) ; processing (DEFUN FRONT-OF-QUEUE! ...) ; processing (DEFSETF FRONT-OF-QUEUE ...) ; processing (DEFUN TAIL-OF-QUEUE ...) ; processing (DEFUN TAIL-OF-QUEUE! ...) ; processing (DEFSETF TAIL-OF-QUEUE ...) ; processing (DEFMETHOD INSERT-ITEM ...) ; file: /usr/share/common-lisp/source/cl-containers/dev/queues.lisp ; in: DEFMETHOD INSERT-ITEM (BASIC-QUEUE T) ; (DEFMETHOD METABANG.CL-CONTAINERS:INSERT-ITEM ; ((METABANG.CL-CONTAINERS::Q METABANG.CL-CONTAINERS:BASIC-QUEUE) ; (METABANG.CL-CONTAINERS::ITEM T)) ; "Add an item to the queue." ; (LET ((METABANG.CL-CONTAINERS::NEW-ITEM ; (LIST METABANG.CL-CONTAINERS::ITEM))) ; (COND ; ((METABANG.CL-CONTAINERS:EMPTY-P METABANG.CL-CONTAINERS::Q) (SETF #)) ; (T (SETF #)))) ; METABANG.CL-CONTAINERS::Q) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; ==> ; (SB-PCL::LOAD-DEFMETHOD 'STANDARD-METHOD 'METABANG.CL-CONTAINERS:INSERT-ITEM ; 'NIL ; (LIST ; (FIND-CLASS 'METABANG.CL-CONTAINERS:BASIC-QUEUE) ; (FIND-CLASS 'T)) ; '(METABANG.CL-CONTAINERS::Q ; METABANG.CL-CONTAINERS::ITEM) ; (LIST* :FUNCTION ; (LET* ((SB-PCL::FMF #) (SB-PCL::MF #)) ; (SETF # #) ; SB-PCL::MF) ; '(SB-PCL::PLIST (:ARG-INFO (2)) ; SB-PCL::SIMPLE-NEXT-METHOD-CALL T ; :DOCUMENTATION "Add an item to the queue.")) ; (SB-C:SOURCE-LOCATION)) ; ; caught STYLE-WARNING: ; Call to METABANG.CL-CONTAINERS::TAIL-OF-QUEUE could not be inlined because its ; source code was not saved. A global INLINE or SB-EXT:MAYBE-INLINE proclamation ; must be in effect to save function definitions for inlining. ; ; caught STYLE-WARNING: ; Call to METABANG.CL-CONTAINERS::TAIL-OF-QUEUE! could not be inlined because its ; source code was not saved. A global INLINE or SB-EXT:MAYBE-INLINE proclamation ; must be in effect to save function definitions for inlining. ; processing (DEFMETHOD DELETE-FIRST ...) ; file: /usr/share/common-lisp/source/cl-containers/dev/queues.lisp ; in: DEFMETHOD DELETE-FIRST (BASIC-QUEUE) ; (DEFMETHOD METABANG.CL-CONTAINERS:DELETE-FIRST ; ((METABANG.CL-CONTAINERS::Q METABANG.CL-CONTAINERS:BASIC-QUEUE)) ; (LET ((METABANG.CL-CONTAINERS::RESULT ; (METABANG.CL-CONTAINERS::FRONT-OF-QUEUE METABANG.CL-CONTAINERS::Q))) ; (SETF (METABANG.CL-CONTAINERS::FRONT-OF-QUEUE METABANG.CL-CONTAINERS::Q) ; (CDR METABANG.CL-CONTAINERS::RESULT) ; METABANG.CL-CONTAINERS::RESULT ; (FIRST METABANG.CL-CONTAINERS::RESULT)) ; (WHEN ; (NULL ; (METABANG.CL-CONTAINERS::FRONT-OF-QUEUE METABANG.CL-CONTAINERS::Q)) ; (METABANG.CL-CONTAINERS:EMPTY! METABANG.CL-CONTAINERS::Q)) ; METABANG.CL-CONTAINERS::RESULT)) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; ==> ; (SB-PCL::LOAD-DEFMETHOD 'STANDARD-METHOD 'METABANG.CL-CONTAINERS:DELETE-FIRST ; 'NIL ; (LIST ; (FIND-CLASS 'METABANG.CL-CONTAINERS:BASIC-QUEUE)) ; '(METABANG.CL-CONTAINERS::Q) ; (LIST* :FUNCTION ; (LET* ((SB-PCL::FMF #) (SB-PCL::MF #)) ; (SETF # #) ; SB-PCL::MF) ; '(SB-PCL::PLIST (:ARG-INFO (1)) ; SB-PCL::SIMPLE-NEXT-METHOD-CALL T)) ; (SB-C:SOURCE-LOCATION)) ; ; caught STYLE-WARNING: ; Call to METABANG.CL-CONTAINERS::FRONT-OF-QUEUE could not be inlined because its ; source code was not saved. A global INLINE or SB-EXT:MAYBE-INLINE proclamation ; must be in effect to save function definitions for inlining. ; ; caught STYLE-WARNING: ; Call to METABANG.CL-CONTAINERS::FRONT-OF-QUEUE! could not be inlined because ; its source code was not saved. A global INLINE or SB-EXT:MAYBE-INLINE ; proclamation must be in effect to save function definitions for inlining. ; processing (DEFMETHOD EMPTY-P ...) ; processing (DEFMETHOD ITERATE-NODES ...) ; processing (DEFMETHOD SIZE ...) ; processing (DEFMETHOD FIRST-ELEMENT ...) ; processing (DEFMETHOD (SETF FIRST-ELEMENT) ...) ; processing (DEFMETHOD EMPTY! ...) ; processing (DEFMETHOD DELETE-ITEM ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-containers/dev/queues-tmpWFVO1741.fasl ; compilation finished in 0:00:01.723 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/cl-containers/dev/stacks.lisp" (written 28 MAR 2017 01:15:31 AM): ; processing (IN-PACKAGE #:CONTAINERS) ; processing (DEFCLASS* ABSTRACT-STACK ...) ; processing (DEFMETHOD (SETF FIRST-ELEMENT) ...) ; processing (DEFMETHOD PUSH-ITEM ...) ; processing (DEFCLASS* STACK-CONTAINER ...) ; processing (DEFMETHOD MAKE-CONTAINER-FOR-CONTENTS ...) ; processing (DEFMETHOD FIRST-ELEMENT ...) ; processing (DEFMETHOD (SETF FIRST-ELEMENT) ...) ; processing (DEFMETHOD POP-ITEM ...) ; processing (DEFMETHOD INSERT-ITEM ...) ; processing (DEFMETHOD SIZE ...) ; processing (DEFMETHOD EMPTY-P ...) ; processing (DEFMETHOD EMPTY! ...) ; processing (DEFMETHOD SEARCH-FOR-ITEM ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-containers/dev/stacks-tmpEGBHF4JG.fasl ; compilation finished in 0:00:00.411 ; compiling file "/usr/share/common-lisp/source/cl-containers/dev/vectors.lisp" (written 28 MAR 2017 01:15:31 AM): ; processing (IN-PACKAGE #:CONTAINERS) ; processing (DEFCLASS* VECTOR-CONTAINER-MIXIN ...) ; processing (DEFMETHOD ITEM-AT ...) ; file: /usr/share/common-lisp/source/cl-containers/dev/vectors.lisp ; in: DEFMETHOD ITEM-AT (VECTOR-CONTAINER-MIXIN) ; (FIRST METABANG.CL-CONTAINERS::INDICES) ; ; caught STYLE-WARNING: ; This is not a (MOD 4611686018427387901): ; NIL ; See also: ; The SBCL Manual, Node "Handling of Types" ; processing (DEFMETHOD ITEM-AT! ...) ; file: /usr/share/common-lisp/source/cl-containers/dev/vectors.lisp ; in: DEFMETHOD ITEM-AT! (VECTOR-CONTAINER-MIXIN T) ; (FIRST METABANG.CL-CONTAINERS::INDICES) ; ; caught STYLE-WARNING: ; This is not a (MOD 4611686018427387901): ; NIL ; See also: ; The SBCL Manual, Node "Handling of Types" ; processing (DEFMETHOD NTH-ELEMENT ...) ; processing (DEFMETHOD FIRST-ELEMENT ...) ; processing (DEFMETHOD (SETF FIRST-ELEMENT) ...) ; processing (DEFMETHOD LAST-ELEMENT ...) ; processing (DEFMETHOD (SETF LAST-ELEMENT) ...) ; processing (DEFCLASS* BASIC-VECTOR-CONTAINER ...) ; processing (DEFCLASS* BOUNDED-VECTOR-CONTAINER ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFCLASS* VECTOR-CONTAINER ...) ; processing (DEFMETHOD INSERT-ITEM ...) ; processing (DEFMETHOD INSERT-ITEM-AT ...) ; processing (DEFMETHOD DELETE-ITEM-AT ...) ; processing (DEFMETHOD DELETE-ITEM ...) ; processing (DEFMETHOD DELETE-FIRST ...) ; processing (DEFMETHOD DELETE-LAST ...) ; processing (DEFMETHOD SIZE ...) ; processing (DEFCLASS* FLEXIBLE-VECTOR-CONTAINER ...) ; processing (DEFMETHOD ITEM-AT! ...) ; file: /usr/share/common-lisp/source/cl-containers/dev/vectors.lisp ; in: DEFMETHOD ITEM-AT! :BEFORE (FLEXIBLE-VECTOR-CONTAINER T) ; (FIRST METABANG.CL-CONTAINERS::INDICES) ; ; caught STYLE-WARNING: ; This is not a NUMBER: ; NIL ; See also: ; The SBCL Manual, Node "Handling of Types" ; processing (DEFUN RESIZE-VECTOR ...) ; processing (DEFMETHOD SAMEP ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-containers/dev/vectors-tmpDMKZ90UH.fasl ; compilation finished in 0:00:01.023 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/cl-containers/dev/trees.lisp" (written 28 MAR 2017 01:15:31 AM): ; processing (IN-PACKAGE #:CONTAINERS) ; processing (DEFCLASS* ABSTRACT-TREE-CONTAINER ...) ; processing (DEFCLASS* ROOTED-TREE-CONTAINER ...) ; processing (DEFCLASS* MANY-CHILD-NODE ...) ; processing (DEFMETHOD ITERATE-CHILDREN ...) ; processing (DEFMETHOD HAS-CHILDREN-P ...) ; processing (DEFMETHOD FIND-CHILD-NODE ...) ; processing (DEFCLASS* MANY-ORDERED-CHILD-NODE ...) ; processing (DEFMETHOD CHILDREN ...) ; processing (DEFCLASS* MANY-UNORDERED-CHILD-NODE ...) ; processing (DEFCLASS* BINARY-SEARCH-TREE ...) ; processing (DEFCLASS* BST-NODE ...) ; processing (DEFMETHOD MAKE-NODE-FOR-CONTAINER ...) ; processing (DEFMETHOD NODE-EMPTY-P ...) ; processing (DEFMETHOD NODE-EMPTY-P ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFMETHOD SIZE ...) ; processing (DEFMETHOD SIZE ...) ; processing (DEFMETHOD EMPTY-P ...) ; processing (DEFMETHOD EMPTY! ...) ; processing (DEFMETHOD FIND-ITEM ...) ; processing (DEFMETHOD FIND-SUCCESSOR-ITEM ...) ; processing (DEFMETHOD FIND-NODE ...) ; processing (DEFMETHOD FIND-SUCCESSOR-NODE ...) ; processing (DEFMETHOD FIRST-ELEMENT ...) ; processing (DEFMETHOD FIRST-NODE ...) ; processing (DEFMETHOD (SETF FIRST-ELEMENT) ...) ; processing (DEFMETHOD FIRST-ELEMENT ...) ; processing (DEFMETHOD FIRST-NODE ...) ; processing (DEFMETHOD (SETF FIRST-ELEMENT) ...) ; processing (DEFMETHOD LAST-ELEMENT ...) ; processing (DEFMETHOD LAST-NODE ...) ; processing (DEFMETHOD LAST-NODE ...) ; processing (DEFMETHOD LAST-ELEMENT ...) ; processing (DEFMETHOD (SETF LAST-ELEMENT) ...) ; processing (DEFMETHOD (SETF LAST-ELEMENT) ...) ; processing (DEFMETHOD SUCCESSOR ...) ; processing (DEFMETHOD PREDECESSOR ...) ; processing (DEFMETHOD INSERT-ITEM ...) ; processing (DEFMETHOD DELETE-NODE ...) ; processing (DEFMETHOD DELETE-NODE ...) ; processing (DEFMETHOD DELETE-ITEM ...) ; processing (DEFMETHOD DELETE-ITEM ...) ; processing (DEFMETHOD DELETE-ITEM-IF ...) ; processing (DEFMETHOD ITERATE-NODES ...) ; processing (DEFMETHOD INORDER-WALK ...) ; processing (DEFMETHOD PREORDER-WALK ...) ; processing (DEFMETHOD POSTORDER-WALK ...) ; processing (DEFMETHOD INORDER-WALK-NODES ...) ; processing (DEFMETHOD PREORDER-WALK-NODES ...) ; processing (DEFMETHOD POSTORDER-WALK-NODES ...) ; processing (DEFMETHOD WALK-TREE ...) ; processing (DEFMETHOD WALK-TREE ...) ; processing (DEFMETHOD WALK-TREE-NODES ...) ; processing (DEFMETHOD WALK-TREE-NODES ...) ; processing (DEFCONSTANT +RBT-COLOR-BLACK+ ...) ; processing (DEFCONSTANT +RBT-COLOR-RED+ ...) ; processing (DEFCLASS RBT-EMPTY-NODE ...) ; processing (DEFCLASS* RED-BLACK-TREE ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFCLASS* RED-BLACK-NODE ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD NODE-EMPTY-P ...) ; processing (DEFMETHOD MAKE-NODE-FOR-CONTAINER ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFMETHOD ROTATE-LEFT ...) ; processing (DEFMETHOD ROTATE-RIGHT ...) ; processing (DEFMETHOD INSERT-ITEM ...) ; processing (DEFMETHOD DELETE-NODE ...) ; processing (DEFMETHOD RB-DELETE-FIXUP ...) ; processing (DEFMETHOD WALK-TREE-NODES ...) ; processing (DEFMETHOD WALK-TREE ...) ; processing (DEFMETHOD HEIGHT ...) ; processing (DEFMETHOD HEIGHT ...) ; processing (DEFMETHOD ITEM-AT ...) ; processing (DEFMETHOD UPDATE-ELEMENT ...) ; processing (DEFGENERIC BST-NODE-IS-LEFT-CHILD ...) ; processing (DEFGENERIC BST-NODE-IS-RIGHT-CHILD ...) ; processing (DEFGENERIC BST-NODE-SET-RIGHT-CHILD ...) ; processing (DEFGENERIC BST-NODE-SET-LEFT-CHILD ...) ; processing (DEFGENERIC BST-NODE-REPLACE-CHILD ...) ; processing (DEFCLASS* SPLAY-TREE ...) ; processing (DEFGENERIC SPLAY-TREE-ROTATE ...) ; processing (DEFGENERIC SPLAY-TREE-SPLAY ...) ; processing (DEFMETHOD INSERT-ITEM ...) ; processing (DEFMETHOD ITEM-AT ...) ; processing (DEFMETHOD UPDATE-ELEMENT ...) ; processing (DEFMETHOD FIND-ITEM ...) ; processing (DEFGENERIC RIGHT-MOST-CHILD ...) ; processing (DEFMETHOD DELETE-NODE ...) ; processing (DEFMETHOD DELETE-ITEM ...) ; processing (DEFMETHOD DELETE-ITEM-AT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-containers/dev/trees-tmpI4CB9XP0.fasl ; compilation finished in 0:00:00.475 ; compiling file "/usr/share/common-lisp/source/cl-containers/dev/lists.lisp" (written 28 MAR 2017 01:15:31 AM): ; processing (IN-PACKAGE #:CONTAINERS) ; processing (DEFMETHOD INSERT-LIST ...) ; processing (DEFMETHOD FIRST-ELEMENT ...) ; processing (DEFMETHOD (SETF FIRST-ELEMENT) ...) ; processing (DEFMETHOD DELETE-ITEM ...) ; processing (DEFMETHOD FIND-ITEM ...) ; processing (DEFMETHOD DELETE-FIRST ...) ; processing (DEFMETHOD NTH-ELEMENT ...) ; processing (DEFMETHOD ITEM-AT ...) ; file: /usr/share/common-lisp/source/cl-containers/dev/lists.lisp ; in: DEFMETHOD ITEM-AT (LIST-CONTAINER) ; (FIRST METABANG.CL-CONTAINERS::INDEXES) ; ; caught STYLE-WARNING: ; This is not a (MOD 4611686018427387901): ; NIL ; See also: ; The SBCL Manual, Node "Handling of Types" ; processing (DEFMETHOD PRINT-CONTAINER ...) ; processing (DEFMETHOD LAST-ELEMENT ...) ; processing (DEFMETHOD (SETF LAST-ELEMENT) ...) ; processing (DEFCLASS* SORTED-LIST-CONTAINER ...) ; processing (DEFMETHOD SET-DIRTY-FLAG ...) ; processing (DEFMETHOD CLEAN-UP ...) ; processing (DEFMETHOD INSERT-LIST ...) ; processing (DEFMETHOD INSERT-ITEM ...) ; processing (DEFMETHOD DELETE-ITEM ...) ; processing (DEFMETHOD FIRST-ELEMENT ...) ; processing (DEFMETHOD (SETF FIRST-ELEMENT) ...) ; processing (DEFMETHOD DELETE-FIRST ...) ; processing (DEFMETHOD ITEM-AT ...) ; file: /usr/share/common-lisp/source/cl-containers/dev/lists.lisp ; in: DEFMETHOD ITEM-AT (SORTED-LIST-CONTAINER) ; (FIRST METABANG.CL-CONTAINERS::INDEXES) ; ; caught STYLE-WARNING: ; This is not a (MOD 4611686018427387901): ; NIL ; See also: ; The SBCL Manual, Node "Handling of Types" ; processing (DEFMETHOD PRINT-CONTAINER ...) ; processing (DEFMETHOD ITERATE-NODES ...) ; processing (DEFMETHOD COLLECT-ELEMENTS ...) ; processing (DEFMETHOD ENSURE-SORTED ...) ; processing (DEFMETHOD FORCE-SORT ...) ; processing (DEFCLASS* DLIST-CONTAINER-NODE ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFCLASS* DLIST-CONTAINER ...) ; processing (DEFMETHOD MAKE-NODE-FOR-CONTAINER ...) ; processing (DEFMETHOD EMPTY! ...) ; processing (DEFMETHOD INSERT-ITEM ...) ; processing (DEFMETHOD INSERT-ITEM-AFTER ...) ; processing (DEFMETHOD INSERT-ITEM-AFTER ...) ; processing (DEFMETHOD INSERT-ITEM-AFTER ...) ; processing (DEFMETHOD INSERT-ITEM-AFTER ...) ; processing (DEFMETHOD INSERT-ITEM-BEFORE ...) ; processing (DEFMETHOD INSERT-ITEM-BEFORE ...) ; processing (DEFMETHOD INSERT-ITEM-BEFORE ...) ; processing (DEFMETHOD DELETE-ITEM-AFTER ...) ; processing (DEFMETHOD DELETE-ITEM-BEFORE ...) ; processing (DEFMETHOD DELETE-ITEM ...) ; processing (DEFMETHOD DELETE-ITEM ...) ; processing (DEFMETHOD ITERATE-NODES ...) ; processing (DEFMETHOD ITEM-AT ...) ; file: /usr/share/common-lisp/source/cl-containers/dev/lists.lisp ; in: DEFMETHOD ITEM-AT (DLIST-CONTAINER) ; (FIRST METABANG.CL-CONTAINERS::INDEXES) ; ; caught STYLE-WARNING: ; The binding of SB-C::X is not a REAL: ; NIL ; See also: ; The SBCL Manual, Node "Handling of Types" ; ; caught STYLE-WARNING: ; The binding of NUMBER is not a REAL: ; NIL ; See also: ; The SBCL Manual, Node "Handling of Types" ; processing (DEFMETHOD REPLACE-ITEM ...) ; processing (DEFMETHOD REPLACE-ITEM ...) ; processing (DEFMETHOD SUCCESSOR ...) ; processing (DEFMETHOD PREDECESSOR ...) ; processing (DEFCLASS* SORTED-DLIST-CONTAINER ...) ; processing (DEFMETHOD ITERATE-NODES-ABOUT-NODE ...) ; processing (DEFMETHOD ITERATE-NODES-ABOUT-NODE ...) ; processing (DEFMETHOD ITERATE-NODES-ABOUT-NODE ...) ; processing (DEFMETHOD INSERT-ITEM ...) ; processing (DEFMETHOD INSERT-ITEM-ORDERED-ABOUT-NODE ...) ; file: /usr/share/common-lisp/source/cl-containers/dev/lists.lisp ; in: ; DEFMETHOD INSERT-ITEM-ORDERED-ABOUT-NODE (SORTED-DLIST-CONTAINER ; DLIST-CONTAINER-NODE ; DLIST-CONTAINER-NODE) ; (WITH-SLOTS (METABANG.CL-CONTAINERS::KEY METABANG.CL-CONTAINERS::SORTER ; METABANG.CL-CONTAINERS::TEST) ; LIST ; (LET ((METABANG.CL-CONTAINERS::NEW-KEY ; (FUNCALL METABANG.CL-CONTAINERS::KEY #))) ; (IF (AND ; (METABANG.CL-CONTAINERS:PREVIOUS-ITEM METABANG.CL-CONTAINERS::NODE) ; (FUNCALL METABANG.CL-CONTAINERS::SORTER ; METABANG.CL-CONTAINERS::NEW-KEY #)) ; (METABANG.CL-CONTAINERS:ITERATE-LEFT-NODES LIST ; METABANG.CL-CONTAINERS::NODE ; (LAMBDA # #)) ; (METABANG.CL-CONTAINERS:ITERATE-RIGHT-NODES LIST ; METABANG.CL-CONTAINERS::NODE ; (LAMBDA # #))))) ; --> LET SYMBOL-MACROLET LET IF METABANG.CL-CONTAINERS:ITERATE-RIGHT-NODES ; --> LAMBDA FUNCTION LET ; ==> ; (FUNCALL ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G3 'METABANG.CL-CONTAINERS::KEY) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G3 ; 'METABANG.CL-CONTAINERS::KEY)) ; (METABANG.UTILITIES:ELEMENT METABANG.CL-CONTAINERS::N)) ; ; note: could not stack allocate: ; (WITH-SLOTS (KEY SORTER TEST) ; LIST ; (LET ((NEW-KEY (FUNCALL KEY (ELEMENT NEW-NODE)))) ; (IF (AND (PREVIOUS-ITEM NODE) ; (FUNCALL SORTER NEW-KEY ; (FUNCALL KEY (ELEMENT (PREVIOUS-ITEM NODE))))) ; (ITERATE-LEFT-NODES LIST NODE ; (LAMBDA (N) ; (LET ((CURRENT-KEY ; (FUNCALL KEY (ELEMENT N)))) ; (DECLARE (DYNAMIC-EXTENT CURRENT-KEY)) ; (COND ; ((FUNCALL TEST (ELEMENT NEW-NODE) ; (ELEMENT N)) ; (RETURN-FROM ; INSERT-ITEM-ORDERED-ABOUT-NODE ; LIST)) ; ((NOT ; (FUNCALL SORTER NEW-KEY CURRENT-KEY)) ; (INSERT-ITEM-AFTER LIST N NEW-NODE) ; (RETURN-FROM ; INSERT-ITEM-ORDERED-ABOUT-NODE ; LIST)))))) ; (ITERATE-RIGHT-NODES LIST NODE ; (LAMBDA (N) ; (LET ((CURRENT-KEY ; (FUNCALL KEY (ELEMENT N)))) ; (DECLARE (DYNAMIC-EXTENT CURRENT-KEY)) ; (COND ; ((FUNCALL TEST (ELEMENT NEW-NODE) ; (ELEMENT N)) ; (RETURN-FROM ; INSERT-ITEM-ORDERED-ABOUT-NODE ; LIST)) ; ((FUNCALL SORTER NEW-KEY CURRENT-KEY) ; (INSERT-ITEM-BEFORE LIST N NEW-NODE) ; (RETURN-FROM ; INSERT-ITEM-ORDERED-ABOUT-NODE ; LIST))))))))) ; --> LET SYMBOL-MACROLET LET IF METABANG.CL-CONTAINERS:ITERATE-LEFT-NODES ; --> LAMBDA FUNCTION LET ; ==> ; (FUNCALL ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G3 'METABANG.CL-CONTAINERS::KEY) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G3 ; 'METABANG.CL-CONTAINERS::KEY)) ; (METABANG.UTILITIES:ELEMENT METABANG.CL-CONTAINERS::N)) ; ; note: could not stack allocate: ; (WITH-SLOTS (KEY SORTER TEST) ; LIST ; (LET ((NEW-KEY (FUNCALL KEY (ELEMENT NEW-NODE)))) ; (IF (AND (PREVIOUS-ITEM NODE) ; (FUNCALL SORTER NEW-KEY ; (FUNCALL KEY (ELEMENT (PREVIOUS-ITEM NODE))))) ; (ITERATE-LEFT-NODES LIST NODE ; (LAMBDA (N) ; (LET ((CURRENT-KEY ; (FUNCALL KEY (ELEMENT N)))) ; (DECLARE (DYNAMIC-EXTENT CURRENT-KEY)) ; (COND ; ((FUNCALL TEST (ELEMENT NEW-NODE) ; (ELEMENT N)) ; (RETURN-FROM ; INSERT-ITEM-ORDERED-ABOUT-NODE ; LIST)) ; ((NOT ; (FUNCALL SORTER NEW-KEY CURRENT-KEY)) ; (INSERT-ITEM-AFTER LIST N NEW-NODE) ; (RETURN-FROM ; INSERT-ITEM-ORDERED-ABOUT-NODE ; LIST)))))) ; (ITERATE-RIGHT-NODES LIST NODE ; (LAMBDA (N) ; (LET ((CURRENT-KEY ; (FUNCALL KEY (ELEMENT N)))) ; (DECLARE (DYNAMIC-EXTENT CURRENT-KEY)) ; (COND ; ((FUNCALL TEST (ELEMENT NEW-NODE) ; (ELEMENT N)) ; (RETURN-FROM ; INSERT-ITEM-ORDERED-ABOUT-NODE ; LIST)) ; ((FUNCALL SORTER NEW-KEY CURRENT-KEY) ; (INSERT-ITEM-BEFORE LIST N NEW-NODE) ; (RETURN-FROM ; INSERT-ITEM-ORDERED-ABOUT-NODE ; LIST))))))))) ; processing (DEFMETHOD INSERT-ITEM-ORDERED-ABOUT-NODE ...) ; processing (DEFMETHOD INSERT-ITEM-ORDERED-ABOUT-NODE ...) ; processing (DEFMETHOD INSERT-ITEM-ORDERED ...) ; processing (DEFMETHOD INSERT-ITEM-ORDERED ...) ; processing (DEFMETHOD DELETE-ITEM ...) ; processing (DEFMETHOD DELETE-ITEM ...) ; file: /usr/share/common-lisp/source/cl-containers/dev/lists.lisp ; in: DEFMETHOD DELETE-ITEM (SORTED-DLIST-CONTAINER I-KNOW-MY-NODE-MIXIN) ; (METABANG.CL-CONTAINERS:MY-NODE METABANG.CL-CONTAINERS::ITEM) ; ; note: could not stack allocate: (MY-NODE ITEM) ; processing (DEFMETHOD FORCE-SORT ...) ; processing (DEFMETHOD ENSURE-SORTED ...) ; processing (DEFMETHOD LEFT-NODE-FOR-ITEM ...) ; file: /usr/share/common-lisp/source/cl-containers/dev/lists.lisp ; in: DEFMETHOD LEFT-NODE-FOR-ITEM (SORTED-DLIST-CONTAINER T) ; (COND ((= (METABANG.UTILITIES:SIZE LIST) 0) (VALUES NIL)) ; ((AND (= (METABANG.UTILITIES:SIZE LIST) 1) ; (NOT ; (FUNCALL METABANG.CL-CONTAINERS::SORTER ; METABANG.CL-CONTAINERS::NEW-KEY #))) ; (VALUES (METABANG.CL-CONTAINERS:FIRST-ELEMENT LIST))) ; (T ; (METABANG.CL-CONTAINERS:ITERATE-NODES LIST ; (LAMBDA ; (METABANG.CL-CONTAINERS::N) ; (LET* # ; # ; #))) ; (VALUES (METABANG.CL-CONTAINERS:LAST-ELEMENT LIST)))) ; --> IF IF THE PROGN METABANG.CL-CONTAINERS:ITERATE-NODES LAMBDA FUNCTION LET* ; ==> ; (FUNCALL ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'METABANG.CL-CONTAINERS::KEY) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'METABANG.CL-CONTAINERS::KEY)) ; (METABANG.UTILITIES:ELEMENT METABANG.CL-CONTAINERS::N)) ; ; note: could not stack allocate: ; (COND ((= (SIZE LIST) 0) (VALUES NIL)) ; ((AND (= (SIZE LIST) 1) ; (NOT ; (FUNCALL SORTER NEW-KEY ; (FUNCALL KEY (ELEMENT (FIRST-ELEMENT LIST)))))) ; (VALUES (FIRST-ELEMENT LIST))) ; (T ; (ITERATE-NODES LIST ; (LAMBDA (N) ; (LET* ((CURRENT-KEY (FUNCALL KEY (ELEMENT N)))) ; (DECLARE (DYNAMIC-EXTENT CURRENT-KEY)) ; (WHEN ; (OR (FUNCALL TEST NEW-KEY CURRENT-KEY) ; (FUNCALL SORTER NEW-KEY CURRENT-KEY)) ; (RETURN-FROM LEFT-NODE-FOR-ITEM ; (PREVIOUS-ITEM N)))))) ; (VALUES (LAST-ELEMENT LIST)))) ; processing (DEFMETHOD RIGHT-NODE-FOR-ITEM ...) ; file: /usr/share/common-lisp/source/cl-containers/dev/lists.lisp ; in: DEFMETHOD RIGHT-NODE-FOR-ITEM (SORTED-DLIST-CONTAINER T) ; (COND ((= (METABANG.UTILITIES:SIZE LIST) 0) (VALUES NIL)) ; ((AND (= (METABANG.UTILITIES:SIZE LIST) 1) ; (FUNCALL METABANG.CL-CONTAINERS::SORTER ; METABANG.CL-CONTAINERS::NEW-KEY ; (FUNCALL METABANG.CL-CONTAINERS::KEY #))) ; (VALUES (METABANG.CL-CONTAINERS:FIRST-ELEMENT LIST))) ; (T ; (METABANG.CL-CONTAINERS:ITERATE-NODES LIST ; (LAMBDA ; (METABANG.CL-CONTAINERS::N) ; (LET* # ; # ; #))) ; (VALUES NIL))) ; --> IF IF THE PROGN METABANG.CL-CONTAINERS:ITERATE-NODES LAMBDA FUNCTION LET* ; ==> ; (FUNCALL ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'METABANG.CL-CONTAINERS::KEY) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'METABANG.CL-CONTAINERS::KEY)) ; (METABANG.UTILITIES:ELEMENT METABANG.CL-CONTAINERS::N)) ; ; note: could not stack allocate: ; (COND ((= (SIZE LIST) 0) (VALUES NIL)) ; ((AND (= (SIZE LIST) 1) ; (FUNCALL SORTER NEW-KEY ; (FUNCALL KEY (ELEMENT (FIRST-ELEMENT LIST))))) ; (VALUES (FIRST-ELEMENT LIST))) ; (T ; (ITERATE-NODES LIST ; (LAMBDA (N) ; (LET* ((CURRENT-KEY (FUNCALL KEY (ELEMENT N)))) ; (DECLARE (DYNAMIC-EXTENT CURRENT-KEY)) ; (WHEN ; (OR (FUNCALL TEST NEW-KEY CURRENT-KEY) ; (FUNCALL SORTER NEW-KEY CURRENT-KEY)) ; (RETURN-FROM RIGHT-NODE-FOR-ITEM N))))) ; (VALUES NIL))) ; processing (DEFMETHOD LEFT-AND-RIGHT-NODES-FOR-ITEM ...) ; file: /usr/share/common-lisp/source/cl-containers/dev/lists.lisp ; in: DEFMETHOD LEFT-AND-RIGHT-NODES-FOR-ITEM (SORTED-DLIST-CONTAINER T) ; (COND ((= (METABANG.UTILITIES:SIZE LIST) 0) (VALUES NIL NIL)) ; ((= (METABANG.UTILITIES:SIZE LIST) 1) ; (IF (FUNCALL METABANG.CL-CONTAINERS::SORTER ; METABANG.CL-CONTAINERS::NEW-KEY ; (FUNCALL METABANG.CL-CONTAINERS::KEY #)) ; (VALUES NIL (METABANG.CL-CONTAINERS:FIRST-ELEMENT LIST)) ; (VALUES (METABANG.CL-CONTAINERS:FIRST-ELEMENT LIST) NIL))) ; (T ; (METABANG.CL-CONTAINERS:ITERATE-NODES LIST ; (LAMBDA ; (METABANG.CL-CONTAINERS::N) ; (LET* # ; # ; #))) ; (VALUES (METABANG.CL-CONTAINERS:LAST-ELEMENT LIST) NIL))) ; --> IF IF THE PROGN METABANG.CL-CONTAINERS:ITERATE-NODES LAMBDA FUNCTION LET* ; ==> ; (FUNCALL ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'METABANG.CL-CONTAINERS::KEY) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'METABANG.CL-CONTAINERS::KEY)) ; (METABANG.UTILITIES:ELEMENT METABANG.CL-CONTAINERS::N)) ; ; note: could not stack allocate: ; (COND ((= (SIZE LIST) 0) (VALUES NIL NIL)) ; ((= (SIZE LIST) 1) ; (IF (FUNCALL SORTER NEW-KEY ; (FUNCALL KEY (ELEMENT (FIRST-ELEMENT LIST)))) ; (VALUES NIL (FIRST-ELEMENT LIST)) ; (VALUES (FIRST-ELEMENT LIST) NIL))) ; (T ; (ITERATE-NODES LIST ; (LAMBDA (N) ; (LET* ((CURRENT-KEY (FUNCALL KEY (ELEMENT N)))) ; (DECLARE (DYNAMIC-EXTENT CURRENT-KEY)) ; (WHEN ; (OR (FUNCALL TEST NEW-KEY CURRENT-KEY) ; (FUNCALL SORTER NEW-KEY CURRENT-KEY)) ; (RETURN-FROM LEFT-AND-RIGHT-NODES-FOR-ITEM ; (VALUES (PREVIOUS-ITEM N) N)))))) ; (VALUES (LAST-ELEMENT LIST) NIL))) ; processing (DEFMETHOD ITERATE-LEFT-NODES ...) ; processing (DEFMETHOD ITERATE-LEFT-NODES ...) ; processing (DEFMETHOD ITERATE-LEFT-NODES ...) ; processing (DEFMETHOD ITERATE-RIGHT-NODES ...) ; processing (DEFMETHOD ITERATE-RIGHT-NODES ...) ; processing (DEFMETHOD ITERATE-RIGHT-NODES ...) ; processing (DEFMETHOD ITERATE-LEFT ...) ; file: /usr/share/common-lisp/source/cl-containers/dev/lists.lisp ; in: ; DEFMETHOD ITERATE-LEFT (SORTED-DLIST-CONTAINER DLIST-CONTAINER-NODE T) ; (METABANG.CL-CONTAINERS:PREVIOUS-ITEM METABANG.CL-CONTAINERS::ITEM) ; ; note: could not stack allocate: (PREVIOUS-ITEM ITEM) ; processing (DEFMETHOD ITERATE-LEFT ...) ; processing (DEFMETHOD ITERATE-LEFT ...) ; processing (DEFMETHOD ITERATE-RIGHT ...) ; file: /usr/share/common-lisp/source/cl-containers/dev/lists.lisp ; in: ; DEFMETHOD ITERATE-RIGHT (SORTED-DLIST-CONTAINER DLIST-CONTAINER-NODE T) ; (METABANG.CL-CONTAINERS:NEXT-ITEM METABANG.CL-CONTAINERS::ITEM) ; ; note: could not stack allocate: (NEXT-ITEM ITEM) ; processing (DEFMETHOD ITERATE-RIGHT ...) ; processing (DEFMETHOD ITERATE-RIGHT ...) ; processing (DEFMETHOD SORT-UPDATE-LEFT ...) ; file: /usr/share/common-lisp/source/cl-containers/dev/lists.lisp ; in: ; DEFMETHOD SORT-UPDATE-LEFT (SORTED-DLIST-CONTAINER DLIST-CONTAINER-NODE) ; (WITH-SLOTS (METABANG.CL-CONTAINERS::SORTER METABANG.CL-CONTAINERS::KEY ; METABANG.CL-CONTAINERS::TEST) ; LIST ; (LET ((METABANG.CL-CONTAINERS::NODE-KEY ; (FUNCALL METABANG.CL-CONTAINERS::KEY #)) ; (METABANG.CL-CONTAINERS::NEXT-NEIGHBOR ; (METABANG.CL-CONTAINERS:PREVIOUS-ITEM METABANG.CL-CONTAINERS::NODE))) ; (DECLARE ; (DYNAMIC-EXTENT METABANG.CL-CONTAINERS::NODE-KEY ; METABANG.CL-CONTAINERS::NEXT-NEIGHBOR)) ; (LOOP METABANG.CL-CONTAINERS::WHILE (AND ; METABANG.CL-CONTAINERS::NEXT-NEIGHBOR ; (FUNCALL ; METABANG.CL-CONTAINERS::SORTER ; METABANG.CL-CONTAINERS::NODE-KEY ; #)) ; DO (SETF # # ; # #) (WHEN (NOT #) ; (SETF #)) (IF (NOT #) ; (SETF #) ; (SETF #)) (SETF # ; METABANG.CL-CONTAINERS::NEXT-NEIGHBOR ; # ; METABANG.CL-CONTAINERS::NODE) (SETF METABANG.CL-CONTAINERS::NEXT-NEIGHBOR ; #)) ; (WHEN (NOT METABANG.CL-CONTAINERS::NEXT-NEIGHBOR) ; (SETF # METABANG.CL-CONTAINERS::NODE)))) ; --> LET SYMBOL-MACROLET LET ; ==> ; (FUNCALL ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'METABANG.CL-CONTAINERS::KEY) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'METABANG.CL-CONTAINERS::KEY)) ; (METABANG.UTILITIES:ELEMENT METABANG.CL-CONTAINERS::NODE)) ; ; note: could not stack allocate: ; (WITH-SLOTS (SORTER KEY TEST) ; LIST ; (LET ((NODE-KEY (FUNCALL KEY (ELEMENT NODE))) ; (NEXT-NEIGHBOR (PREVIOUS-ITEM NODE))) ; (DECLARE (DYNAMIC-EXTENT NODE-KEY NEXT-NEIGHBOR)) ; (LOOP WHILE (AND NEXT-NEIGHBOR ; (FUNCALL SORTER NODE-KEY ; (FUNCALL KEY (ELEMENT NEXT-NEIGHBOR)))) ; DO (SETF (NEXT-ITEM NEXT-NEIGHBOR) (NEXT-ITEM NODE) ; (PREVIOUS-ITEM NODE) ; (PREVIOUS-ITEM NEXT-NEIGHBOR)) (WHEN ; (NOT ; (EQ ; NEXT-NEIGHBOR ; (FIRST-ELEMENT ; LIST))) ; (SETF (NEXT-ITEM ; (PREVIOUS-ITEM ; NEXT-NEIGHBOR)) ; NODE)) (IF (NOT ; (EQ ; NODE ; (LAST-ELEMENT ; LIST))) ; (SETF (PREVIOUS-ITEM ; (NEXT-ITEM ; NODE)) ; NEXT-NEIGHBOR) ; (SETF (LAST-ELEMENT ; LIST) ; NEXT-NEIGHBOR)) (SETF (NEXT-ITEM ; NODE) ; NEXT-NEIGHBOR ; (PREVIOUS-ITEM ; NEXT-NEIGHBOR) ; NODE) (SETF NEXT-NEIGHBOR ; (PREVIOUS-ITEM ; NODE))) ; (WHEN (NOT NEXT-NEIGHBOR) (SETF (FIRST-ELEMENT LIST) NODE)))) ; (METABANG.CL-CONTAINERS:PREVIOUS-ITEM METABANG.CL-CONTAINERS::NODE) ; ; note: could not stack allocate: (PREVIOUS-ITEM NODE) ; processing (DEFMETHOD SORT-UPDATE-RIGHT ...) ; file: /usr/share/common-lisp/source/cl-containers/dev/lists.lisp ; in: ; DEFMETHOD SORT-UPDATE-RIGHT (SORTED-DLIST-CONTAINER DLIST-CONTAINER-NODE) ; (WITH-SLOTS (METABANG.CL-CONTAINERS::SORTER METABANG.CL-CONTAINERS::KEY ; METABANG.CL-CONTAINERS::TEST) ; LIST ; (LET ((METABANG.CL-CONTAINERS::NODE-KEY ; (FUNCALL METABANG.CL-CONTAINERS::KEY #)) ; (METABANG.CL-CONTAINERS::NEXT-NEIGHBOR ; (METABANG.CL-CONTAINERS:NEXT-ITEM METABANG.CL-CONTAINERS::NODE))) ; (DECLARE ; (DYNAMIC-EXTENT METABANG.CL-CONTAINERS::NODE-KEY ; METABANG.CL-CONTAINERS::NEXT-NEIGHBOR)) ; (LOOP METABANG.CL-CONTAINERS::WHILE (AND ; METABANG.CL-CONTAINERS::NEXT-NEIGHBOR ; (NOT #)) ; DO (SETF # # ; # #) (WHEN (NOT #) ; (SETF #)) (IF (NOT #) ; (SETF #) ; (SETF #)) (SETF # ; METABANG.CL-CONTAINERS::NEXT-NEIGHBOR ; # ; METABANG.CL-CONTAINERS::NODE) (SETF METABANG.CL-CONTAINERS::NEXT-NEIGHBOR ; #)) ; (WHEN (NOT METABANG.CL-CONTAINERS::NEXT-NEIGHBOR) ; (SETF # METABANG.CL-CONTAINERS::NODE)))) ; --> LET SYMBOL-MACROLET LET ; ==> ; (FUNCALL ; (SB-C::WITH-SOURCE-FORM (SLOT-VALUE #:G0 'METABANG.CL-CONTAINERS::KEY) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 ; 'METABANG.CL-CONTAINERS::KEY)) ; (METABANG.UTILITIES:ELEMENT METABANG.CL-CONTAINERS::NODE)) ; ; note: could not stack allocate: ; (WITH-SLOTS (SORTER KEY TEST) ; LIST ; (LET ((NODE-KEY (FUNCALL KEY (ELEMENT NODE))) ; (NEXT-NEIGHBOR (NEXT-ITEM NODE))) ; (DECLARE (DYNAMIC-EXTENT NODE-KEY NEXT-NEIGHBOR)) ; (LOOP WHILE (AND NEXT-NEIGHBOR ; (NOT ; (FUNCALL SORTER NODE-KEY ; (FUNCALL KEY (ELEMENT NEXT-NEIGHBOR))))) ; DO (SETF (PREVIOUS-ITEM NEXT-NEIGHBOR) (PREVIOUS-ITEM NODE) ; (NEXT-ITEM NODE) (NEXT-ITEM NEXT-NEIGHBOR)) (WHEN ; (NOT ; (EQ ; NEXT-NEIGHBOR ; (LAST-ELEMENT ; LIST))) ; (SETF (PREVIOUS-ITEM ; (NEXT-ITEM ; NEXT-NEIGHBOR)) ; NODE)) (IF (NOT ; (EQ ; NODE ; (FIRST-ELEMENT ; LIST))) ; (SETF (NEXT-ITEM ; (PREVIOUS-ITEM ; NEXT-NEIGHBOR)) ; NEXT-NEIGHBOR) ; (SETF (FIRST-ELEMENT ; LIST) ; NEXT-NEIGHBOR)) (SETF (PREVIOUS-ITEM ; NODE) ; NEXT-NEIGHBOR ; (NEXT-ITEM ; NEXT-NEIGHBOR) ; NODE) (SETF NEXT-NEIGHBOR ; (NEXT-ITEM ; NODE))) ; (WHEN (NOT NEXT-NEIGHBOR) (SETF (LAST-ELEMENT LIST) NODE)))) ; (METABANG.CL-CONTAINERS:NEXT-ITEM METABANG.CL-CONTAINERS::NODE) ; ; note: could not stack allocate: (NEXT-ITEM NODE) ; processing (DEFMETHOD UPDATE-ITEM ...) ; processing (DEFMETHOD UPDATE-ITEM ...) ; processing (DEFMETHOD UPDATE-ITEM ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-containers/dev/lists-tmpB6CZFPOR.fasl ; compilation finished in 0:00:00.395 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/cl-containers/dev/bags-and-sets.lisp" (written 28 MAR 2017 01:15:31 AM): ; processing (IN-PACKAGE #:CONTAINERS) ; processing (DEFCLASS* ABSTRACT-BAG/SET-CONTAINER ...) ; processing (DEFMETHOD MAKE-CONTAINER-FOR-CONTENTS ...) ; processing (DEFCLASS* BAG-CONTAINER ...) ; processing (DEFMETHOD INSERT-ITEM ...) ; processing (DEFMETHOD SIZE ...) ; processing (DEFMETHOD EMPTY-P ...) ; processing (DEFMETHOD EMPTY! ...) ; processing (DEFMETHOD SEARCH-FOR-ITEM ...) ; processing (DEFMETHOD SEARCH-FOR-MATCH ...) ; processing (DEFMETHOD DELETE-ITEM ...) ; processing (DEFMETHOD FIND-ITEM ...) ; processing (DEFCLASS* SET-CONTAINER ...) ; processing (DEFMETHOD INSERT-ITEM ...) ; processing (DEFCLASS* BAG/SET-CONTAINER ...) ; processing (DEFMETHOD INSERT-ITEM ...) ; processing (DEFMETHOD DELETE-ITEM ...) ; processing (DEFMETHOD SIZE ...) ; processing (DEFMETHOD SEARCH-FOR-ITEM ...) ; processing (DEFMETHOD ITERATE-NODES ...) ; processing (DEFMETHOD FIND-ITEM ...) ; processing (DEFMETHOD FIND-VALUE ...) ; processing (DEFCLASS* KEYED-BAG/SET-CONTAINER ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD INSERT-ITEM ...) ; processing (DEFMETHOD DELETE-ITEM ...) ; processing (DEFMETHOD FIND-ITEM ...) ; processing (DEFMETHOD ITERATE-NODES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-containers/dev/bags-and-sets-tmpR0HRL6AF.fasl ; compilation finished in 0:00:00.199 ; compiling file "/usr/share/common-lisp/source/cl-containers/dev/ring-buffers.lisp" (written 28 MAR 2017 01:15:31 AM): ; processing (IN-PACKAGE #:CONTAINERS) ; processing (DEFCLASS* RING-BUFFER ...) ; processing (DEFUN MAKE-RING-BUFFER ...) ; processing (DEFMETHOD MAKE-CONTAINER ...) ; processing (DEFMETHOD ITEM-AT ...) ; file: /usr/share/common-lisp/source/cl-containers/dev/ring-buffers.lisp ; in: DEFMETHOD ITEM-AT (RING-BUFFER) ; (FIRST METABANG.CL-CONTAINERS::INDEXES) ; ; caught STYLE-WARNING: ; The binding of NUMBER is not a REAL: ; NIL ; See also: ; The SBCL Manual, Node "Handling of Types" ; processing (DEFMETHOD ITEM-AT! ...) ; file: /usr/share/common-lisp/source/cl-containers/dev/ring-buffers.lisp ; in: DEFMETHOD ITEM-AT! (RING-BUFFER T) ; (FIRST METABANG.CL-CONTAINERS::INDEXES) ; ; caught STYLE-WARNING: ; The binding of NUMBER is not a REAL: ; NIL ; See also: ; The SBCL Manual, Node "Handling of Types" ; processing (DEFMETHOD INCREMENT-END ...) ; processing (DEFMETHOD NEXT-ITEM ...) ; processing (DEFMETHOD CURRENT-ITEM ...) ; processing (DEFMETHOD INSERT-ITEM ...) ; processing (DEFMETHOD DELETE-FIRST ...) ; processing (DEFMETHOD EMPTY! ...) ; processing (DEFMETHOD SIZE ...) ; processing (DEFMETHOD FIRST-ELEMENT ...) ; processing (DEFMETHOD (SETF FIRST-ELEMENT) ...) ; processing (DEFMETHOD ITERATE-NODES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-containers/dev/ring-buffers-tmpJW9LMMDM.fasl ; compilation finished in 0:00:00.099 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/cl-containers/dev/miscellaneous.lisp" (written 28 MAR 2017 01:15:31 AM): ; processing (IN-PACKAGE #:CONTAINERS) ; processing (DEFUN MERGE-ELEMENTS ...) ; processing (DEFUN MERGE-NODES ...) ; processing (DEFUN %MERGE-HELPER ...) ; processing (DEFUN ELEMENT-COUNTS ...) ; processing (DEFUN NODE-COUNTS ...) ; processing (DEFUN %CONTAINER-COUNTS ...) ; processing (DEFUN MAP-WINDOW-OVER-ELEMENTS ...) ; processing (DEFUN MAP-WINDOW-OVER-NODES ...) ; processing (DEFUN COLLECT-WINDOW-OVER-ELEMENTS ...) ; processing (DEFUN COLLECT-WINDOW-OVER-NODES ...) ; processing (DEFUN MAP-WINDOW-OVER-ELEMENTS-HELPER ...) ; processing (DEFUN MAP-PAIRS ...) ; processing (DEFUN COLLECT-PAIRS ...) ; processing (DEFMETHOD UNIQUE-ELEMENTS ...) ; processing (DEFMETHOD UNIQUE-ELEMENTS ...) ; processing (DEFMETHOD UNIQUE-NODES ...) ; processing (DEFMETHOD UNIQUE-NODES ...) ; processing (DEFUN %UNIQUE-ELEMENTS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-containers/dev/miscellaneous-tmp5AU4YXDC.fasl ; compilation finished in 0:00:00.091 ; compiling file "/usr/share/common-lisp/source/cl-containers/dev/associative.lisp" (written 28 MAR 2017 01:15:31 AM): ; processing (IN-PACKAGE #:CONTAINERS) ; processing (DEFMETHOD SOME-KEY-VALUE-P ...) ; processing (DEFMETHOD EVERY-KEY-VALUE-P ...) ; processing (DEFMETHOD SAMEP ...) ; processing (DEFMETHOD COLLECT-KEYS ...) ; processing (DEFMETHOD SEARCH-FOR-KEY ...) ; processing (DEFMETHOD REMOVE-ITEMS-IF ...) ; processing (DEFMETHOD REMOVE-ITEMS-IF ...) ; processing (DEFMETHOD COUNT-ITEMS ...) ; processing (DEFMETHOD COUNT-ELEMENTS ...) ; processing (DEFMETHOD COUNT-ELEMENTS ...) ; processing (DEFMETHOD COUNT-ELEMENTS-IF ...) ; processing (DEFMETHOD COUNT-ELEMENTS-IF ...) ; processing (DEFMETHOD PRINT-CONTAINER-SUMMARY ...) ; processing (DEFUN MAKE-ARRAY-CONTAINER ...) ; processing (DEFMETHOD MAKE-CONTAINER-FOR-CONTENTS ...) ; processing (DEFMETHOD MAKE-CONTAINER ...) ; processing (DEFMETHOD ITEM-AT ...) ; processing (DEFMETHOD ITEM-AT! ...) ; processing (DEFMETHOD DIMENSIONS ...) ; processing (DEFMETHOD ITERATE-NODES ...) ; processing (DEFMETHOD NTH-ELEMENT ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD MAKE-CONTAINER-FOR-CONTENTS ...) ; processing (DEFMETHOD TOTAL-SIZE ...) ; processing (DEFUN SPARSE-ARRAY-ROW-MAJOR-INDEX ...) ; processing (DEFUN SPARSE-ARRAY-VALUE-TO-INDEX ...) ; processing (DEFMETHOD ITEM-AT ...) ; processing (DEFMETHOD ITEM-AT! ...) ; processing (DEFMETHOD ITEM-AT-1 ...) ; processing (DEFMETHOD ITEM-AT-1! ...) ; processing (DEFMETHOD (SETF ITEM-AT-1) ...) ; processing (DEFMETHOD ITEM-AT ...) ; processing (DEFMETHOD ITEM-AT! ...) ; processing (DEFMETHOD DELETE-ITEM-AT ...) ; processing (DEFMETHOD ITERATE-KEY-VALUE ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD ITEM-AT ...) ; processing (DEFMETHOD DELETE-ITEM-AT ...) ; processing (DEFMETHOD ITERATE-KEY-VALUE ...) ; processing (DEFUN DESCEND-HT ...) ; processing (DEFUN FIND-OR-CREATE-HT ...) ; processing (DEFMETHOD ITEM-AT! ...) ; processing (DEFMETHOD PRINT-CONTAINER ...) ; processing (DEFMETHOD PRINT-CONTAINER ...) ; processing (DEFMETHOD INITIALIZE-CONTAINER ...) ; processing (DEFMETHOD MAKE-CONTAINER-FOR-CONTENTS ...) ; processing (DEFMETHOD ITEM-AT ...) ; processing (DEFMETHOD ITEM-AT-1 ...) ; processing (DEFMETHOD ITEM-AT-1! ...) ; processing (DEFUN MAYBE-SET-INITIAL-ELEMENT ...) ; processing (DEFMETHOD ITEM-AT! ...) ; processing (DEFMETHOD DELETE-ITEM-AT ...) ; processing (DEFMETHOD SIZE ...) ; processing (DEFMETHOD ITERATE-NODES ...) ; processing (DEFMETHOD ITERATE-KEYS ...) ; processing (DEFMETHOD REVERSE-FIND ...) ; processing (DEFMETHOD EMPTY! ...) ; processing (DEFMETHOD ITERATE-KEY-VALUE ...) ; processing (DEFMETHOD SORT-KEYS ...) ; processing (DEFMETHOD SORT-ELEMENTS ...) ; processing (DEFMETHOD SORT-CONTAINER ...) ; processing (DEFCLASS* KEYED-ASSOCIATIVE-CONTAINER ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFUN IDENTITY-2 ...) ; processing (DEFMETHOD ITEM-KEY ...) ; processing (DEFMETHOD ITEM-AT ...) ; processing (DEFMETHOD DELETE-ITEM-AT ...) ; processing (DEFMETHOD ITEM-AT! ...) ; processing (DEFGENERIC KEY-EXISTS-P ...) ; processing (DEFMETHOD KEY-EXISTS-P ...) ; processing (DEFMETHOD ITERATE-KEY-VALUE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-containers/dev/associative-tmpGYUJ95L8.fasl ; compilation finished in 0:00:00.515 ; compiling file "/usr/share/common-lisp/source/cl-containers/dev/compatibility.lisp" (written 28 MAR 2017 01:15:31 AM): ; processing (IN-PACKAGE #:CONTAINERS) ; processing (DEFMETHOD ITERATABLE-P ...) ; processing (DEFMETHOD ITERATE-ELEMENTS ...) ; processing (DEFMETHOD ITERATE-NODES ...) ; processing (DEFMETHOD ITERATE-ELEMENTS ...) ; processing (DEFMETHOD ITERATE-NODES ...) ; processing (DEFMETHOD COLLECT-ELEMENTS ...) ; processing (DEFMETHOD ELEMENT-POSITION ...) ; processing (DEFMETHOD EMPTY-P ...) ; processing (DEFMETHOD FIRST-ELEMENT ...) ; processing (DEFMETHOD (SETF FIRST-ELEMENT) ...) ; processing (DEFMETHOD LAST-ELEMENT ...) ; processing (DEFMETHOD (SETF LAST-ELEMENT) ...) ; processing (DEFMETHOD NTH-ELEMENT ...) ; processing (DEFMETHOD SEARCH-FOR-MATCH ...) ; processing (DEFMETHOD SIZE ...) ; processing (DEFMETHOD FIND-ITEM ...) ; processing (DEFMETHOD SEARCH-FOR-ITEM ...) ; processing (DEFMETHOD SEARCH-FOR-ELEMENT ...) ; processing (DEFMETHOD REDUCE-ELEMENTS ...) ; processing (DEFMETHOD SOME-ITEM-P ...) ; processing (DEFMETHOD SOME-ELEMENT-P ...) ; processing (DEFMETHOD EVERY-ITEM-P ...) ; processing (DEFMETHOD EVERY-ELEMENT-P ...) ; processing (DEFMETHOD ITERATE-ELEMENTS ...) ; processing (DEFMETHOD ITERATE-NODES ...) ; processing (DEFMETHOD ITERATABLE-P ...) ; processing (DEFMETHOD COLLECT-ELEMENTS ...) ; processing (DEFMETHOD SIZE ...) ; processing (DEFMETHOD EMPTY-P ...) ; processing (DEFMETHOD FIRST-ELEMENT ...) ; processing (DEFMETHOD (SETF FIRST-ELEMENT) ...) ; processing (DEFMETHOD LAST-ELEMENT ...) ; processing (DEFMETHOD (SETF LAST-ELEMENT) ...) ; processing (DEFMETHOD SEARCH-FOR-MATCH ...) ; processing (DEFMETHOD SOME-ITEM-P ...) ; processing (DEFMETHOD SOME-ELEMENT-P ...) ; processing (DEFMETHOD EVERY-ITEM-P ...) ; processing (DEFMETHOD EVERY-ELEMENT-P ...) ; processing (DEFMETHOD SORT-ELEMENTS ...) ; processing (DEFMETHOD NTH-ELEMENT ...) ; processing (DEFMETHOD ITERATE-ELEMENTS ...) ; processing (DEFMETHOD ITERATE-NODES ...) ; processing (DEFMETHOD ITERATABLE-P ...) ; processing (DEFMETHOD COLLECT-ELEMENTS ...) ; processing (DEFMETHOD SIZE ...) ; processing (DEFMETHOD FIRST-ELEMENT ...) ; processing (DEFMETHOD (SETF FIRST-ELEMENT) ...) ; processing (DEFMETHOD LAST-ELEMENT ...) ; processing (DEFMETHOD (SETF LAST-ELEMENT) ...) ; processing (DEFMETHOD SEARCH-FOR-MATCH ...) ; processing (DEFMETHOD SOME-ELEMENT-P ...) ; processing (DEFMETHOD EVERY-ELEMENT-P ...) ; processing (DEFMETHOD NTH-ELEMENT ...) ; processing (DEFMETHOD ITEM-AT ...) ; processing (DEFMETHOD ITEM-AT! ...) ; processing (DEFMETHOD ITERATABLE-P ...) ; processing (DEFMETHOD ITERATE-ELEMENTS ...) ; processing (DEFMETHOD ITERATE-NODES ...) ; processing (DEFMETHOD COLLECT-ELEMENTS ...) ; processing (DEFMETHOD COLLECT-KEYS ...) ; processing (DEFMETHOD ITERATE-KEY-VALUE ...) ; processing (DEFMETHOD EMPTY! ...) ; processing (DEFMETHOD EMPTY-P ...) ; processing (DEFMETHOD SIZE ...) ; processing (DEFMETHOD ITEM-AT ...) ; processing (DEFMETHOD ITEM-AT! ...) ; processing (DEFMETHOD ITEM-AT-1 ...) ; processing (DEFMETHOD ITEM-AT-1! ...) ; processing (DEFMETHOD PRINT-CONTAINER ...) ; processing (DEFMETHOD ITEM-AT ...) ; processing (DEFMETHOD ITEM-AT-1 ...) ; processing (DEFMETHOD ITERATE-KEY-VALUE ...) ; processing (DEFMETHOD COLLECT-KEY-VALUE ...) ; processing (DEFMETHOD COLLECT-KEYS ...) ; processing (DEFMETHOD DELETE-ITEM-AT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-containers/dev/compatibility-tmpSX2NSBN5.fasl ; compilation finished in 0:00:00.475 ; compiling file "/usr/share/common-lisp/source/cl-containers/dev/quad-tree.lisp" (written 28 MAR 2017 01:15:31 AM): ; processing (IN-PACKAGE #:CONTAINERS) ; processing (DEFCLASS* QUAD-TREE ...) ; processing (DEFCLASS* FOUR-CHILD-NODE ...) ; processing (DEFCLASS* QUAD-TREE-NODE ...) ; processing (DEFMETHOD MAKE-NODE-FOR-CONTAINER ...) ; processing (DEFMETHOD NODE-EMPTY-P ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFGENERIC NOTIFY-ELEMENT-OF-CHILD-STATUS ...) ; processing (DEFMETHOD INSERT-ITEM ...) ; processing (DEFMETHOD EMPTY-P ...) ; processing (DEFMETHOD EMPTY! ...) ; processing (DEFMETHOD FIND-ITEM ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-containers/dev/quad-tree-tmpGSOGECKD.fasl ; compilation finished in 0:00:00.055 ; compiling file "/usr/share/common-lisp/source/cl-containers/dev/heaps.lisp" (written 28 MAR 2017 01:15:31 AM): ; processing (IN-PACKAGE #:CONTAINERS) ; processing (DEFCLASS* HEAP-CONTAINER ...) ; processing (DEFCLASS* HEAP-NODE ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFMETHOD L-CHILD ...) ; processing (DEFMETHOD R-CHILD ...) ; processing (DEFMETHOD HEAP-NODE-PARENT ...) ; processing (DEFMETHOD L-CHILD-INDEX ...) ; processing (DEFMETHOD R-CHILD-INDEX ...) ; processing (DEFMETHOD NODE-PARENT-INDEX ...) ; processing (DEFMETHOD EXCHANGE-HEAP-NODES ...) ; processing (DEFMETHOD MAKE-NODE-FOR-CONTAINER ...) ; processing (DEFMETHOD HEAPIFY ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD BIGGEST-ITEM ...) ; processing (DEFMETHOD DELETE-BIGGEST-ITEM ...) ; processing (DEFMETHOD DELETE-ITEM ...) ; processing (DEFMETHOD INSERT-ITEM ...) ; processing (DEFCLASS* K-BEST-HEAP-CONTAINER ...) ; processing (DEFMETHOD INSERT-ITEM ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-containers/dev/heaps-tmpFADXA8WA.fasl ; compilation finished in 0:00:00.067 ; compiling file "/usr/share/common-lisp/source/cl-containers/dev/container-mixins.lisp" (written 28 MAR 2017 01:15:31 AM): ; processing (IN-PACKAGE #:CONTAINERS) ; processing (DEFCLASS* FILTERED-CONTAINER-MIXIN ...) ; processing (DEFMETHOD ITERATE-ELEMENTS ...) ; processing (DEFMETHOD COLLECT-ELEMENTS ...) ; processing (DEFMETHOD ITERATE-KEY-VALUE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-containers/dev/container-mixins-tmpN3NRP2FJ.fasl ; compilation finished in 0:00:00.091 ; compiling file "/usr/share/common-lisp/source/cl-containers/dev/union-find-container.lisp" (written 28 MAR 2017 01:15:31 AM): ; processing (IN-PACKAGE #:CONTAINERS) ; processing (DEFCLASS* UNION-FIND-NODE ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFMETHOD MAKE-SET ...) ; processing (DEFMETHOD GRAFT-NODES ...) ; processing (DEFMETHOD FIND-SET ...) ; processing (DEFMETHOD LINK-NODES ...) ; processing (DEFCLASS* UNION-FIND-CONTAINER ...) ; processing (DEFMETHOD INSERT-ITEM ...) ; processing (DEFMETHOD REPRESENTATIVE ...) ; processing (DEFMETHOD REPRESENTATIVE-NODE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-containers/dev/union-find-container-tmpWFHX3XN3.fasl ; compilation finished in 0:00:00.055 ; compiling file "/usr/share/common-lisp/source/cl-containers/dev/package-container.lisp" (written 28 MAR 2017 01:15:31 AM): ; processing (IN-PACKAGE #:CONTAINERS) ; processing (DEFCLASS* PACKAGE-CONTAINER ...) ; processing (DEFMETHOD (SETF PACKAGES) ...) ; processing (DEFMETHOD (SETF PACKAGES) ...) ; processing (DEFMETHOD ITERATE-ELEMENTS ...) ; processing (DEFMETHOD SIZE ...) ; processing (DEFUN BOUND-SYMBOLS-IN-PACKAGE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-containers/dev/package-container-tmp47S258KN.fasl ; compilation finished in 0:00:00.051 ; compiling file "/usr/share/common-lisp/source/cl-containers/dev/iterator-api.lisp" (written 28 MAR 2017 01:15:31 AM): ; processing (IN-PACKAGE #:CONTAINERS) ; processing (DEFGENERIC MAKE-ITERATOR ...) ; processing (DEFGENERIC PRINT-ITERATOR ...) ; processing (DEFGENERIC FINISH ...) ; processing (DEFGENERIC MOVE-P ...) ; processing (DEFGENERIC ELEMENT-PASSES-P ...) ; processing (DEFGENERIC MOVE ...) ; processing (DEFGENERIC BASE-CLASS-FOR-ITERATEE ...) ; processing (DEFGENERIC CLASS-FOR-CONTENTS-AS ...) ; processing (DEFGENERIC CURRENT-ELEMENT ...) ; processing (DEFGENERIC CURRENT-ELEMENT-P ...) ; processing (DEFGENERIC SETUP-INITIAL-CONTAINER ...) ; processing (DEFGENERIC ADVANCE ...) ; processing (DEFGENERIC ITERATE-FORWARD ...) ; processing (DEFGENERIC MAKE-INTERNAL-ITERATOR ...) ; processing (DEFGENERIC MOVE-FORWARD ...) ; processing (DEFGENERIC MOVE-FORWARD-TO-NEXT-ELEMENT ...) ; processing (DEFGENERIC MOVE-INTERNAL ...) ; processing (DEFGENERIC NEXT-ELEMENT ...) ; processing (DEFGENERIC OPEN-FILE-FOR-ITERATOR ...) ; processing (DEFGENERIC RESET ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-containers/dev/iterator-api-tmpE4V4F8OD.fasl ; compilation finished in 0:00:00.000 ; compiling file "/usr/share/common-lisp/source/cl-containers/dev/iterators.lisp" (written 28 MAR 2017 01:15:31 AM): ; processing (IN-PACKAGE #:CL-CONTAINERS) ; processing (DEFCONSTANT +ITERATOR-BEFORE-BEGINNING+ ...) ; processing (DEFCONSTANT +ITERATOR-AFTER-END+ ...) ; processing (DEFCONDITION BASIC-ITERATOR-CONDITION ...) ; processing (DEFCONDITION NO-CURRENT-ELEMENT-ERROR ...) ; processing (DEFCLASS* ABSTRACT-GENERATOR ...) ; processing (DEFMETHOD FINISH ...) ; processing (DEFCLASS* BASIC-ITERATOR ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD SETUP-INITIAL-CONTAINER ...) ; processing (DEFMETHOD PRINT-ITERATOR ...) ; processing (DEFMETHOD RESET ...) ; processing (DEFMETHOD MOVE-P ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFMETHOD PRINT-ITERATOR ...) ; processing (DEFCLASS* FORWARD-ITERATOR ...) ; processing (DEFMETHOD ITERATE-CONTAINER ...) ; processing (DEFMETHOD ITERATE-NODES ...) ; processing (DEFMETHOD EMPTY-P ...) ; processing (DEFMETHOD ELEMENT ...) ; processing (DEFMETHOD NEXT-ELEMENT ...) ; processing (DEFMETHOD CURRENT-ELEMENT-P ...) ; processing (DEFMETHOD ELEMENT ...) ; processing (DEFMETHOD MOVE ...) ; processing (DEFUN MOVE-FORWARD-P ...) ; processing (DEFMETHOD MOVE-FORWARD ...) ; processing (DEFMETHOD ITERATE-FORWARD ...) ; processing (DEFCLASS* TRANSFORMING-ITERATOR-MIXIN ...) ; processing (DEFMETHOD CURRENT-ELEMENT ...) ; processing (DEFMETHOD MOVE ...) ; processing (DEFCLASS* BASIC-FILTERED-ITERATOR-MIXIN ...) ; processing (DEFMETHOD MOVE ...) ; processing (DEFCLASS* FILTERED-ITERATOR-MIXIN ...) ; processing (DEFMETHOD ELEMENT-PASSES-P ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD MOVE-FORWARD-TO-NEXT-ELEMENT ...) ; processing (DEFCLASS* UNIQUE-VALUE-ITERATOR-MIXIN ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD ELEMENT-PASSES-P ...) ; processing (DEFMETHOD ELEMENT ...) ; processing (DEFCLASS* CIRCULAR-ITERATOR-MIXIN ...) ; processing (DEFMETHOD MOVE-P ...) ; processing (DEFCLASS* LIST-ITERATOR ...) ; processing (DEFMETHOD RESET ...) ; processing (DEFMETHOD MOVE ...) ; processing (DEFMETHOD CURRENT-ELEMENT ...) ; processing (DEFMETHOD MOVE-P ...) ; processing (DEFCLASS* ARRAY-ITERATOR ...) ; processing (DEFMETHOD RESET ...) ; processing (DEFMETHOD MOVE ...) ; processing (DEFMETHOD CURRENT-ELEMENT-P ...) ; processing (DEFMETHOD CURRENT-ELEMENT ...) ; processing (DEFMETHOD MOVE-P ...) ; processing (DEFCLASS* HASH-TABLE-ITERATOR ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD RESET ...) ; processing (DEFMETHOD MAKE-ITERATOR ...) ; processing (DEFMETHOD MAKE-ITERATOR ...) ; processing (DEFUN MAKE-GENERATOR ...) ; processing (DEFCLASS* BASIC-GENERATOR ...) ; processing (DEFCLASS* ARITHMETIC-SEQUENCE-GENERATOR ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD MOVE ...) ; processing (DEFMETHOD MOVE-P ...) ; processing (DEFMETHOD CURRENT-ELEMENT ...) ; processing (DEFCLASS* FINITE-ARITHMETIC-SEQUENCE-GENERATOR ...) ; processing (DEFMETHOD MOVE-P ...) ; processing (DEFUN MAP-CONTAINERS ...) ; processing (DEFUN COLLECT-CONTAINERS ...) ; processing (DEFMACRO WITH-ITERATOR ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-containers/dev/iterators-tmpLCU5UNL8.fasl ; compilation finished in 0:00:00.303 ; compiling file "/usr/share/common-lisp/source/cl-containers/dev/file-iterators.lisp" (written 28 MAR 2017 01:15:31 AM): ; processing (IN-PACKAGE #:CONTAINERS) ; processing (DEFCLASS* BASIC-STREAM-ITERATOR ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD FINISH ...) ; processing (DEFMETHOD OPEN-FILE-FOR-ITERATOR ...) ; processing (DEFMETHOD OPEN-FILE-FOR-ITERATOR ...) ; processing (DEFMETHOD OPEN-FILE-FOR-ITERATOR ...) ; processing (DEFCLASS* FILE-ITERATOR ...) ; processing (DEFMETHOD BASE-CLASS-FOR-ITERATEE ...) ; processing (DEFMETHOD MOVE ...) ; processing (DEFMETHOD ADVANCE ...) ; processing (DEFMETHOD CURRENT-ELEMENT ...) ; processing (DEFMETHOD CURRENT-ELEMENT-P ...) ; processing (DEFMETHOD MOVE-P ...) ; processing (DEFCLASS* FILE-LINE-ITERATOR ...) ; processing (DEFMETHOD MOVE ...) ; processing (DEFMETHOD ADVANCE ...) ; processing (DEFMETHOD CURRENT-ELEMENT ...) ; processing (DEFMETHOD CURRENT-ELEMENT-P ...) ; processing (DEFMETHOD MOVE-P ...) ; processing (DEFMETHOD CLASS-FOR-CONTENTS-AS ...) ; processing (DEFCLASS* FILE-FORM-ITERATOR ...) ; processing (DEFMETHOD MOVE ...) ; processing (DEFMETHOD ADVANCE ...) ; processing (DEFMETHOD CURRENT-ELEMENT ...) ; processing (DEFMETHOD CURRENT-ELEMENT-P ...) ; processing (DEFMETHOD MOVE-P ...) ; processing (DEFMETHOD CLASS-FOR-CONTENTS-AS ...) ; processing (DEFCLASS* DELIMITED-ITERATOR ...) ; processing (DEFCLASS* INTERNAL-ITERATOR-MIXIN ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD MAKE-INTERNAL-ITERATOR ...) ; processing (DEFGENERIC CHARACTERIZE-ELEMENT ...) ; processing (DEFMETHOD CHARACTERIZE-ELEMENT ...) ; processing (DEFMETHOD MOVE ...) ; processing (DEFMETHOD MOVE-INTERNAL ...) ; processing (DEFMETHOD ADVANCE ...) ; processing (DEFMETHOD COMBINE-ELEMENTS ...) ; processing (DEFMETHOD CURRENT-ELEMENT ...) ; processing (DEFMETHOD CURRENT-ELEMENT-P ...) ; processing (DEFMETHOD MOVE-P ...) ; processing (DEFCLASS* WORD-ITERATOR ...) ; processing (DEFCLASS* LINE-ITERATOR ...) ; processing (DEFMETHOD CLASS-FOR-CONTENTS-AS ...) ; processing (DEFMETHOD CLASS-FOR-CONTENTS-AS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-containers/dev/file-iterators-tmpYY5JG2YX.fasl ; compilation finished in 0:00:00.143 ; compiling file "/usr/share/common-lisp/source/cl-containers/dev/dynamic-classes.lisp" (written 28 MAR 2017 01:15:31 AM): ; processing (IN-PACKAGE #:CL-CONTAINERS) ; processing (DEFVAR *DEFINE-CLASS-FORM* ...) ; processing (DEFUN SIMPLE-DEFINE-CLASS ...) ; processing (DEFUN SIMPLE-DEFINE-CLASS-NAME ...) ; processing (DEFUN DEFINE-CLASS ...) ; processing (DEFUN MAP-SUBCLASSES ...) ; processing (DEFUN SUPERCLASSES ...) ; processing (DEFUN FIND-EXISTING-SUBCLASS ...) ; processing (DEFUN FIND-OR-CREATE-CLASS ...) ; processing (DEFUN REMOVE-REDUNDANT-CLASSES ...) ; processing (DEFUN CLASS-REDUNDANT-P ...) ; processing (DEFGENERIC INCLUDE-CLASS-DEPENDENCIES ...) ; processing (DEFGENERIC EXISTING-SUBCLASS ...) ; processing (DEFVAR *PARAMETER-DYNAMIC-CLASS-TABLE* ...) ; processing (DEFUN TYPE->PARAMETER-TABLE ...) ; processing (DEFUN (SETF TYPE->PARAMETER-TABLE) ...) ; processing (DEFUN PARAMETER->DYNAMIC-CLASS ...) ; processing (DEFUN (SETF PARAMETER->DYNAMIC-CLASS) ...) ; processing (DEFUN TABLE&PARAMETER->DYNAMIC-CLASS ...) ; processing (DEFUN ADD-PARAMETER->DYNAMIC-CLASS ...) ; processing (DEFUN ADD-DYNAMIC-CLASS-FOR-PARAMETERS ...) ; processing (DEFUN EMPTY-ADD-PARAMETER->DYNAMIC-CLASS ...) ; processing (DEFUN EMPTY-ALL-ADD-PARAMETER->DYNAMIC-CLASS ...) ; processing (DEFUN DYNAMIC-CLASS-INFORMATION ...) ; processing (DEFMETHOD INCLUDE-CLASS-DEPENDENCIES ...) ; processing (DEFMETHOD EXISTING-SUBCLASS ...) ; processing (DEFUN DETERMINE-DYNAMIC-CLASS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-containers/dev/dynamic-classes-tmpK2OIRK3I.fasl ; compilation finished in 0:00:00.051 ; compiling file "/usr/share/common-lisp/source/cl-containers/dev/dynamic-class-defs.lisp" (written 28 MAR 2017 01:15:31 AM): ; processing (IN-PACKAGE #:CL-CONTAINERS) ; processing (DEFVAR *CURRENT-ITERATEE* ...) ; processing (DEFMETHOD MAKE-CONTAINER ...) ; processing (ADD-PARAMETER->DYNAMIC-CLASS :ITERATOR ...) ; processing (ADD-PARAMETER->DYNAMIC-CLASS :ITERATOR ...) ; processing (ADD-PARAMETER->DYNAMIC-CLASS :ITERATOR ...) ; processing (ADD-PARAMETER->DYNAMIC-CLASS :ITERATOR ...) ; processing (ADD-PARAMETER->DYNAMIC-CLASS :GENERATOR ...) ; processing (ADD-PARAMETER->DYNAMIC-CLASS :GENERATOR ...) ; processing (ADD-PARAMETER->DYNAMIC-CLASS :GENERATOR ...) ; processing (ADD-PARAMETER->DYNAMIC-CLASS :GENERATOR ...) ; processing (ADD-PARAMETER->DYNAMIC-CLASS :GENERATOR ...) ; processing (ADD-PARAMETER->DYNAMIC-CLASS :GENERATOR ...) ; processing (DEFMETHOD EXISTING-SUBCLASS ...) ; processing (DEFMETHOD EXISTING-SUBCLASS ...) ; processing (DEFUN DETERMINE-ITERATOR-CLASS ...) ; processing (DEFUN DETERMINE-GENERATOR-CLASS ...) ; processing (DEFMETHOD INCLUDE-CLASS-DEPENDENCIES ...) ; processing (DEFMETHOD CLASS-FOR-CONTENTS-AS ...) ; processing (DEFMETHOD BASE-CLASS-FOR-ITERATEE ...) ; processing (DEFMETHOD BASE-CLASS-FOR-ITERATEE ...) ; processing (DEFMETHOD BASE-CLASS-FOR-ITERATEE ...) ; processing (DEFMETHOD BASE-CLASS-FOR-ITERATEE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-containers/dev/dynamic-class-defs-tmpLMNSRE4F.fasl ; compilation finished in 0:00:00.023 ; compiling file "/usr/share/common-lisp/source/anaphora/packages.lisp" (written 27 AUG 2019 12:37:43 PM): ; processing (DEFPACKAGE :ANAPHORA ...) ; processing (DEFPACKAGE :ANAPHORA-BASIC ...) ; processing (DEFPACKAGE :ANAPHORA-SYMBOL ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/anaphora/packages-tmpFH2B6ZC1.fasl ; compilation finished in 0:00:00.000 ; compiling file "/usr/share/common-lisp/source/anaphora/early.lisp" (written 27 AUG 2019 12:37:43 PM): ; processing (IN-PACKAGE :ANAPHORA) ; processing (DEFMACRO WITH-UNIQUE-NAMES ...) ; processing (DEFMACRO IGNORE-FIRST ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/anaphora/early-tmp9ESR3THZ.fasl ; compilation finished in 0:00:00.007 ; compiling file "/usr/share/common-lisp/source/anaphora/symbolic.lisp" (written 27 AUG 2019 12:37:43 PM): ; processing (IN-PACKAGE :ANAPHORA) ; processing (DEFMACRO INTERNAL-SYMBOL-MACROLET ...) ; processing (DEFINE-SETF-EXPANDER INTERNAL-SYMBOL-MACROLET ...) ; processing (WITH-UNIQUE-NAMES (S-INDICATOR CURRENT-S-INDICATOR) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/anaphora/symbolic-tmpEP9DKHA4.fasl ; compilation finished in 0:00:00.007 ; compiling file "/usr/share/common-lisp/source/anaphora/anaphora.lisp" (written 27 AUG 2019 12:37:43 PM): ; processing (IN-PACKAGE :ANAPHORA) ; processing (DEFMACRO ALET ...) ; processing (DEFMACRO SLET ...) ; processing (DEFMACRO AAND ...) ; processing (DEFMACRO SOR ...) ; processing (DEFMACRO AIF ...) ; processing (DEFMACRO SIF ...) ; processing (DEFMACRO ASIF ...) ; processing (DEFMACRO APROG1 ...) ; processing (DEFMACRO AWHEN ...) ; processing (DEFMACRO SWHEN ...) ; processing (DEFMACRO SUNLESS ...) ; processing (DEFMACRO ACASE ...) ; processing (DEFMACRO SCASE ...) ; processing (DEFMACRO AECASE ...) ; processing (DEFMACRO SECASE ...) ; processing (DEFMACRO ACCASE ...) ; processing (DEFMACRO SCCASE ...) ; processing (DEFMACRO ATYPECASE ...) ; processing (DEFMACRO STYPECASE ...) ; processing (DEFMACRO AETYPECASE ...) ; processing (DEFMACRO SETYPECASE ...) ; processing (DEFMACRO ACTYPECASE ...) ; processing (DEFMACRO SCTYPECASE ...) ; processing (DEFMACRO ACOND ...) ; processing (DEFMACRO SCOND ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/anaphora/anaphora-tmp6GNWGQ69.fasl ; compilation finished in 0:00:00.099 ; compiling file "/usr/share/common-lisp/source/cl-markdown/dev/package.lisp" (written 06 OCT 2010 03:06:46 AM): ; processing (IN-PACKAGE #:COMMON-LISP-USER) ; processing (DEFPACKAGE #:CL-MARKDOWN ...) ; processing (DEFPACKAGE #:CL-MARKDOWN-USER ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-markdown/dev/package-tmpTOEVPV91.fasl ; compilation finished in 0:00:00.000 ; compiling file "/usr/share/common-lisp/source/cl-markdown/dev/api.lisp" (written 06 OCT 2010 03:06:46 AM): ; processing (IN-PACKAGE #:CL-MARKDOWN) ; processing (DEFGENERIC RESET ...) ; processing (DEFGENERIC (SETF DOCUMENT-PROPERTY) ...) ; processing (DEFGENERIC RENDER-TO-STREAM ...) ; processing (DEFGENERIC MAIN-PARENT ...) ; processing (DEFGENERIC HANDLE-SPANS ...) ; processing (DEFGENERIC SCAN-ONE-SPAN ...) ; processing (DEFGENERIC PROCESS-SPAN-IN-SPAN-P ...) ; processing (DEFGENERIC UNCONVERT-ESCAPES ...) ; processing (DEFGENERIC RENDER ...) ; processing (DEFGENERIC IT-STARTS-WITH-BLOCK-LEVEL-HTML-P ...) ; processing (DEFGENERIC MARKUP-CLASS-MERGABLE-P ...) ; processing (DEFGENERIC MERGE-LINES-IN-CHUNKS ...) ; processing (DEFGENERIC CAN-MERGE-LINES-P ...) ; processing (DEFGENERIC HANDLE-PARAGRAPH-EVAL-INTERACTIONS ...) ; processing (DEFGENERIC ENCODE-HTML ...) ; processing (DEFGENERIC MARKUP-CLASS-FOR-HTML ...) ; processing (DEFGENERIC RENDER-SPAN-TO-HTML ...) ; processing (DEFGENERIC GENERATE-LINK-OUTPUT ...) ; processing (DEFGENERIC ADD-HTML-HEADER-P ...) ; processing (DEFGENERIC RENDER-PLAIN ...) ; processing (DEFGENERIC RENDER-SPAN-PLAIN ...) ; processing (DEFGENERIC PROCESS-SPAN-FOR ...) ; processing (DEFGENERIC GENERATE-LINK-OUTPUT-FOR-KIND ...) ; processing (DEFGENERIC PROCESS-SPAN ...) ; processing (DEFGENERIC PRINT-HTML-MARKUP ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-markdown/dev/api-tmpJKXRXFYA.fasl ; compilation finished in 0:00:00.003 ; compiling file "/usr/share/common-lisp/source/cl-markdown/dev/definitions.lisp" (written 06 OCT 2010 03:06:46 AM): ; processing (IN-PACKAGE #:CL-MARKDOWN) ; processing (DEFPARAMETER *SPACES-PER-TAB* ...) ; processing (DEFPARAMETER *PARSING-ENVIRONMENT* ...) ; processing (DEFPARAMETER *CHUNK-PARSING-ENVIRONMENTS* ...) ; processing (DEFPARAMETER *SPANNER-PARSING-ENVIRONMENTS* ...) ; processing (DEFPARAMETER *HORIZONTAL-RULE-COUNT-THRESHOLD* ...) ; processing (DEFPARAMETER *DEFAULT-STREAM* ...) ; processing (DEFPARAMETER *DEFAULT-FORMAT* ...) ; processing (DEFVAR *OUTPUT-STREAM* ...) ; processing (DEFVAR *CURRENT-INDENTATION-LEVEL* ...) ; processing (DEFPARAMETER *CURRENT-DOCUMENT* ...) ; processing (DEFPARAMETER *CURRENT-FORMAT* ...) ; processing (DEFPARAMETER *RENDER-ACTIVE-FUNCTIONS* ...) ; processing (DEFPARAMETER *PARSE-ACTIVE-FUNCTIONS* ...) ; processing (DEFPARAMETER *BLOCK-LEVEL-HTML-TAGS* ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-markdown/dev/definitions-tmpKW802XDA.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/cl-markdown/dev/macros.lisp" (written 06 OCT 2010 03:06:46 AM): ; processing (IN-PACKAGE #:CL-MARKDOWN) ; processing (DEFMACRO DEFSIMPLE-EXTENSION ...) ; processing (DEFUN %VALIDATE-DEFEXTENSION-ARGUMENTS ...) ; processing (DEFUN %COLLECT-ARGUMENTS ...) ; processing (DEFUN %COLLECT-POSITIONALS ...) ; processing (DEFPARAMETER *EXTENSIONS* ...) ; processing (DEFMACRO DEFEXTENSION ...) ; processing (DEFUN %IMPORT/EXPORT-SYMBOL ...) ; processing (DEFMACRO AAND+ ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-markdown/dev/macros-tmpO26O9DBY.fasl ; compilation finished in 0:00:00.075 ; compiling file "/usr/share/common-lisp/source/cl-markdown/dev/class-defs.lisp" (written 06 OCT 2010 03:06:46 AM): ; processing (IN-PACKAGE #:CL-MARKDOWN) ; processing (DEFCLASS MARKDOWN-WARNING ...) ; processing (DEFCLASS* ABSTRACT-DOCUMENT ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFCLASS* DOCUMENT ...) ; processing (DEFCLASS* CHILD-DOCUMENT ...) ; processing (DEFCLASS* MULTI-DOCUMENT ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFCLASS* INCLUDED-DOCUMENT ...) ; processing (DEFGENERIC DOCUMENT-PROPERTY ...) ; processing (DEFMETHOD DOCUMENT-PROPERTY ...) ; processing (DEFMETHOD (SETF DOCUMENT-PROPERTY) ...) ; processing (DEFUN FIND-LINK ...) ; processing (DEFUN FORM-PROPERTY-NAME ...) ; processing (DEFCLASS* CHUNK ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFCLASS* CHUNK-PARSING-ENVIRONMENT ...) ; processing (DEFCLASS* PARSING-ENVIRONMENT ...) ; processing (DEFUN CURRENT-CHUNK-PARSER ...) ; processing (DEFCLASS* BASIC-LINK-INFO ...) ; processing (DEFCLASS* LINK-INFO ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFCLASS* EXTENDED-LINK-INFO ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-markdown/dev/class-defs-tmpYLEULPBM.fasl ; compilation finished in 0:00:00.083 ; compiling file "/usr/share/common-lisp/source/cl-markdown/dev/utilities.lisp" (written 06 OCT 2010 03:06:46 AM): ; processing (IN-PACKAGE #:CL-MARKDOWN) ; processing (DEFUN NEXT-BLOCK ...) ; processing (DEFMETHOD RENDER-TO-STREAM ...) ; processing (DEFUN ENSURE-STRING ...) ; processing (DEFMETHOD MAIN-PARENT ...) ; processing (DEFMETHOD MAIN-PARENT ...) ; processing (DEFUN ROOT-PARENT ...) ; processing (DEFUN COLLECT-LINKS ...) ; processing (DEFUN STARTS-WITH ...) ; processing (DEFUN MARKDOWN-WARNING ...) ; processing (EVAL-ALWAYS (DEFUN _MARK-RANGE ...) ...) ; processing (DEFPARAMETER +FIRST-NAME-CHARACTERS+ ...) ; processing (DEFPARAMETER +NAME-CHARACTERS+ ...) ; processing (DEFUN HTML-SAFE-NAME ...) ; processing (DEFUN STRING->LIST ...) ; processing (DEFUN PROCESS-BRACKETS ...) ; processing (DEFUN SHORT-SOURCE ...) ; processing (DEFUN COULD-BE-HTML-TAG-P ...) ; processing (DEFUN STREAM-STRING-FOR-HTML ...) ; processing (DEFUN ENCODE-STRING-FOR-HTML ...) ; processing (DEFUN ENCODE-PRE ...) ; processing (DEFUN ENCODE-STRING-FOR-TITLE ...) ; processing (DEFUN FIND-INCLUDE-FILE ...) ; processing (DEFUN PROCESS-CHILD-MARKDOWN ...) ; processing (DEFUN ASDF-SYSTEM-SOURCE-FILE ...) ; processing (DEFUN ASDF-SYSTEM-SOURCE-DIRECTORY ...) ; processing (DEFUN SYSTEM-RELATIVE-PATHNAME ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-markdown/dev/utilities-tmpF9PT7DQ2.fasl ; compilation finished in 0:00:00.255 ; compiling file "/usr/share/common-lisp/source/cl-markdown/dev/regexes.lisp" (written 06 OCT 2010 03:06:46 AM): ; processing (IN-PACKAGE #:MARKDOWN) ; processing (DEFINE-PARSE-TREE-SYNONYM LINE-ENDS-WITH-TWO-SPACES ...) ; processing (DEFINE-PARSE-TREE-SYNONYM EMPHASIS-1 ...) ; processing (DEFINE-PARSE-TREE-SYNONYM EMPHASIS-2 ...) ; processing (DEFINE-PARSE-TREE-SYNONYM STRONG-1 ...) ; processing (DEFINE-PARSE-TREE-SYNONYM STRONG-2 ...) ; processing (DEFINE-PARSE-TREE-SYNONYM STRONG-EM-1 ...) ; processing (DEFINE-PARSE-TREE-SYNONYM STRONG-EM-2 ...) ; processing (DEFINE-PARSE-TREE-SYNONYM BACKTICK ...) ; processing (DEFINE-PARSE-TREE-SYNONYM AUTO-LINK ...) ; processing (DEFINE-PARSE-TREE-SYNONYM AUTO-MAIL ...) ; processing (DEFINE-PARSE-TREE-SYNONYM HTML ...) ; processing (DEFINE-PARSE-TREE-SYNONYM ENTITY ...) ; processing (DEFINE-PARSE-TREE-SYNONYM HOSTNAME-CHAR ...) ; processing (DEFINE-PARSE-TREE-SYNONYM HOSTNAME ...) ; processing (DEFINE-PARSE-TREE-SYNONYM PATHNAME-CHAR ...) ; processing (DEFINE-PARSE-TREE-SYNONYM URL-PATHNAME ...) ; processing (DEFINE-PARSE-TREE-SYNONYM URL ...) ; processing (DEFINE-PARSE-TREE-SYNONYM URL-NO-REGISTERS ...) ; processing (DEFINE-PARSE-TREE-SYNONYM BRACKETED ...) ; processing (DEFPARAMETER *ESCAPE-CHARACTERS* ...) ; processing (DEFINE-PARSE-TREE-SYNONYM VALID-ESCAPE ...) ; processing (DEFINE-PARSE-TREE-SYNONYM ESCAPED-CHARACTER ...) ; processing (DEFINE-PARSE-TREE-SYNONYM ESCAPE-KLUDGE ...) ; processing (DEFINE-PARSE-TREE-SYNONYM LINK+TITLE ...) ; processing (DEFINE-PARSE-TREE-SYNONYM INLINE-LINK ...) ; processing (DEFINE-PARSE-TREE-SYNONYM REFERENCE-LINK ...) ; processing (DEFINE-PARSE-TREE-SYNONYM LINK-LABEL ...) ; processing (DEFINE-PARSE-TREE-SYNONYM EXTENDED-LINK-LABEL ...) ; processing (DEFINE-PARSE-TREE-SYNONYM CODED-REFERENCE-LINK ...) ; processing (DEFINE-PARSE-TREE-SYNONYM BRACKETED ...) ; processing (DEFINE-PARSE-TREE-SYNONYM INLINE-IMAGE ...) ; processing (DEFINE-PARSE-TREE-SYNONYM INLINE-IMAGE ...) ; processing (DEFINE-PARSE-TREE-SYNONYM REFERENCE-IMAGE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-markdown/dev/regexes-tmpZVXJSSK9.fasl ; compilation finished in 0:00:00.011 ; compiling file "/usr/share/common-lisp/source/cl-markdown/dev/spans.lisp" (written 06 OCT 2010 03:06:46 AM): ; processing (IN-PACKAGE #:CL-MARKDOWN) ; processing (DEFVAR *CURRENT-SPAN* ...) ; processing (DEFSTRUCT (MARKDOWN-SCANNER #) ...) ; processing (SETF (ITEM-AT-1 *SPANNER-PARSING-ENVIRONMENTS* ...) ...) ; processing (SETF (ITEM-AT-1 *SPANNER-PARSING-ENVIRONMENTS* ...) ...) ; processing (DEFUN SCANNERS-FOR-CHUNK ...) ; processing (DEFMETHOD HANDLE-SPANS ...) ; processing (DEFMETHOD HANDLE-SPANS ...) ; processing (DEFUN SCAN-LINES-WITH-SCANNERS ...) ; processing (DEFMETHOD SCAN-ONE-SPAN ...) ; processing (DEFMETHOD SCAN-ONE-SPAN ...) ; processing (DEFMETHOD PROCESS-SPAN-IN-SPAN-P ...) ; processing (DEFMETHOD PROCESS-SPAN-IN-SPAN-P ...) ; processing (DEFMETHOD PROCESS-SPAN-IN-SPAN-P ...) ; processing (DEFMETHOD PROCESS-SPAN-IN-SPAN-P ...) ; processing (DEFMETHOD PROCESS-SPAN-IN-SPAN-P ...) ; processing (DEFMETHOD PROCESS-SPAN-IN-SPAN-P ...) ; processing (DEFMETHOD PROCESS-SPAN-IN-SPAN-P ...) ; processing (DEFMETHOD PROCESS-SPAN-IN-SPAN-P ...) ; processing (DEFMETHOD PROCESS-SPAN-IN-SPAN-P ...) ; processing (DEFMETHOD SCAN-ONE-SPAN ...) ; processing (DEFUN COMBINE-STRINGS ...) ; processing (DEFUN CONVERT-ESCAPE-TEMPORARILY ...) ; processing (DEFMETHOD UNCONVERT-ESCAPES ...) ; processing (DEFMETHOD UNCONVERT-ESCAPES ...) ; file: /usr/share/common-lisp/source/cl-markdown/dev/spans.lisp ; in: DEFMETHOD UNCONVERT-ESCAPES (STRING) ; (FIRST CL-MARKDOWN::REGISTERS) ; ; caught STYLE-WARNING: ; This is not a STRING: ; NIL ; See also: ; The SBCL Manual, Node "Handling of Types" ; processing (DEFMETHOD UNCONVERT-ESCAPES ...) ; processing (DEFMETHOD UNCONVERT-ESCAPES ...) ; processing (DEFMETHOD UNCONVERT-ESCAPES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-markdown/dev/spans-tmpHE83XZ7O.fasl ; compilation finished in 0:00:00.167 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/cl-markdown/dev/markdown.lisp" (written 06 OCT 2010 03:06:46 AM): ; processing (IN-PACKAGE #:CL-MARKDOWN) ; processing (DEFUN MARKDOWN ...) ; processing (DEFUN CONTAINING-DIRECTORY ...) ; processing (DEFMETHOD RENDER ...) ; processing (DEFMETHOD RENDER ...) ; processing (DEFMETHOD RESET ...) ; processing (DEFUN NULL-STRIPPER ...) ; processing (DEFUN ONE-TAB-STRIPPER ...) ; processing (DEFUN BLOCKQUOTE-STRIPPER ...) ; processing (DEFUN BLOCKQUOTE-COUNT ...) ; processing (DEFUN LINE-INDENTATION ...) ; processing (DEFUN LINE-CHANGES-INDENTATION-P ...) ; processing (DEFUN LINE-STARTS-WITH-BULLET-P ...) ; processing (DEFUN CHAR-IS-TAB-OR-SPACE-P ...) ; processing (DEFUN CHAR-IS-BULLET-P ...) ; processing (DEFUN LINE-STARTS-WITH-NUMBER-P ...) ; processing (DEFUN LINE-IS-EMPTY-P ...) ; processing (DEFUN LINE-IS-NOT-EMPTY-P ...) ; processing (DEFUN LINE-IS-BLOCKQUOTE-P ...) ; processing (DEFUN LINE-IS-CODE-P ...) ; processing (DEFUN LINE-COULD-BE-HEADER-MARKER-P ...) ; processing (DEFUN LINE-IS-LINK-LABEL-P ...) ; processing (DEFUN LINE-IS-EXTENDED-LINK-LABEL-P ...) ; processing (DEFUN LINE-OTHER-P ...) ; processing (DEFUN HORIZONTAL-RULE-CHAR-P ...) ; processing (DEFUN LINE-IS-HORIZONTAL-RULE-P ...) ; processing (SETF (ITEM-AT-1 *CHUNK-PARSING-ENVIRONMENTS* ...) ...) ; processing (SETF (ITEM-AT-1 *CHUNK-PARSING-ENVIRONMENTS* ...) ...) ; processing (DEFUN MAYBE-STRIP-LINE ...) ; processing (DEFUN CHUNK-SOURCE ...) ; processing (DEFUN HANDLE-HORIZONTAL-RULES ...) ; processing (DEFMETHOD IT-STARTS-WITH-BLOCK-LEVEL-HTML-P ...) ; processing (DEFMETHOD IT-STARTS-WITH-BLOCK-LEVEL-HTML-P ...) ; processing (DEFUN HANDLE-PARAGRAPHS ...) ; processing (DEFUN HANDLE-BULLET-PARAGRAPHS ...) ; processing (DEFUN HANDLE-ATX-HEADERS ...) ; processing (DEFUN MAKE-HEADER ...) ; processing (DEFUN ATX-HEADER-P ...) ; processing (DEFUN ATX-HEADER-MARKUP-CLASS ...) ; processing (DEFUN REMOVE-ATX-HEADER ...) ; processing (DEFUN CAN-MERGE-CHUNKS-P ...) ; processing (DEFMETHOD MARKUP-CLASS-MERGABLE-P ...) ; processing (DEFMETHOD MARKUP-CLASS-MERGABLE-P ...) ; processing (DEFUN MERGE-CHUNKS-IN-DOCUMENT ...) ; processing (DEFUN MERGE-CHUNKS ...) ; processing (DEFMETHOD MERGE-LINES-IN-CHUNKS ...) ; processing (DEFMETHOD MERGE-LINES-IN-CHUNKS ...) ; processing (DEFMETHOD MERGE-LINES-IN-CHUNKS ...) ; processing (DEFMETHOD CAN-MERGE-LINES-P ...) ; processing (DEFMETHOD CAN-MERGE-LINES-P ...) ; processing (DEFUN HANDLE-SETEXT-HEADERS ...) ; processing (DEFUN REMOVED-IGNORED-CHUNKS? ...) ; processing (DEFUN SETEXT-HEADER-MARKUP-CLASS ...) ; processing (DEFUN HANDLE-LINK-REFERENCE-TITLES ...) ; processing (DEFUN HANDLE-EXTENDED-LINK-REFERENCES ...) ; processing (DEFUN LINE-COULD-BE-LINK-REFERENCE-TITLE-P ...) ; processing (DEFUN HANDLE-BULLET-LISTS ...) ; processing (DEFUN REMOVE-BULLET ...) ; processing (DEFUN HANDLE-NUMBER-LISTS ...) ; processing (DEFUN REMOVE-NUMBER ...) ; processing (DEFUN HANDLE-BLOCKQUOTES ...) ; processing (DEFUN REMOVE-BLOCKQUOTE ...) ; processing (DEFUN HANDLE-CODE ...) ; processing (DEFUN REMOVE-INDENT ...) ; processing (DEFUN CANONIZE-DOCUMENT ...) ; processing (DEFUN CANONIZE-CHUNK-MARKUP-CLASS ...) ; processing (DEFUN CANONIZE-MARKUP-CLASS ...) ; processing (DEFUN CLEANUP ...) ; processing (DEFUN REMOVE-EMPTY-BITS ...) ; processing (DEFMETHOD HANDLE-PARAGRAPH-EVAL-INTERACTIONS ...) ; processing (DEFMETHOD HANDLE-PARAGRAPH-EVAL-INTERACTIONS ...) ; processing (DEFUN CHUNK-WANTS-PARAGRAPH-P ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-markdown/dev/markdown-tmpU3H21CW4.fasl ; compilation finished in 0:00:00.311 ; compiling file "/usr/share/common-lisp/source/cl-markdown/dev/html.lisp" (written 06 OCT 2010 03:06:46 AM): ; processing (IN-PACKAGE #:CL-MARKDOWN) ; processing (DEFSTRUCT (HTML-MARKUP # ...) ...) ; processing (DEFMETHOD PRINT-HTML-MARKUP ...) ; processing (DEFPARAMETER *MARKUP->HTML* ...) ; processing (DEFVAR *MAGIC-SPACE-P* ...) ; processing (DEFVAR *MAGIC-LINE-P* ...) ; processing (DEFPARAMETER *MAGIC-SPACE* ...) ; processing (DEFPARAMETER *MAGIC-LINE* ...) ; processing (DEFGENERIC RENDER-TO-HTML ...) ; processing (DEFMETHOD RENDER ...) ; processing (DEFUN HTML-BLOCK-MARKUP ...) ; processing (DEFUN HTML-INNER-BLOCK-MARKUP ...) ; processing (DEFMETHOD RENDER-TO-HTML ...) ; processing (DEFMETHOD ENCODE-HTML ...) ; processing (DEFMETHOD ENCODE-HTML ...) ; processing (DEFMETHOD MARKUP-CLASS-FOR-HTML ...) ; processing (DEFMETHOD RENDER-TO-HTML ...) ; processing (DEFMETHOD RENDER-TO-HTML ...) ; processing (DEFUN OUTPUT-HTML ...) ; processing (DEFMETHOD RENDER-SPAN-TO-HTML ...) ; processing (DEFMETHOD RENDER-SPAN-TO-HTML ...) ; processing (DEFMETHOD RENDER-SPAN-TO-HTML ...) ; processing (DEFMETHOD RENDER-SPAN-TO-HTML ...) ; processing (DEFMETHOD RENDER-SPAN-TO-HTML ...) ; processing (DEFMETHOD RENDER-SPAN-TO-HTML ...) ; processing (DEFMETHOD RENDER-SPAN-TO-HTML ...) ; processing (DEFMETHOD RENDER-SPAN-TO-HTML ...) ; processing (DEFMETHOD GENERATE-LINK-OUTPUT ...) ; processing (DEFMETHOD GENERATE-LINK-OUTPUT ...) ; processing (DEFMETHOD RENDER-SPAN-TO-HTML ...) ; processing (DEFMETHOD RENDER-SPAN-TO-HTML ...) ; processing (DEFMETHOD RENDER-SPAN-TO-HTML ...) ; processing (DEFMETHOD RENDER-SPAN-TO-HTML ...) ; processing (DEFUN OUTPUT-LINK ...) ; processing (DEFUN OUTPUT-IMAGE ...) ; processing (DEFMETHOD RENDER-SPAN-TO-HTML ...) ; processing (DEFMETHOD RENDER-SPAN-TO-HTML ...) ; processing (DEFUN STREAM-OUT-MARKUP ...) ; processing (DEFMETHOD RENDER-TO-HTML ...) ; processing (DEFMETHOD ADD-HTML-HEADER-P ...) ; processing (DEFMETHOD ADD-HTML-HEADER-P ...) ; processing (DEFUN INNER-BLOCK ...) ; processing (DEFVAR *HTML-META* ...) ; processing (DEFUN GENERATE-HTML-HEADER ...) ; processing (DEFUN GENERATE-DOCTYPE ...) ; processing (DEFUN INSERT-STYLE-SHEET ...) ; processing (DEFUN OUTPUT-ANCHOR ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-markdown/dev/html-tmp6L9FXRGE.fasl ; compilation finished in 0:00:00.259 ; compiling file "/usr/share/common-lisp/source/cl-markdown/dev/plain.lisp" (written 06 OCT 2010 03:06:46 AM): ; processing (IN-PACKAGE #:CL-MARKDOWN) ; processing (DEFMETHOD RENDER ...) ; processing (DEFMETHOD RENDER-PLAIN ...) ; processing (DEFMETHOD RENDER-PLAIN ...) ; processing (DEFMETHOD RENDER-PLAIN ...) ; processing (DEFMETHOD RENDER-PLAIN ...) ; processing (DEFMETHOD RENDER-SPAN-PLAIN ...) ; processing (DEFMETHOD RENDER-SPAN-PLAIN ...) ; processing (DEFMETHOD RENDER-SPAN-PLAIN ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-markdown/dev/plain-tmp4SNFF0M5.fasl ; compilation finished in 0:00:00.051 ; compiling file "/usr/share/common-lisp/source/cl-markdown/dev/multiple-documents.lisp" (written 06 OCT 2010 03:06:46 AM): ; processing (IN-PACKAGE #:CL-MARKDOWN) ; processing (DEFUN MARKDOWN-MANY ...) ; processing (DEFUN MERGE-ARGUMENTS ...) ; processing (DEFUN TRANSFER-DOCUMENT-DATA ...) ; processing (DEFUN TRANSFER-DOCUMENT-METADATA ...) ; processing (DEFUN TRANSFER-SELECTED-PROPERTIES ...) ; processing (DEFUN TRANSFER-LINK-INFO ...) ; processing (DEFGENERIC TRANSFER-1-LINK-INFO ...) ; processing (DEFMETHOD TRANSFER-1-LINK-INFO ...) ; processing (DEFUN RELATIVE-URL-WRT-DESTINATION ...) ; processing (DEFUN RELATIVE-URL-P ...) ; processing (DEFMETHOD TRANSFER-1-LINK-INFO ...) ; processing (DEFGENERIC UGLY-CREATE-FROM-TEMPLATE ...) ; processing (DEFMETHOD UGLY-CREATE-FROM-TEMPLATE ...) ; processing (DEFGENERIC MERGE-ENTRIES ...) ; processing (DEFMETHOD MERGE-ENTRIES ...) ; processing (DEFMETHOD MERGE-ENTRIES ...) ; processing (DEFMETHOD MERGE-ENTRIES ...) ; processing (DEFMETHOD MERGE-ENTRIES ...) ; processing (DEFMETHOD MERGE-ENTRIES ...) ; processing (DEFMETHOD MERGE-ENTRIES ...) ; processing (DEFMETHOD MERGE-ENTRIES ...) ; processing (DEFMETHOD MERGE-ENTRIES ...) ; processing (DEFMETHOD MERGE-ENTRIES ...) ; processing (DEFUN MERGE-ELEMENTS-VIA-ITERATION ...) ; processing (DEFUN MERGE-USING-KEY-VALUE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-markdown/dev/multiple-documents-tmpCM27R9AJ.fasl ; compilation finished in 0:00:00.119 ; compiling file "/usr/share/common-lisp/source/cl-markdown/dev/epilogue.lisp" (written 06 OCT 2010 03:06:46 AM): ; processing (IN-PACKAGE #:CL-MARKDOWN) ; processing (SETF *PARSING-ENVIRONMENT* ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-markdown/dev/epilogue-tmp46E7TEHY.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/cl-markdown/dev/extension-mechanisms.lisp" (written 06 OCT 2010 03:06:46 AM): ; processing (IN-PACKAGE #:CL-MARKDOWN) ; processing (DEFUN ADD-EXTENSION ...) ; processing (DEFINE-PARSE-TREE-SYNONYM WIKI-LINK ...) ; processing (DEFINE-PARSE-TREE-SYNONYM EVAL ...) ; processing (DEFINE-PARSE-TREE-SYNONYM EVAL-IN-CODE ...) ; processing (ADD-EXTENSION (MAKE-MARKDOWN-SCANNER :REGEX ...) ...) ; processing (ADD-EXTENSION (MAKE-MARKDOWN-SCANNER :REGEX ...) ...) ; processing (DEFMETHOD RENDER-SPAN-TO-HTML ...) ; processing (DEFMETHOD RENDER-SPAN-TO-HTML ...) ; processing (DEFUN RENDER-HANDLE-EVAL ...) ; processing (DEFUN CANONIZE-COMMAND ...) ; processing (DEFMETHOD PROCESS-SPAN ...) ; processing (DEFMETHOD PROCESS-SPAN ...) ; processing (DEFUN PROCESS-HANDLE-EVAL ...) ; processing (DEFMETHOD PROCESS-SPAN-IN-SPAN-P ...) ; processing (DEFMETHOD PROCESS-SPAN-IN-SPAN-P ...) ; processing (DEFUN %PULL-ARGUMENTS-FROM-STRING ...) ; processing (DEFMETHOD GENERATE-LINK-OUTPUT-FOR-KIND ...) ; processing (DEFEXTENSION (GLOSSARY) ...) ; processing (DEFMETHOD GENERATE-LINK-OUTPUT-FOR-KIND ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-markdown/dev/extension-mechanisms-tmpMW4DE87N.fasl ; compilation finished in 0:00:00.099 ; compiling file "/usr/share/common-lisp/source/cl-markdown/dev/extensions.lisp" (written 06 OCT 2010 03:06:46 AM): ; processing (IN-PACKAGE #:CL-MARKDOWN) ; processing (DEFSIMPLE-EXTENSION TODAY ...) ; processing (DEFSIMPLE-EXTENSION NOW ...) ; processing (DEFEXTENSION (COMMENT :ARGUMENTS ...) ...) ; processing (DEFEXTENSION (REMARK :ARGUMENTS ...) ...) ; processing (DEFEXTENSION (ANCHOR :ARGUMENTS ...) ...) ; processing (DEFEXTENSION (PROPERTY :ARGUMENTS ...) ...) ; processing (DEFEXTENSION (IFDEF :ARGUMENTS ...) ...) ; processing (DEFEXTENSION (SET-PROPERTY :ARGUMENTS ...) ...) ; processing (DEFEXTENSION (TABLE-OF-CONTENTS :ARGUMENTS ...) ...) ; processing (DEFUN COLLECT-TOC-HEADINGS ...) ; processing (DEFSIMPLE-EXTENSION TOC-LINK ...) ; processing (DEFUN MAKE-REF ...) ; processing (DEFUN ADD-TOC-ANCHORS ...) ; processing (DEFUN SIMPLE-ANCHOR-P ...) ; processing (DEFUN HEADER-P ...) ; processing (DEFEXTENSION (ABBREV :ARGUMENTS ...) ...) ; processing (DEFEXTENSION (INCLUDE :ARGUMENTS ...) ...) ; processing (DEFEXTENSION (INCLUDE-IF :ARGUMENTS ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-markdown/dev/extensions-tmp2JNAKTBR.fasl ; compilation finished in 0:00:00.723 ; compiling file "/usr/share/common-lisp/source/cl-markdown/dev/footnotes.lisp" (written 06 OCT 2010 03:06:46 AM): ; processing (IN-PACKAGE #:CL-MARKDOWN) ; processing (DEFCLASS* FOOTNOTE-INFO ...) ; processing (SETF *EXTENSIONS* ...) ; processing (PUSH (LIST # ...) ...) ; processing (SETF *EXTENSIONS* ...) ; processing (PUSH (LIST # ...) ...) ; processing (DEFUN FOOTNOTE ...) ; processing (DEFUN FOOTNOTES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-markdown/dev/footnotes-tmpMR8VKH1U.fasl ; compilation finished in 0:00:00.015 ; compiling file "/usr/share/common-lisp/source/trivial-utf-8/trivial-utf-8.lisp" (written 01 OCT 2011 03:17:57 AM): ; processing (DEFPACKAGE :TRIVIAL-UTF-8 ...) ; processing (IN-PACKAGE :TRIVIAL-UTF-8) ; processing (DEFPARAMETER *OPTIMIZE* ...) ; processing (DEFUN UTF-8-BYTE-LENGTH ...) ; processing (DEFMACRO AS-UTF-8-BYTES ...) ; processing (DEFUN STRING-TO-UTF-8-BYTES ...) ; processing (DEFUN WRITE-UTF-8-BYTES ...) ; processing (DEFINE-CONDITION UTF-8-DECODING-ERROR ...) ; processing (DECLAIM (INLINE UTF-8-GROUP-SIZE)) ; processing (DEFUN UTF-8-GROUP-SIZE ...) ; processing (DEFUN UTF-8-STRING-LENGTH ...) ; processing (DEFUN GET-UTF-8-CHARACTER ...) ; processing (DEFUN UTF-8-BYTES-TO-STRING ...) ; processing (DEFUN READ-UTF-8-STRING ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/trivial-utf-8/trivial-utf-8-tmp4HP247ND.fasl ; compilation finished in 0:00:00.191 ; compiling file "/usr/share/common-lisp/source/uuid/uuid.lisp" (written 28 JUL 2013 03:35:41 PM): ; processing (DEFPACKAGE :UUID ...) ; processing (IN-PACKAGE :UUID) ; processing (DEFVAR *CLOCK-SEQ* ...) ; processing (DEFVAR *NODE* ...) ; processing (DEFVAR *TICKS-PER-COUNT* ...) ; processing (DEFPARAMETER *UUID-RANDOM-STATE* ...) ; processing (DEFCLASS UUID ...) ; processing (DEFUN MAKE-UUID-FROM-STRING ...) ; processing (DEFPARAMETER +NAMESPACE-DNS+ ...) ; processing (DEFPARAMETER +NAMESPACE-URL+ ...) ; processing (DEFPARAMETER +NAMESPACE-OID+ ...) ; processing (DEFPARAMETER +NAMESPACE-X500+ ...) ; processing (DEFUN GET-NODE-ID ...) ; processing (LET (# #) ...) ; processing (DEFUN FORMAT-V3OR5-UUID ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN PRINT-BYTES ...) ; processing (DEFUN FORMAT-AS-URN ...) ; processing (DEFUN MAKE-NULL-UUID ...) ; processing (DEFUN MAKE-V1-UUID ...) ; processing (DEFUN MAKE-V3-UUID ...) ; processing (DEFUN MAKE-V4-UUID ...) ; processing (DEFUN MAKE-V5-UUID ...) ; processing (DEFUN UUID= ...) ; processing (DEFUN UUID-TO-BYTE-ARRAY ...) ; processing (DEFMACRO ARR-TO-BYTES ...) ; processing (DEFUN BYTE-ARRAY-TO-UUID ...) ; processing (DEFUN DIGEST-UUID ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/uuid/uuid-tmpCBPA3J2K.fasl ; compilation finished in 0:00:00.147 ; compiling file "/usr/share/common-lisp/source/cl-utilities/package.lisp" (written 02 MAY 2006 01:55:58 PM): ; processing (DEFPACKAGE :CL-UTILITIES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-utilities/package-tmpUKEKWS3E.fasl ; compilation finished in 0:00:00.000 ; compiling file "/usr/share/common-lisp/source/cl-utilities/split-sequence.lisp" (written 02 MAY 2006 01:55:58 PM): ; processing (IN-PACKAGE :CL-UTILITIES) ; processing (DEFUN SPLIT-SEQUENCE ...) ; processing (DEFUN SPLIT-SEQUENCE-IF ...) ; processing (DEFUN SPLIT-SEQUENCE-IF-NOT ...) ; processing (DEFUN PARTITION ...) ; processing (DEFUN PARTITION-IF ...) ; processing (DEFUN PARTITION-IF-NOT ...) ; processing (DEFINE-COMPILER-MACRO PARTITION ...) ; processing (DEFINE-COMPILER-MACRO PARTITION-IF ...) ; processing (DEFINE-COMPILER-MACRO PARTITION-IF-NOT ...) ; processing (PUSHNEW :SPLIT-SEQUENCE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-utilities/split-sequence-tmpP1N1L2FE.fasl ; compilation finished in 0:00:00.095 ; compiling file "/usr/share/common-lisp/source/cl-utilities/with-unique-names.lisp" (written 02 MAY 2006 01:55:58 PM): ; processing (IN-PACKAGE :CL-UTILITIES) ; processing (DEFMACRO WITH-UNIQUE-NAMES ...) ; processing (DEFUN %WITH-UNIQUE-NAMES-BINDING-PARTS ...) ; processing (DEFINE-CONDITION LIST-BINDING-NOT-SUPPORTED ...) ; processing (DEFMACRO WITH-GENSYMS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-utilities/with-unique-names-tmpJZ1AFCDQ.fasl ; compilation finished in 0:00:00.019 ; compiling file "/usr/share/common-lisp/source/cl-utilities/once-only.lisp" (written 02 MAY 2006 01:55:58 PM): ; processing (IN-PACKAGE :CL-UTILITIES) ; processing (DEFUN %CHECK-ONCE-ONLY-NAMES ...) ; processing (DEFMACRO ONCE-ONLY ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-utilities/once-only-tmpE2RDUEQF.fasl ; compilation finished in 0:00:00.019 ; compiling file "/usr/share/common-lisp/source/cl-utilities/extremum.lisp" (written 02 MAY 2006 01:55:58 PM): ; processing (IN-PACKAGE :CL-UTILITIES) ; processing (DEFINE-CONDITION NO-EXTREMUM ...) ; processing (DEFUN COMPARATOR ...) ; file: /usr/share/common-lisp/source/cl-utilities/extremum.lisp ; in: DEFUN COMPARATOR ; (FUNCALL CL-UTILITIES::TEST (FUNCALL CL-UTILITIES::KEY CL-UTILITIES::A) ; (FUNCALL CL-UTILITIES::KEY CL-UTILITIES::B)) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST is not known to be a function ; (FUNCALL CL-UTILITIES::KEY CL-UTILITIES::A) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; KEY is not known to be a function ; (FUNCALL CL-UTILITIES::KEY CL-UTILITIES::B) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; KEY is not known to be a function ; processing (DEFINE-COMPILER-MACRO COMPARATOR ...) ; processing (DEFUN ZERO-LENGTH-P ...) ; processing (DECLAIM (INLINE ZERO-LENGTH-P)) ; processing (DEFMACRO WITH-CHECK-LENGTH ...) ; processing (DEFUN EXTREMUM ...) ; file: /usr/share/common-lisp/source/cl-utilities/extremum.lisp ; in: DEFUN EXTREMUM ; (DEFUN CL-UTILITIES:EXTREMUM ; (SEQUENCE CL-UTILITIES::PREDICATE ; &KEY (CL-UTILITIES::KEY #'IDENTITY) (CL-UTILITIES::START 0) ; CL-UTILITIES::END) ; #<(SIMPLE-ARRAY CHARACTER ; (225)) Returns the element of SEQUENCE that would appear first if the ; sequence were ordered according to SORT using PREDICATE and KEY using ; an unstable sorting algorithm. See http://www.cliki.net/EXTREMUM fo... {1011AA3CBF}> ; (CL-UTILITIES::WITH-CHECK-LENGTH (SEQUENCE CL-UTILITIES::START ; CL-UTILITIES::END) ; (REDUCE ; (CL-UTILITIES::COMPARATOR CL-UTILITIES::PREDICATE CL-UTILITIES::KEY) ; SEQUENCE :START CL-UTILITIES::START :END CL-UTILITIES::END))) ; --> PROGN ; ==> ; (SB-IMPL::%DEFUN 'CL-UTILITIES:EXTREMUM ; (SB-INT:NAMED-LAMBDA CL-UTILITIES:EXTREMUM ; (SEQUENCE CL-UTILITIES::PREDICATE &KEY ; (CL-UTILITIES::KEY #'IDENTITY) (CL-UTILITIES::START 0) ; CL-UTILITIES::END) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; #<(SIMPLE-ARRAY CHARACTER ; (225)) Returns the element of SEQUENCE that would appear first if the ; sequence were ordered according to SORT using PREDICATE and KEY using ; an unstable sorting algorithm. See http://www.cliki.net/EXTREMUM fo... {1011AA3CBF}> ; (BLOCK CL-UTILITIES:EXTREMUM ; (CL-UTILITIES::WITH-CHECK-LENGTH (SEQUENCE ; CL-UTILITIES::START ; CL-UTILITIES::END) ; (REDUCE # SEQUENCE :START CL-UTILITIES::START :END ; CL-UTILITIES::END))))) ; ; caught STYLE-WARNING: ; Call to CL-UTILITIES::ZERO-LENGTH-P could not be inlined because its source ; code was not saved. A global INLINE or SB-EXT:MAYBE-INLINE proclamation must be ; in effect to save function definitions for inlining. ; processing (DEFINE-COMPILER-MACRO EXTREMUM ...) ; processing (DEFUN EXTREMUM-FASTKEY ...) ; file: /usr/share/common-lisp/source/cl-utilities/extremum.lisp ; in: DEFUN EXTREMUM-FASTKEY ; (FUNCALL CL-UTILITIES::KEY CL-UTILITIES::X) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; KEY is not known to be a function ; (FUNCALL CL-UTILITIES::PREDICATE CL-UTILITIES::X-KEY ; CL-UTILITIES::SMALLEST-KEY) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; PREDICATE is not known to be a function ; (CL-UTILITIES::WITH-CHECK-LENGTH (SEQUENCE CL-UTILITIES::START ; CL-UTILITIES::END) ; (LET* ((CL-UTILITIES::SMALLEST (ELT SEQUENCE 0)) ; (CL-UTILITIES::SMALLEST-KEY ; (FUNCALL CL-UTILITIES::KEY CL-UTILITIES::SMALLEST)) ; (CL-UTILITIES::CURRENT-INDEX 0) ; (CL-UTILITIES::REAL-END (OR CL-UTILITIES::END #))) ; (DECLARE ; (TYPE (INTEGER 0) CL-UTILITIES::CURRENT-INDEX CL-UTILITIES::REAL-END ; CL-UTILITIES::START) ; (FIXNUM CL-UTILITIES::CURRENT-INDEX CL-UTILITIES::REAL-END ; CL-UTILITIES::START)) ; (MAP NIL ; #'(LAMBDA (CL-UTILITIES::X) ; (WHEN # #) ; (INCF CL-UTILITIES::CURRENT-INDEX)) ; SEQUENCE) ; CL-UTILITIES::SMALLEST)) ; --> LET IF OR LET IF >= IF >= OR LET IF ; ==> ; (LENGTH #:SEQUENCE1) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (ELT SEQUENCE 0) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; (FUNCALL CL-UTILITIES::KEY CL-UTILITIES::SMALLEST) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; KEY is not known to be a function ; (CL-UTILITIES::WITH-CHECK-LENGTH (SEQUENCE CL-UTILITIES::START ; CL-UTILITIES::END) ; (LET* ((CL-UTILITIES::SMALLEST (ELT SEQUENCE 0)) ; (CL-UTILITIES::SMALLEST-KEY ; (FUNCALL CL-UTILITIES::KEY CL-UTILITIES::SMALLEST)) ; (CL-UTILITIES::CURRENT-INDEX 0) ; (CL-UTILITIES::REAL-END (OR CL-UTILITIES::END #))) ; (DECLARE ; (TYPE (INTEGER 0) CL-UTILITIES::CURRENT-INDEX CL-UTILITIES::REAL-END ; CL-UTILITIES::START) ; (FIXNUM CL-UTILITIES::CURRENT-INDEX CL-UTILITIES::REAL-END ; CL-UTILITIES::START)) ; (MAP NIL ; #'(LAMBDA (CL-UTILITIES::X) ; (WHEN # #) ; (INCF CL-UTILITIES::CURRENT-INDEX)) ; SEQUENCE) ; CL-UTILITIES::SMALLEST)) ; --> LET IF OR LET IF >= IF ; ==> ; (>= #:START2 (OR #:END3 (LENGTH #:SEQUENCE1))) ; ; note: unable to ; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 #1=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 #1# (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 #1=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 #1# (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; processing (DEFUN EXTREMA ...) ; processing (DEFINE-CONDITION N-MOST-EXTREME-NOT-ENOUGH-ELEMENTS ...) ; processing (DEFUN N-MOST-EXTREME ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-utilities/extremum-tmpB4PWHQTJ.fasl ; compilation finished in 0:00:00.075 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/cl-utilities/read-delimited.lisp" (written 02 MAY 2006 01:55:58 PM): ; processing (IN-PACKAGE :CL-UTILITIES) ; processing (DEFUN READ-DELIMITED ...) ; processing (DEFINE-CONDITION READ-DELIMITED-BOUNDS-ERROR ...) ; processing (DEFUN %READ-DELIMITED-BOUNDS-CHECK ...) ; processing (DEFUN %READ-DELIMITED-BOUNDS-CHECK-ORDER ...) ; processing (DEFUN %READ-DELIMITED-BOUNDS-CHECK-START ...) ; processing (DEFUN %READ-DELIMITED-BOUNDS-CHECK-END ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-utilities/read-delimited-tmpX1YMGP2L.fasl ; compilation finished in 0:00:00.075 ; compiling file "/usr/share/common-lisp/source/cl-utilities/expt-mod.lisp" (written 02 MAY 2006 01:55:58 PM): ; processing (IN-PACKAGE :CL-UTILITIES) ; processing (DEFUN EXPT-MOD ...) ; file: /usr/share/common-lisp/source/cl-utilities/expt-mod.lisp ; in: DEFUN EXPT-MOD ; (EXPT CL-UTILITIES::N CL-UTILITIES::EXPONENT) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT &REST ; T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT &REST ; T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a INTEGER. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT &REST ; T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a INTEGER. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT &REST ; T). ; (MOD (EXPT CL-UTILITIES::N CL-UTILITIES::EXPONENT) CL-UTILITIES::MODULUS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a (OR DOUBLE-FLOAT SINGLE-FLOAT INTEGER). ; ; 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 because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a RATIONAL. ; The second argument is a REAL, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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. ; ; 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 #1=inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-< (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do #1=inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do #1# (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline float arithmetic (cost 2) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; The result is a (VALUES REAL . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT &REST ; T). ; unable to do #1# (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; processing (DEFINE-COMPILER-MACRO EXPT-MOD ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-utilities/expt-mod-tmp10W3LB9F.fasl ; compilation finished in 0:00:00.011 ; compiling file "/usr/share/common-lisp/source/cl-utilities/compose.lisp" (written 02 MAY 2006 01:55:58 PM): ; processing (IN-PACKAGE :CL-UTILITIES) ; processing (DEFUN COMPOSE ...) ; processing (DEFINE-COMPILER-MACRO COMPOSE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-utilities/compose-tmpK2B1ODJ1.fasl ; compilation finished in 0:00:00.008 ; compiling file "/usr/share/common-lisp/source/cl-utilities/collecting.lisp" (written 02 MAY 2006 01:55:58 PM): ; processing (IN-PACKAGE :CL-UTILITIES) ; processing (DEFUN COLLECT ...) ; processing (DEFMACRO COLLECTING ...) ; processing (DEFMACRO WITH-COLLECTORS ...) ; processing (DEFUN %WITH-COLLECTORS-CHECK-COLLECTORS ...) ; processing (DEFUN %WITH-COLLECTORS-GENSYMS-ALIST ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-utilities/collecting-tmp5C6SBQY7.fasl ; compilation finished in 0:00:00.023 ; compiling file "/usr/share/common-lisp/source/cl-utilities/rotate-byte.lisp" (written 02 MAY 2006 01:55:58 PM): ; processing (IN-PACKAGE :CL-UTILITIES) ; processing (DEFUN ROTATE-BYTE ...) ; processing (DECLAIM (INLINE ROTATE-BYTE)) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-utilities/rotate-byte-tmpQJDP3B3H.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/cl-utilities/copy-array.lisp" (written 02 MAY 2006 01:55:58 PM): ; processing (IN-PACKAGE :CL-UTILITIES) ; processing (DEFUN COPY-ARRAY ...) ; processing (DEFUN %MAKE-ARRAY-WITH-SAME-PROPERTIES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-utilities/copy-array-tmpT6PBJ345.fasl ; compilation finished in 0:00:00.011 ; compiling file "/usr/share/common-lisp/source/quri/src/port.lisp" (written 26 JUL 2015 02:57:05 PM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE QURI.PORT ...) ; processing (IN-PACKAGE :QURI.PORT) ; processing (DEFVAR +DEFAULT-PORTS+ ...) ; processing (DEFUN SCHEME-DEFAULT-PORT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/quri/src/port-tmpP7KOSV72.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/quri/src/uri.lisp" (written 26 JUL 2015 02:57:05 PM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE QURI.URI ...) ; processing (IN-PACKAGE :QURI.URI) ; processing (DEFSTRUCT (URI #) ...) ; processing (DEFUN MAKE-BASIC-URI ...) ; processing (DEFUN URI-AUTHORITY ...) ; processing (DEFSTRUCT (URN # ...) ...) ; processing (DEFUN MAKE-URN ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/quri/src/uri-tmpFERHD10F.fasl ; compilation finished in 0:00:00.067 ; compiling file "/usr/share/common-lisp/source/quri/src/encode.lisp" (written 26 JUL 2015 02:57:05 PM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE QURI.ENCODE ...) ; processing (IN-PACKAGE :QURI.ENCODE) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFVAR +HEXDIGIT-CHAR+ ...) ; processing (DEFUN INTEGER-TO-HEXDIGIT ...) ; processing (DEFUN UNRESERVEDP ...) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFVAR +BYTE-TO-STRING+ ...) ; processing (DEFUN URL-ENCODE ...) ; processing (DEFUN URL-ENCODE-PARAMS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/quri/src/encode-tmpTVXHO5TD.fasl ; compilation finished in 0:00:00.055 ; compiling file "/usr/share/common-lisp/source/quri/src/error.lisp" (written 26 JUL 2015 02:57:05 PM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE QURI.ERROR ...) ; processing (IN-PACKAGE :QURI.ERROR) ; processing (DEFINE-CONDITION URI-ERROR ...) ; processing (DEFINE-CONDITION URI-MALFORMED-STRING ...) ; processing (DEFINE-CONDITION URI-INVALID-PORT ...) ; processing (DEFINE-CONDITION URL-DECODING-ERROR ...) ; processing (DEFINE-CONDITION URI-MALFORMED-URLENCODED-STRING ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/quri/src/error-tmp6XR5LAPW.fasl ; compilation finished in 0:00:00.008 ; compiling file "/usr/share/common-lisp/source/quri/src/util.lisp" (written 26 JUL 2015 02:57:05 PM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE QURI.UTIL ...) ; processing (IN-PACKAGE :QURI.UTIL) ; processing (DEFUN STANDARD-ALPHA-CHAR-P ...) ; processing (DEFUN STANDARD-ALPHA-BYTE-P ...) ; processing (DEFUN STANDARD-ALPHANUMERIC-P ...) ; processing (DEFUN STANDARD-ALPHANUMERIC-BYTE-P ...) ; processing (DEFINE-CONDITION PARSING-END-UNEXPECTEDLY ...) ; processing (DEFINE-CONDITION NO-NEXT-STATE ...) ; processing (DEFMACRO WITH-STRING-PARSING ...) ; processing (DEFMACRO WITH-BYTE-ARRAY-PARSING ...) ; processing (DEFMACRO WITH-ARRAY-PARSING ...) ; processing (DEFMACRO %WITH-ARRAY-PARSING ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/quri/src/util-tmpGEPT0T15.fasl ; compilation finished in 0:00:00.067 ; compiling file "/usr/share/common-lisp/source/quri/src/decode.lisp" (written 26 JUL 2015 02:57:05 PM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE QURI.DECODE ...) ; processing (IN-PACKAGE :QURI.DECODE) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN HEXDIGIT-TO-INTEGER ...) ; processing (DEFUN URL-DECODE ...) ; file: /usr/share/common-lisp/source/quri/src/decode.lisp ; in: DEFUN URL-DECODE ; (QURI.UTIL:WITH-ARRAY-PARSING (CHAR QURI.DECODE::P QURI.DECODE::DATA ; QURI.DECODE::START QURI.DECODE::END ; (AND (NOT (STRINGP QURI.DECODE::DATA)) ; #'CODE-CHAR)) ; (QURI.DECODE::PARSING ; (COND ((CHAR= CHAR #\%) (QURI.UTIL:GONEXT)) ; ((CHAR= CHAR #\+) (QURI.DECODE::WRITE-TO-BUFFER 32) ; (QURI.UTIL:REDO)) ; (T (QURI.DECODE::WRITE-TO-BUFFER #) (QURI.UTIL:REDO)))) ; (QURI.DECODE::PARSING-ENCODED-PART ; (SETQ QURI.DECODE::PARSING-ENCODED-PART (* 16 #)) (QURI.UTIL:GONEXT)) ; (QURI.DECODE::PARSING-ENCODED-PART-SECOND ; (QURI.DECODE::WRITE-TO-BUFFER ; (+ QURI.DECODE::PARSING-ENCODED-PART ; (QURI.DECODE::HEXDIGIT-TO-INTEGER CHAR))) ; (SETQ QURI.DECODE::PARSING-ENCODED-PART NIL) ; (QURI.UTIL:GOTO QURI.DECODE::PARSING)) ; (:EOF ; (WHEN QURI.DECODE::PARSING-ENCODED-PART ; (ERROR 'QURI.ERROR:URL-DECODING-ERROR)))) ; --> LET QURI.UTIL::%WITH-ARRAY-PARSING LET MACROLET TAGBODY LOCALLY SETQ THE ; --> IF ; ==> ; (FUNCALL #:KEY-FN6 (AREF QURI.DECODE::DATA QURI.DECODE::P)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; ==> ; (AREF QURI.DECODE::DATA QURI.DECODE::P) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; (QURI.UTIL:GONEXT) ; --> QURI.UTIL:GOTO LOCALLY SETQ THE IF ; ==> ; (FUNCALL #:KEY-FN6 (AREF QURI.DECODE::DATA QURI.DECODE::P)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; ==> ; (AREF QURI.DECODE::DATA QURI.DECODE::P) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; ==> ; (FUNCALL #:KEY-FN6 (AREF QURI.DECODE::DATA QURI.DECODE::P)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; ==> ; (AREF QURI.DECODE::DATA QURI.DECODE::P) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; (QURI.UTIL:GOTO QURI.DECODE::PARSING) ; --> LOCALLY SETQ THE IF ; ==> ; (FUNCALL #:KEY-FN6 (AREF QURI.DECODE::DATA QURI.DECODE::P)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; ==> ; (AREF QURI.DECODE::DATA QURI.DECODE::P) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; (QURI.UTIL:REDO) ; --> QURI.UTIL:GOTO LOCALLY SETQ THE IF ; ==> ; (FUNCALL #:KEY-FN6 (AREF QURI.DECODE::DATA QURI.DECODE::P)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; ==> ; (AREF QURI.DECODE::DATA QURI.DECODE::P) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; ==> ; (FUNCALL #:KEY-FN6 (AREF QURI.DECODE::DATA QURI.DECODE::P)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; ==> ; (AREF QURI.DECODE::DATA QURI.DECODE::P) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; (INCF QURI.DECODE::I) ; --> SETQ THE ; ==> ; (+ 1 QURI.DECODE::I) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) . #2=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (- QURI.DECODE::END QURI.DECODE::START) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; etc. ; (QURI.UTIL:WITH-ARRAY-PARSING (CHAR QURI.DECODE::P QURI.DECODE::DATA ; QURI.DECODE::START QURI.DECODE::END ; (AND (NOT (STRINGP QURI.DECODE::DATA)) ; #'CODE-CHAR)) ; (QURI.DECODE::PARSING ; (COND ((CHAR= CHAR #\%) (QURI.UTIL:GONEXT)) ; ((CHAR= CHAR #\+) (QURI.DECODE::WRITE-TO-BUFFER 32) ; (QURI.UTIL:REDO)) ; (T (QURI.DECODE::WRITE-TO-BUFFER #) (QURI.UTIL:REDO)))) ; (QURI.DECODE::PARSING-ENCODED-PART ; (SETQ QURI.DECODE::PARSING-ENCODED-PART (* 16 #)) (QURI.UTIL:GONEXT)) ; (QURI.DECODE::PARSING-ENCODED-PART-SECOND ; (QURI.DECODE::WRITE-TO-BUFFER ; (+ QURI.DECODE::PARSING-ENCODED-PART ; (QURI.DECODE::HEXDIGIT-TO-INTEGER CHAR))) ; (SETQ QURI.DECODE::PARSING-ENCODED-PART NIL) ; (QURI.UTIL:GOTO QURI.DECODE::PARSING)) ; (:EOF ; (WHEN QURI.DECODE::PARSING-ENCODED-PART ; (ERROR 'QURI.ERROR:URL-DECODING-ERROR)))) ; --> LET QURI.UTIL::%WITH-ARRAY-PARSING LET MACROLET TAGBODY WHEN IF ; ==> ; (= QURI.DECODE::P #:G-END3) ; ; note: forced to do %EQL/INTEGER (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; (QURI.UTIL:REDO) ; --> QURI.UTIL:GOTO LOCALLY WHEN IF ; ==> ; (= QURI.DECODE::P #:G-END3) ; ; note: forced to do %EQL/INTEGER (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a INTEGER, not a FIXNUM. ; ; note: forced to do %EQL/INTEGER (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a INTEGER, not a FIXNUM. ; (QURI.UTIL:GONEXT) ; --> QURI.UTIL:GOTO LOCALLY WHEN IF ; ==> ; (= QURI.DECODE::P #:G-END3) ; ; note: forced to do %EQL/INTEGER (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a INTEGER, not a FIXNUM. ; ; note: forced to do %EQL/INTEGER (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a INTEGER, not a FIXNUM. ; (QURI.UTIL:GOTO QURI.DECODE::PARSING) ; --> LOCALLY WHEN IF ; ==> ; (= QURI.DECODE::P #:G-END3) ; ; note: forced to do %EQL/INTEGER (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a INTEGER, not a FIXNUM. ; processing (DEFUN URL-DECODE-PARAMS ...) ; file: /usr/share/common-lisp/source/quri/src/decode.lisp ; in: DEFUN URL-DECODE-PARAMS ; (QURI.UTIL:WITH-ARRAY-PARSING (CHAR QURI.DECODE::P QURI.DECODE::DATA ; QURI.DECODE::START QURI.DECODE::END ; (AND (NOT (STRINGP QURI.DECODE::DATA)) ; #'CODE-CHAR)) ; (QURI.DECODE::START (SETQ QURI.DECODE::START-MARK QURI.DECODE::P) ; (IF QURI.DECODE::LENIENT ; (COND (# # #) (# #)) ; (WHEN (OR # #) (ERROR 'QURI.ERROR:URI-MALFORMED-URLENCODED-STRING))) ; (QURI.UTIL:GONEXT)) ; (QURI.DECODE::PARSING-FIELD ; (COND ((CHAR= CHAR #\=) (SETQ #) (QURI.UTIL:GONEXT)) ; ((CHAR= CHAR QURI.DECODE::DELIMITER) ; (QURI.DECODE::COLLECT-FIELD QURI.DECODE::P) ; (QURI.UTIL:GOTO QURI.DECODE::START))) ; (QURI.UTIL:REDO)) ; (QURI.DECODE::PARSING-VALUE ; (COND ((CHAR= CHAR #\=) (UNLESS QURI.DECODE::LENIENT #)) ; ((CHAR= CHAR QURI.DECODE::DELIMITER) ; (QURI.DECODE::COLLECT-PAIR QURI.DECODE::P) ; (QURI.UTIL:GOTO QURI.DECODE::START))) ; (QURI.UTIL:REDO)) ; (:EOF ; (COND (QURI.DECODE::=-MARK (QURI.DECODE::COLLECT-PAIR QURI.DECODE::P)) ; (QURI.DECODE::START-MARK ; (QURI.DECODE::COLLECT-FIELD QURI.DECODE::P))))) ; --> LET QURI.UTIL::%WITH-ARRAY-PARSING LET MACROLET TAGBODY LOCALLY SETQ THE ; --> IF ; ==> ; (FUNCALL #:KEY-FN6 (AREF QURI.DECODE::DATA QURI.DECODE::P)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; ==> ; (AREF QURI.DECODE::DATA QURI.DECODE::P) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; (QURI.UTIL:GOTO QURI.DECODE::PARSING-VALUE) ; --> LOCALLY SETQ THE IF ; ==> ; (FUNCALL #:KEY-FN6 (AREF QURI.DECODE::DATA QURI.DECODE::P)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; ==> ; (AREF QURI.DECODE::DATA QURI.DECODE::P) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; (QURI.UTIL:REDO) ; --> QURI.UTIL:GOTO LOCALLY SETQ THE IF ; ==> ; (FUNCALL #:KEY-FN6 (AREF QURI.DECODE::DATA QURI.DECODE::P)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; ==> ; (AREF QURI.DECODE::DATA QURI.DECODE::P) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; (QURI.UTIL:GONEXT) ; --> QURI.UTIL:GOTO LOCALLY SETQ THE IF ; ==> ; (FUNCALL #:KEY-FN6 (AREF QURI.DECODE::DATA QURI.DECODE::P)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; ==> ; (AREF QURI.DECODE::DATA QURI.DECODE::P) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; ==> ; (FUNCALL #:KEY-FN6 (AREF QURI.DECODE::DATA QURI.DECODE::P)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; ==> ; (AREF QURI.DECODE::DATA QURI.DECODE::P) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; (QURI.UTIL:GOTO QURI.DECODE::START) ; --> LOCALLY SETQ THE IF ; ==> ; (FUNCALL #:KEY-FN6 (AREF QURI.DECODE::DATA QURI.DECODE::P)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; ==> ; (AREF QURI.DECODE::DATA QURI.DECODE::P) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; (QURI.UTIL:REDO) ; --> QURI.UTIL:GOTO LOCALLY SETQ THE IF ; ==> ; (FUNCALL #:KEY-FN6 (AREF QURI.DECODE::DATA QURI.DECODE::P)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; ==> ; (AREF QURI.DECODE::DATA QURI.DECODE::P) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; (QURI.UTIL:GOTO QURI.DECODE::START) ; --> LOCALLY SETQ THE IF ; ==> ; (FUNCALL #:KEY-FN6 (AREF QURI.DECODE::DATA QURI.DECODE::P)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; ==> ; (AREF QURI.DECODE::DATA QURI.DECODE::P) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; (QURI.UTIL:REDO) ; --> QURI.UTIL:GOTO LOCALLY SETQ THE IF ; ==> ; (FUNCALL #:KEY-FN6 (AREF QURI.DECODE::DATA QURI.DECODE::P)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; ==> ; (AREF QURI.DECODE::DATA QURI.DECODE::P) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) BASE-STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; (QURI.UTIL:WITH-ARRAY-PARSING (CHAR QURI.DECODE::P QURI.DECODE::DATA ; QURI.DECODE::START QURI.DECODE::END ; (AND (NOT (STRINGP QURI.DECODE::DATA)) ; #'CODE-CHAR)) ; (QURI.DECODE::START (SETQ QURI.DECODE::START-MARK QURI.DECODE::P) ; (IF QURI.DECODE::LENIENT ; (COND (# # #) (# #)) ; (WHEN (OR # #) (ERROR 'QURI.ERROR:URI-MALFORMED-URLENCODED-STRING))) ; (QURI.UTIL:GONEXT)) ; (QURI.DECODE::PARSING-FIELD ; (COND ((CHAR= CHAR #\=) (SETQ #) (QURI.UTIL:GONEXT)) ; ((CHAR= CHAR QURI.DECODE::DELIMITER) ; (QURI.DECODE::COLLECT-FIELD QURI.DECODE::P) ; (QURI.UTIL:GOTO QURI.DECODE::START))) ; (QURI.UTIL:REDO)) ; (QURI.DECODE::PARSING-VALUE ; (COND ((CHAR= CHAR #\=) (UNLESS QURI.DECODE::LENIENT #)) ; ((CHAR= CHAR QURI.DECODE::DELIMITER) ; (QURI.DECODE::COLLECT-PAIR QURI.DECODE::P) ; (QURI.UTIL:GOTO QURI.DECODE::START))) ; (QURI.UTIL:REDO)) ; (:EOF ; (COND (QURI.DECODE::=-MARK (QURI.DECODE::COLLECT-PAIR QURI.DECODE::P)) ; (QURI.DECODE::START-MARK ; (QURI.DECODE::COLLECT-FIELD QURI.DECODE::P))))) ; --> LET QURI.UTIL::%WITH-ARRAY-PARSING LET MACROLET TAGBODY WHEN IF ; ==> ; (= QURI.DECODE::P #:G-END3) ; ; note: forced to do %EQL/INTEGER (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; (QURI.UTIL:REDO) ; --> QURI.UTIL:GOTO LOCALLY WHEN IF ; ==> ; (= QURI.DECODE::P #:G-END3) ; ; note: forced to do %EQL/INTEGER (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a INTEGER, not a FIXNUM. ; (QURI.UTIL:GOTO QURI.DECODE::PARSING-VALUE) ; --> LOCALLY WHEN IF ; ==> ; (= QURI.DECODE::P #:G-END3) ; ; note: forced to do %EQL/INTEGER (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a INTEGER, not a FIXNUM. ; (QURI.UTIL:GONEXT) ; --> QURI.UTIL:GOTO LOCALLY WHEN IF ; ==> ; (= QURI.DECODE::P #:G-END3) ; ; note: forced to do %EQL/INTEGER (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a INTEGER, not a FIXNUM. ; (QURI.UTIL:GOTO QURI.DECODE::START) ; --> LOCALLY WHEN IF ; ==> ; (= QURI.DECODE::P #:G-END3) ; ; note: forced to do %EQL/INTEGER (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a INTEGER, not a FIXNUM. ; (QURI.UTIL:REDO) ; --> QURI.UTIL:GOTO LOCALLY WHEN IF ; ==> ; (= QURI.DECODE::P #:G-END3) ; ; note: forced to do %EQL/INTEGER (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a INTEGER, not a FIXNUM. ; (QURI.UTIL:GONEXT) ; --> QURI.UTIL:GOTO LOCALLY WHEN IF ; ==> ; (= QURI.DECODE::P #:G-END3) ; ; note: forced to do %EQL/INTEGER (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a INTEGER, not a FIXNUM. ; (QURI.UTIL:GOTO QURI.DECODE::START) ; --> LOCALLY WHEN IF ; ==> ; (= QURI.DECODE::P #:G-END3) ; ; note: forced to do %EQL/INTEGER (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a INTEGER, not a FIXNUM. ; (QURI.UTIL:REDO) ; --> QURI.UTIL:GOTO LOCALLY WHEN IF ; ==> ; (= QURI.DECODE::P #:G-END3) ; ; note: forced to do %EQL/INTEGER (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a INTEGER, not a FIXNUM. ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/quri/src/decode-tmpMKX5S6TB.fasl ; compilation finished in 0:00:00.087 ; compiling file "/usr/share/common-lisp/source/quri/src/uri/ftp.lisp" (written 26 JUL 2015 02:57:05 PM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE QURI.URI.FTP ...) ; processing (IN-PACKAGE :QURI.URI.FTP) ; processing (DEFSTRUCT (URI-FTP # ...) ...) ; processing (DEFUN MAKE-URI-FTP ...) ; processing (DEFUN PARSE-FTP-TYPECODE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/quri/src/uri/ftp-tmpT1R329DD.fasl ; compilation finished in 0:00:00.043 ; compiling file "/usr/share/common-lisp/source/quri/src/uri/http.lisp" (written 26 JUL 2015 02:57:05 PM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE QURI.URI.HTTP ...) ; processing (IN-PACKAGE :QURI.URI.HTTP) ; processing (DEFSTRUCT (URI-HTTP #)) ; processing (DEFSTRUCT (URI-HTTPS #)) ; processing (DEFUN URI-QUERY-PARAMS ...) ; processing (DEFUN (SETF URI-QUERY-PARAMS) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/quri/src/uri/http-tmpYV9QWBE7.fasl ; compilation finished in 0:00:00.039 ; compiling file "/usr/share/common-lisp/source/quri/src/uri/ldap.lisp" (written 26 JUL 2015 02:57:05 PM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE QURI.URI.LDAP ...) ; processing (IN-PACKAGE :QURI.URI.LDAP) ; processing (DEFSTRUCT (URI-LDAP #)) ; processing (DEFSTRUCT (URI-LDAPS #)) ; processing (DEFUN URI-LDAP-DN ...) ; processing (DEFUN (SETF URI-LDAP-DN) ...) ; processing (DEFUN NTH-URI-LDAP-LISTS ...) ; processing (DEFUN (SETF NTH-URI-LDAP-LISTS) ...) ; processing (DEFUN URI-LDAP-ATTRIBUTES ...) ; processing (DEFUN (SETF URI-LDAP-ATTRIBUTES) ...) ; processing (DEFUN URI-LDAP-SCOPE ...) ; processing (DEFUN (SETF URI-LDAP-SCOPE) ...) ; processing (DEFUN URI-LDAP-FILTER ...) ; processing (DEFUN (SETF URI-LDAP-FILTER) ...) ; processing (DEFUN URI-LDAP-EXTENSIONS ...) ; processing (DEFUN (SETF URI-LDAP-EXTENSIONS) ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/quri/src/uri/ldap-tmpY7Z87FVE.fasl ; compilation finished in 0:00:00.119 ; compiling file "/usr/share/common-lisp/source/quri/src/uri/file.lisp" (written 26 JUL 2015 02:57:05 PM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE QURI.URI.FILE ...) ; processing (IN-PACKAGE :QURI.URI.FILE) ; processing (DEFSTRUCT (URI-FILE #)) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN URI-FILE-PATHNAME ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/quri/src/uri/file-tmpZD0W6AUM.fasl ; compilation finished in 0:00:00.047 ; compiling file "/usr/share/common-lisp/source/quri/src/etld.lisp" (written 26 JUL 2015 02:57:05 PM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE QURI.ETLD ...) ; processing (IN-PACKAGE :QURI.ETLD) ; processing (DEFVAR *DEFAULT-ETLD-NAMES* ...) ; processing (DEFVAR *NORMAL-TLDS* ...) ; processing (DEFVAR *WILDCARD-TLDS* ...) ; processing (DEFVAR *SPECIAL-TLDS* ...) ; processing (DEFUN LOAD-ETLD-DATA ...) ; processing (LOAD-ETLD-DATA) ; processing (DEFUN NEXT-SUBDOMAIN ...) ; processing (DEFUN MAKE-SUBDOMAIN-ITER ...) ; processing (DEFUN PARSE-DOMAIN ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/quri/src/etld-tmpRVZ12GJ7.fasl ; compilation finished in 0:00:00.031 ; compiling file "/usr/share/common-lisp/source/quri/src/domain.lisp" (written 26 JUL 2015 02:57:05 PM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE QURI.DOMAIN ...) ; processing (IN-PACKAGE :QURI.DOMAIN) ; processing (DEFUN URI-TLD ...) ; processing (DEFUN URI-DOMAIN ...) ; processing (DEFUN IPV4-ADDR-P ...) ; processing (DEFUN TRIM-BRACKETS ...) ; processing (DEFUN IPV6-ADDR-P ...) ; processing (DEFUN IP-ADDR-P ...) ; processing (DEFUN IP-ADDR= ...) ; processing (DEFUN COOKIE-DOMAIN-P ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/quri/src/domain-tmp4T72OGWB.fasl ; compilation finished in 0:00:00.135 ; compiling file "/usr/share/common-lisp/source/quri/src/parser.lisp" (written 26 JUL 2015 02:57:05 PM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE QURI.PARSER ...) ; processing (IN-PACKAGE :QURI.PARSER) ; processing (DEFTYPE SIMPLE-BYTE-VECTOR ...) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFINE-CONSTANT +URI-CHAR+ ...) ; processing (DEFUN PARSE-URI ...) ; processing (DEFINE-COMPILER-MACRO PARSE-URI ...) ; processing (DEFUN PARSE-URI-STRING ...) ; processing (DEFUN PARSE-URI-BYTE-VECTOR ...) ; processing (DEFMACRO DEFUN-WITH-ARRAY-PARSING ...) ; processing (DEFUN SCHEME-CHAR-P ...) ; processing (DEFUN SCHEME-BYTE-P ...) ; processing (DEFUN-WITH-ARRAY-PARSING PARSE-SCHEME ...) ; processing (DEFUN-WITH-ARRAY-PARSING PARSE-AUTHORITY ...) ; processing (DEFUN PATH-CHAR-P ...) ; processing (DEFUN PATH-BYTE-P ...) ; processing (DEFUN QUERY-CHAR-P ...) ; processing (DEFUN QUERY-BYTE-P ...) ; processing (DEFMACRO PARSE-UNTIL-STRING ...) ; processing (DEFMACRO PARSE-UNTIL-BYTE-VECTOR ...) ; processing (DEFUN PARSE-PATH ...) ; processing (DEFUN PARSE-PATH-STRING ...) ; processing (DEFUN PARSE-PATH-BYTE-VECTOR ...) ; processing (DEFUN PARSE-QUERY ...) ; processing (DEFINE-COMPILER-MACRO PARSE-QUERY ...) ; processing (DEFUN PARSE-QUERY-STRING ...) ; processing (DEFUN PARSE-QUERY-BYTE-VECTOR ...) ; processing (DEFUN PARSE-FRAGMENT ...) ; processing (DEFINE-COMPILER-MACRO PARSE-FRAGMENT ...) ; processing (DEFUN PARSE-FRAGMENT-STRING ...) ; processing (DEFUN PARSE-FRAGMENT-BYTE-VECTOR ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/quri/src/parser-tmp30O6M23N.fasl ; compilation finished in 0:00:00.667 ; compiling file "/usr/share/common-lisp/source/quri/src/quri.lisp" (written 26 JUL 2015 02:57:05 PM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE QURI ...) ; processing (IN-PACKAGE :QURI) ; processing (DEFUN SCHEME-CONSTRUCTOR ...) ; processing (DEFUN URI ...) ; processing (DEFUN COPY-URI ...) ; processing (DEFUN MAKE-URI ...) ; processing (DEFUN RENDER-URI ...) ; processing (DEFUN URI= ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN MERGE-URI-PATHS ...) ; processing (DEFUN MERGE-URIS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/quri/src/quri-tmp523JK0GJ.fasl ; compilation finished in 0:00:00.067 ; compiling file "/usr/share/common-lisp/source/cl-mustache/packages.lisp" (written 30 AUG 2015 06:50:42 PM): ; processing (IN-PACKAGE #:CL-USER) ; processing (DEFPACKAGE #:MUSTACHE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-mustache/packages-tmp2T656F3Z.fasl ; compilation finished in 0:00:00.000 ; compiling file "/usr/share/common-lisp/source/cl-mustache/mustache.lisp" (written 30 AUG 2015 06:50:42 PM): ; processing (IN-PACKAGE :MUSTACHE) ; processing (DEFTYPE OFFSET ...) ; processing (DEFTYPE SPACE-CHAR ...) ; processing (DEFTYPE NEWLINE-CHAR ...) ; processing (DEFTYPE TEXT-CHAR ...) ; processing (DEFUN SPACE-CHAR-P ...) ; processing (DEFUN NEWLINE-CHAR-P ...) ; processing (DEFUN TEXT-CHAR-P ...) ; processing (DEFCLASS TOKEN ...) ; processing (DEFCLASS BEGINNING-OF-LINE ...) ; processing (DEFCLASS TEXT ...) ; processing (DEFCLASS WHITESPACE ...) ; processing (DEFCLASS NEWLINE ...) ; processing (DEFVAR CRLF ...) ; processing (DEFCLASS CRLF-NEWLINE ...) ; processing (DEFCLASS TAG ...) ; processing (DEFCLASS CAN-STANDALONE-TAG ...) ; processing (DEFCLASS NON-STANDALONE-TAG ...) ; processing (DEFCLASS NORMAL-TAG ...) ; processing (DEFCLASS AMPERSAND-TAG ...) ; processing (DEFCLASS DELIMITER-TAG ...) ; processing (DEFCLASS COMMENT-TAG ...) ; processing (DEFCLASS PARTIAL-TAG ...) ; processing (DEFCLASS SECTION-START-TAG ...) ; processing (DEFCLASS SECTION-END-TAG ...) ; processing (DEFCLASS SECTION-TAG ...) ; processing (DEFPARAMETER *DEFAULT-OPEN-DELIMITER* ...) ; processing (DEFPARAMETER *DEFAULT-CLOSE-DELIMITER* ...) ; processing (DEFPARAMETER *DEFAULT-TRIPLE-OPEN-DELIMITER* ...) ; processing (DEFPARAMETER *DEFAULT-TRIPLE-CLOSE-DELIMITER* ...) ; processing (DEFVAR *OPEN-DELIMITER* ...) ; processing (DEFVAR *CLOSE-DELIMITER* ...) ; processing (DEFVAR *TRIPLE-OPEN-DELIMITER* ...) ; processing (DEFVAR *TRIPLE-CLOSE-DELIMITER* ...) ; processing (DEFUN CHANGE-DELIMITER ...) ; processing (DEFVAR *MUSTACHE-TAG-TABLE* ...) ; processing (DEFUN SET-MUSTACHE-CHARACTER ...) ; processing (DEFUN GET-MUSTACHE-CHARACTER ...) ; processing (DEFUN MAKE-TAG ...) ; processing (DEFMACRO DEFINE-MUSTACHE-CHARACTER ...) ; processing (DEFINE-MUSTACHE-CHARACTER #\& ...) ; processing (DEFINE-MUSTACHE-CHARACTER #\# ...) ; processing (DEFINE-MUSTACHE-CHARACTER #\^ ...) ; processing (DEFINE-MUSTACHE-CHARACTER #\/ ...) ; processing (DEFINE-MUSTACHE-CHARACTER #\! ...) ; processing (DEFINE-MUSTACHE-CHARACTER #\= ...) ; processing (DEFINE-MUSTACHE-CHARACTER #\> ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFVAR BEGINNING-OF-LINE ...) ; processing (DEFVAR NEWLINE ...) ; processing (DEFVAR CRLF-NEWLINE ...) ; processing (DEFUN STRING-STARTS-WITH-P ...) ; processing (DEFUN READ-TEXT ...) ; processing (DEFUN READ-NEWLINE ...) ; processing (DEFUN READ-TAG ...) ; processing (DEFUN READ-TOKEN ...) ; processing (DEFUN SCAN ...) ; processing (DEFTYPE TEXT-TOKEN ...) ; processing (DEFUN COLLECT-LINE ...) ; processing (DEFUN TOKENS-STANDALONE-P ...) ; processing (DEFUN FIND-STANDALONE-TAG ...) ; processing (DEFUN TRIM-STANDALONE ...) ; processing (DEFUN MAKE-SECTION-TAG ...) ; processing (DEFUN GROUP-SECTIONS ...) ; processing (DEFUN FOLD-TEXT ...) ; processing (DEFUN PARSE ...) ; processing (DEFVAR *CONTEXT* ...) ; processing (DEFCLASS CONTEXT ...) ; processing (DEFUN PARSE-KEY ...) ; processing (DEFUN KEY ...) ; processing (DEFTYPE ALIST ...) ; processing (DEFUN SAVE-HASH-TABLE ...) ; processing (DEFUN MAKE-CONTEXT-CHAIN ...) ; processing (DEFUN ENSURE-CONTEXT ...) ; processing (DEFGENERIC CONTEXT-GET ...) ; processing (DEFMETHOD CONTEXT-GET ...) ; processing (DEFMETHOD CONTEXT-GET ...) ; processing (DEFMETHOD CONTEXT-GET ...) ; processing (DEFMETHOD CONTEXT-GET ...) ; processing (DEFMETHOD CONTEXT-GET ...) ; processing (DEFVAR *LOAD-PATH* ...) ; processing (DEFVAR *DEFAULT-PATHNAME-TYPE* ...) ; processing (DEFUN FILENAME ...) ; processing (DEFUN LOCATE-FILE ...) ; processing (DEFUN READ-PARTIAL ...) ; processing (DEFUN ESCAPE ...) ; processing (DEFVAR *REAL-STANDARD-OUTPUT* ...) ; processing (DEFVAR *OUTPUT-STREAM* ...) ; processing (DEFUN %OUTPUT ...) ; processing (DEFGENERIC PRINT-DATA ...) ; processing (DEFMETHOD PRINT-DATA ...) ; processing (DEFMETHOD PRINT-DATA ...) ; processing (DEFMETHOD PRINT-DATA ...) ; processing (DEFMETHOD PRINT-DATA ...) ; processing (DEFUN CALL-LAMBDA ...) ; processing (DEFGENERIC RENDER-TOKEN ...) ; processing (DEFMETHOD RENDER-TOKEN ...) ; processing (DEFMETHOD RENDER-TOKEN ...) ; processing (DEFMETHOD RENDER-TOKEN ...) ; processing (DEFMETHOD RENDER-TOKEN ...) ; processing (DEFMETHOD RENDER-TOKEN ...) ; processing (DEFUN RENDER-TOKENS ...) ; processing (DEFUN RENDER-BODY ...) ; processing (DEFUN VERSION ...) ; processing (DEFUN MAKE-CONTEXT ...) ; processing (DEFGENERIC COMPILE-TEMPLATE ...) ; processing (DEFMETHOD COMPILE-TEMPLATE ...) ; processing (DEFMETHOD COMPILE-TEMPLATE ...) ; processing (DEFGENERIC RENDER ...) ; processing (DEFMETHOD RENDER ...) ; processing (DEFMETHOD RENDER ...) ; processing (DEFUN RENDER* ...) ; processing (DEFMACRO DEFINE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-mustache/mustache-tmpU8E6U186.fasl ; compilation finished in 0:00:00.515 ; compiling file "/usr/share/common-lisp/source/cl-mustache/compat-api-v1.lisp" (written 30 AUG 2015 06:50:42 PM): ; processing (IN-PACKAGE :MUSTACHE) ; processing (DEFVAR *MUSTACHE-OUTPUT* ...) ; processing (DEFINE-CONDITION DEPRECATION-WARNING ...) ; processing (DEFMACRO MAKE-OBSOLETE ...) ; processing (MAKE-OBSOLETE MUSTACHE-TYPE ...) ; processing (MAKE-OBSOLETE MUSTACHE-VERSION ...) ; processing (MAKE-OBSOLETE MUSTACHE-CONTEXT ...) ; processing (MAKE-OBSOLETE MUSTACHE-COMPILE ...) ; processing (MAKE-OBSOLETE MUSTACHE-RENDER ...) ; processing (MAKE-OBSOLETE MUSTACHE-RENDER-TO-STRING ...) ; processing (DEFUN MUSTACHE-RENDER-TO-STREAM ...) ; processing (DEFMACRO DEFMUSTACHE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-mustache/compat-api-v1-tmpUVEMO1OX.fasl ; compilation finished in 0:00:00.031 ; compiling file "/usr/share/common-lisp/source/yason/package.lisp" (written 25 JAN 2016 10:37:20 PM): ; processing (DEFPACKAGE :YASON ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/yason/package-tmpPDN0DF20.fasl ; compilation finished in 0:00:00.000 ; compiling file "/usr/share/common-lisp/source/yason/encode.lisp" (written 25 JAN 2016 10:37:20 PM): ; processing (IN-PACKAGE :YASON) ; processing (DEFVAR *JSON-OUTPUT*) ; processing (DEFPARAMETER *DEFAULT-INDENT* ...) ; processing (DEFPARAMETER *DEFAULT-INDENT-WIDTH* ...) ; processing (DEFGENERIC ENCODE ...) ; processing (DEFPARAMETER *CHAR-REPLACEMENTS* ...) ; processing (DEFMETHOD ENCODE ...) ; processing (DEFMETHOD ENCODE ...) ; processing (DEFMETHOD ENCODE ...) ; processing (DEFMETHOD ENCODE ...) ; processing (DEFMACRO WITH-AGGREGATE/OBJECT ...) ; processing (DEFUN ENCODE-KEY/VALUE ...) ; processing (DEFMETHOD ENCODE ...) ; processing (DEFMETHOD ENCODE ...) ; processing (DEFMETHOD ENCODE ...) ; processing (DEFUN ENCODE-ASSOC-KEY/VALUE ...) ; processing (DEFUN ENCODE-ALIST ...) ; processing (DEFUN ENCODE-PLIST ...) ; processing (DEFMETHOD ENCODE ...) ; processing (DEFMETHOD ENCODE ...) ; processing (DEFMETHOD ENCODE ...) ; processing (DEFMETHOD ENCODE ...) ; processing (DEFMETHOD ENCODE ...) ; processing (DEFCLASS JSON-OUTPUT-STREAM ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFGENERIC MAKE-JSON-OUTPUT-STREAM ...) ; processing (DEFMETHOD MAKE-JSON-OUTPUT-STREAM ...) ; processing (DEFMETHOD SB-GRAY:STREAM-WRITE-CHAR ...) ; processing (DEFGENERIC WRITE-INDENTATION ...) ; processing (DEFGENERIC WRITE-DELIMITER ...) ; processing (DEFGENERIC CHANGE-INDENTATION ...) ; processing (DEFUN NEXT-AGGREGATE-ELEMENT ...) ; processing (DEFMACRO WITH-OUTPUT ...) ; processing (DEFMACRO WITH-OUTPUT-TO-STRING* ...) ; processing (DEFINE-CONDITION NO-JSON-OUTPUT-CONTEXT ...) ; processing (DEFMACRO WITH-AGGREGATE/STREAM ...) ; processing (DEFMACRO WITH-ARRAY ...) ; processing (DEFMACRO WITH-OBJECT ...) ; processing (DEFUN ENCODE-ARRAY-ELEMENT ...) ; processing (DEFUN ENCODE-ARRAY-ELEMENTS ...) ; processing (DEFUN ENCODE-OBJECT-ELEMENT ...) ; processing (DEFUN ENCODE-OBJECT-ELEMENTS ...) ; processing (DEFUN ENCODE-OBJECT-SLOTS ...) ; processing (DEFINE-COMPILER-MACRO ENCODE-OBJECT-SLOTS ...) ; processing (DEFMACRO WITH-OBJECT-ELEMENT ...) ; processing (DEFGENERIC ENCODE-SLOTS ...) ; processing (DEFGENERIC ENCODE-OBJECT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/yason/encode-tmp1SCDPCYF.fasl ; compilation finished in 0:00:00.263 ; compiling file "/usr/share/common-lisp/source/yason/parse.lisp" (written 25 JAN 2016 10:37:20 PM): ; processing (IN-PACKAGE :YASON) ; processing (DEFCONSTANT +DEFAULT-STRING-LENGTH+ ...) ; processing (DEFVAR *PARSE-OBJECT-KEY-FN* ...) ; processing (DEFVAR *PARSE-JSON-ARRAYS-AS-VECTORS* ...) ; processing (DEFVAR *PARSE-JSON-BOOLEANS-AS-SYMBOLS* ...) ; processing (DEFVAR *PARSE-JSON-NULL-AS-KEYWORD* ...) ; processing (DEFVAR *PARSE-OBJECT-AS* ...) ; processing (DEFVAR *PARSE-OBJECT-AS-ALIST* ...) ; processing (DEFUN MAKE-ADJUSTABLE-STRING ...) ; processing (DEFUN PARSE-NUMBER ...) ; processing (DEFUN PARSE-UNICODE-ESCAPE ...) ; processing (DEFUN PARSE-STRING ...) ; processing (DEFUN WHITESPACE-P ...) ; processing (DEFUN SKIP-WHITESPACE ...) ; processing (DEFUN PEEK-CHAR-SKIPPING-WHITESPACE ...) ; processing (DEFUN PARSE-CONSTANT ...) ; processing (DEFINE-CONDITION CANNOT-CONVERT-KEY ...) ; processing (DEFUN CREATE-CONTAINER ...) ; processing (DEFUN ADD-ATTRIBUTE ...) ; processing (DEFINE-CONDITION EXPECTED-COLON ...) ; processing (DEFUN PARSE-OBJECT ...) ; processing (DEFCONSTANT +INITIAL-ARRAY-SIZE+ ...) ; processing (DEFUN %PARSE-ARRAY ...) ; processing (DEFUN PARSE-ARRAY ...) ; processing (DEFGENERIC PARSE% ...) ; processing (DEFUN PARSE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/yason/parse-tmp31LDQ8IW.fasl ; compilation finished in 0:00:00.127 ; compiling file "/usr/share/common-lisp/source/closure-common/package.lisp" (written 06 OCT 2010 05:59:12 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/closure-common/package-tmpXQHFS7J0.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/closure-common/definline.lisp" (written 06 OCT 2010 05:59:12 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/closure-common/definline-tmpZU3XIPN7.fasl ; compilation finished in 0:00:00.003 ; compiling file "/usr/share/common-lisp/source/closure-common/characters.lisp" (written 06 OCT 2010 05:59:12 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/closure-common/characters-tmpOLPZFU22.fasl ; compilation finished in 0:00:00.039 ; compiling file "/usr/share/common-lisp/source/closure-common/syntax.lisp" (written 06 OCT 2010 05:59:12 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/closure-common/syntax-tmpE8NZG6A8.fasl ; compilation finished in 0:00:00.023 ; compiling file "/usr/share/common-lisp/source/closure-common/encodings.lisp" (written 06 OCT 2010 05:59:12 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/closure-common/encodings-tmpKRRUKJSC.fasl ; compilation finished in 0:00:00.403 ; compiling file "/usr/share/common-lisp/source/closure-common/encodings-data.lisp" (written 06 OCT 2010 05:59:12 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/closure-common/encodings-data-tmpU2ISN61U.fasl ; compilation finished in 0:00:00.043 ; compiling file "/usr/share/common-lisp/source/closure-common/xstream.lisp" (written 06 OCT 2010 05:59:12 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/closure-common/xstream-tmpJVKJGHUO.fasl ; compilation finished in 0:00:00.163 ; compiling file "/usr/share/common-lisp/source/closure-common/ystream.lisp" (written 06 OCT 2010 05:59:12 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/closure-common/ystream-tmpRFLT88I5.fasl ; compilation finished in 0:00:00.367 ; compiling file "/usr/share/common-lisp/source/closure-common/hax.lisp" (written 06 OCT 2010 05:59:12 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/closure-common/hax-tmp9OPB60VM.fasl ; compilation finished in 0:00:00.071 ; compiling file "/usr/share/common-lisp/source/cxml/xml/package.lisp" (written 08 JUN 2011 04:58:03 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cxml/xml/package-tmpSVDN4TBO.fasl ; compilation finished in 0:00:00.000 ; compiling file "/usr/share/common-lisp/source/cxml/xml/util.lisp" (written 08 JUN 2011 04:58:03 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cxml/xml/util-tmpF5QPE831.fasl ; compilation finished in 0:00:00.015 ; compiling file "/usr/share/common-lisp/source/cxml/xml/sax-handler.lisp" (written 08 JUN 2011 04:58:03 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cxml/xml/sax-handler-tmpLAAFHLHW.fasl ; compilation finished in 0:00:00.379 ; compiling file "/usr/share/common-lisp/source/cxml/xml/xml-name-rune-p.lisp" (written 08 JUN 2011 04:58:03 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cxml/xml/xml-name-rune-p-tmpBYA9SD1Y.fasl ; compilation finished in 0:00:00.063 ; compiling file "/usr/share/common-lisp/source/cxml/xml/split-sequence.lisp" (written 08 JUN 2011 04:58:03 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cxml/xml/split-sequence-tmpFLAO1CYQ.fasl ; compilation finished in 0:00:00.019 ; compiling file "/usr/share/common-lisp/source/cxml/xml/xml-parse.lisp" (written 08 JUN 2011 04:58:03 AM): ; file: /usr/share/common-lisp/source/cxml/xml/xml-parse.lisp ; in: DEFSTRUCT ATTDEF ; (DEFSTRUCT CXML::ATTDEF ; CXML::ELEMENT ; CXML::NAME ; TYPE ; CXML::DEFAULT ; (CXML::EXTERNAL-P CXML::*EXTERNAL-SUBSET-P*)) ; --> PROGN EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '# ; '#(# ; #)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CXML::ATTDEF-NAME, CXML::ATTDEF-TYPE, ; CXML::ATTDEF-DEFAULT and CXML::ATTDEF-EXTERNAL-P could not be inlined because ; the structure definition for CXML::ATTDEF was not yet seen. To avoid this ; warning, DEFSTRUCT should precede references to the affected functions, or they ; must be declared locally notinline at each call site. ; in: DEFSTRUCT ELMDEF ; (DEFSTRUCT CXML::ELMDEF ; CXML::NAME ; CXML::CONTENT ; CXML::ATTRIBUTES ; CXML::COMPILED-CSPEC ; (CXML::EXTERNAL-P CXML::*EXTERNAL-SUBSET-P*)) ; --> PROGN EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '# ; '#(# ; #)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CXML::ELMDEF-ATTRIBUTES, ; CXML::ELMDEF-COMPILED-CSPEC and CXML::ELMDEF-EXTERNAL-P could not be inlined ; because the structure definition for CXML::ELMDEF was not yet seen. To avoid ; this warning, DEFSTRUCT should precede references to the affected functions, or ; they must be declared locally notinline at each call site. ; in: DEFSTRUCT DTD ; (DEFSTRUCT CXML::DTD ; (CXML::ELEMENTS (CXML::%MAKE-ROD-HASH-TABLE)) ; (CXML::GENTITIES (CXML::%MAKE-ROD-HASH-TABLE)) ; (CXML::PENTITIES (CXML::%MAKE-ROD-HASH-TABLE)) ; (CXML::NOTATIONS (CXML::%MAKE-ROD-HASH-TABLE))) ; --> PROGN EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '# ; '#(# ; #)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CXML::DTD-GENTITIES and CXML::DTD-PENTITIES could ; not be inlined because the structure definition for CXML::DTD was not yet seen. ; To avoid this warning, DEFSTRUCT should precede references to the affected ; functions, or they must be declared locally notinline at each call site. ; in: DEFSTRUCT ZSTREAM ; (DEFSTRUCT CXML::ZSTREAM ; CXML::TOKEN-CATEGORY ; CXML::TOKEN-SEMANTIC ; CXML::INPUT-STACK) ; --> PROGN EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '# ; '#(# ; #)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CXML::ZSTREAM-P and CXML::ZSTREAM-INPUT-STACK ; could not be inlined because the structure definition for CXML::ZSTREAM was not ; yet seen. To avoid this warning, DEFSTRUCT should precede references to the ; affected functions, or they must be declared locally notinline at each call ; site. ; in: DEFSTRUCT XML-HEADER ; (DEFSTRUCT CXML::XML-HEADER ; CXML::VERSION ; CXML::ENCODING ; (CXML::STANDALONE-P NIL)) ; --> PROGN EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '# ; '#(# ; #)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CXML::XML-HEADER-ENCODING and ; CXML::XML-HEADER-STANDALONE-P could not be inlined because the structure ; definition for CXML::XML-HEADER was not yet seen. To avoid this warning, ; DEFSTRUCT should precede references to the affected functions, or they must be ; declared locally notinline at each call site. ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cxml/xml/xml-parse-tmpSKUEHB49.fasl ; compilation finished in 0:00:01.639 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/cxml/xml/unparse.lisp" (written 08 JUN 2011 04:58:03 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cxml/xml/unparse-tmpDHXMA9ET.fasl ; compilation finished in 0:00:00.455 ; compiling file "/usr/share/common-lisp/source/cxml/xml/xmls-compat.lisp" (written 08 JUN 2011 04:58:03 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cxml/xml/xmls-compat-tmpXPODQDBQ.fasl ; compilation finished in 0:00:00.171 ; compiling file "/usr/share/common-lisp/source/cxml/xml/recoder.lisp" (written 08 JUN 2011 04:58:03 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cxml/xml/recoder-tmpON3EBOWQ.fasl ; compilation finished in 0:00:00.195 ; compiling file "/usr/share/common-lisp/source/cxml/xml/xmlns-normalizer.lisp" (written 08 JUN 2011 04:58:03 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cxml/xml/xmlns-normalizer-tmp5DE7FWXL.fasl ; compilation finished in 0:00:00.055 ; compiling file "/usr/share/common-lisp/source/cxml/xml/space-normalizer.lisp" (written 08 JUN 2011 04:58:03 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cxml/xml/space-normalizer-tmpNR0FXTOU.fasl ; compilation finished in 0:00:00.067 ; compiling file "/usr/share/common-lisp/source/cxml/xml/catalog.lisp" (written 08 JUN 2011 04:58:03 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cxml/xml/catalog-tmpIS216RW.fasl ; compilation finished in 0:00:00.263 ; compiling file "/usr/share/common-lisp/source/cxml/xml/sax-proxy.lisp" (written 08 JUN 2011 04:58:03 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cxml/xml/sax-proxy-tmp11752V0C.fasl ; compilation finished in 0:00:00.175 ; compiling file "/usr/share/common-lisp/source/cxml/xml/atdoc-configuration.lisp" (written 08 JUN 2011 04:58:03 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cxml/xml/atdoc-configuration-tmpONM4L97G.fasl ; compilation finished in 0:00:00.000 ; compiling file "/usr/share/common-lisp/source/cxml/dom/package.lisp" (written 08 JUN 2011 04:58:03 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cxml/dom/package-tmpR4BLTE1D.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/cxml/dom/dom-impl.lisp" (written 08 JUN 2011 04:58:03 AM): ; file: /usr/share/common-lisp/source/cxml/dom/dom-impl.lisp ; in: DEFSTRUCT ROD-STREAM ; (DEFSTRUCT RUNE-DOM::ROD-STREAM (RUNE-DOM::BUF NIL) (POSITION 0)) ; --> PROGN EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '# ; '#(# ; #)) ; ; caught STYLE-WARNING: ; Previously compiled call to RUNE-DOM::ROD-STREAM-BUF could not be inlined ; because the structure definition for RUNE-DOM::ROD-STREAM was not yet seen. To ; avoid this warning, DEFSTRUCT should precede references to the affected ; functions, or they must be declared locally notinline at each call site. ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cxml/dom/dom-impl-tmpONQ4LJWF.fasl ; compilation finished in 0:00:05.387 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/cxml/dom/dom-builder.lisp" (written 08 JUN 2011 04:58:03 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cxml/dom/dom-builder-tmpFPHBYJPO.fasl ; compilation finished in 0:00:01.123 ; compiling file "/usr/share/common-lisp/source/cxml/dom/dom-sax.lisp" (written 08 JUN 2011 04:58:03 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cxml/dom/dom-sax-tmpXKL3NHA4.fasl ; compilation finished in 0:00:00.359 ; compiling file "/usr/share/common-lisp/source/cxml/klacks/package.lisp" (written 08 JUN 2011 04:58:03 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cxml/klacks/package-tmp3KKXCXYY.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/cxml/klacks/klacks.lisp" (written 08 JUN 2011 04:58:03 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cxml/klacks/klacks-tmpVACGDARV.fasl ; compilation finished in 0:00:01.171 ; compiling file "/usr/share/common-lisp/source/cxml/klacks/klacks-impl.lisp" (written 08 JUN 2011 04:58:03 AM): ; file: /usr/share/common-lisp/source/cxml/klacks/klacks-impl.lisp ; in: DEFUN MAKE-SOURCE ; (DEFUN CXML:MAKE-SOURCE ; (CXML::INPUT ; &REST CXML::ARGS ; &KEY CXML::VALIDATE CXML::DTD CXML::ROOT CXML::ENTITY-RESOLVER ; CXML::DISALLOW-INTERNAL-SUBSET (CXML::BUFFERING T) PATHNAME) ; (DECLARE ; (IGNORE CXML::VALIDATE CXML::DTD CXML::ROOT CXML::ENTITY-RESOLVER ; CXML::DISALLOW-INTERNAL-SUBSET)) ; (ETYPECASE CXML::INPUT ; (RUNES:XSTREAM ; (WHEN (AND # #) ; (WARN "make-source called with !buffering, but xstream is buffering")) ; (LET (#) ; (LET # ; # ; #))) ; (STREAM ; (LET (#) ; (SETF #) ; (APPLY #'CXML:MAKE-SOURCE RUNES:XSTREAM CXML::ARGS))) ; (PATHNAME ; (LET* (#) ; (SETF #) ; (LET # ; # ; CXML::SOURCE))) ; (RUNES:ROD ; (LET (#) ; (SETF #) ; (APPLY #'CXML:MAKE-SOURCE RUNES:XSTREAM CXML::ARGS))) ; (ARRAY (CXML:MAKE-SOURCE (RUNES:MAKE-OCTET-INPUT-STREAM CXML::INPUT))))) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CXML:MAKE-SOURCE ; (CXML::INPUT &REST CXML::ARGS &KEY CXML::VALIDATE CXML::DTD CXML::ROOT ; CXML::ENTITY-RESOLVER CXML::DISALLOW-INTERNAL-SUBSET ; (CXML::BUFFERING T) PATHNAME) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (DECLARE ; (IGNORE CXML::VALIDATE CXML::DTD CXML::ROOT CXML::ENTITY-RESOLVER ; CXML::DISALLOW-INTERNAL-SUBSET)) ; (BLOCK CXML:MAKE-SOURCE ; (ETYPECASE CXML::INPUT ; (RUNES:XSTREAM ; (WHEN # #) ; (LET # ; #)) ; (STREAM ; (LET # ; # ; #)) ; (PATHNAME ; (LET* # ; # ; #)) ; (RUNES:ROD ; (LET # ; # ; #)) ; (ARRAY (CXML:MAKE-SOURCE #))))) ; ; caught STYLE-WARNING: ; The variable PATHNAME is defined but never used. ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cxml/klacks/klacks-impl-tmpYII9B406.fasl ; compilation finished in 0:00:04.147 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/cxml/klacks/tap-source.lisp" (written 08 JUN 2011 04:58:03 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cxml/klacks/tap-source-tmpA2CNLB7.fasl ; compilation finished in 0:00:00.663 ; compiling file "/usr/share/common-lisp/source/cxml/test/domtest.lisp" (written 08 JUN 2011 04:58:03 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cxml/test/domtest-tmpG5J7KPU1.fasl ; compilation finished in 0:00:02.567 ; compiling file "/usr/share/common-lisp/source/cxml/test/xmlconf.lisp" (written 08 JUN 2011 04:58:03 AM): ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cxml/test/xmlconf-tmp981UY8DC.fasl ; compilation finished in 0:00:00.911 ; compiling file "/usr/share/common-lisp/source/zs3/package.lisp" (written 24 DEC 2017 11:53:51 AM): ; processing (DEFPACKAGE #:ZS3 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/zs3/package-tmpZ1XIHDCA.fasl ; compilation finished in 0:00:00.015 ; compiling file "/usr/share/common-lisp/source/zs3/utils.lisp" (written 24 DEC 2017 11:53:51 AM): ; processing (IN-PACKAGE #:ZS3) ; processing (DEFVAR *MONTHS* ...) ; processing (DEFVAR *DAYS* ...) ; processing (DEFTYPE OCTET ...) ; processing (DEFTYPE OCTET-VECTOR ...) ; processing (DEFTYPE EMPTY-VECTOR ...) ; processing (DEFUN HTTP-DATE-STRING ...) ; processing (DEFUN ISO8601-DATE-STRING ...) ; processing (DEFUN ISO8601-BASIC-TIMESTAMP-STRING ...) ; processing (DEFUN ISO8601-BASIC-DATE-STRING ...) ; processing (DEFUN STRING-OCTETS ...) ; processing (DEFUN STRING64 ...) ; processing (DEFUN URL-DECODE ...) ; processing (DEFUN URL-ENCODE ...) ; processing (DEFUN ALIST-TO-URL-ENCODED-STRING ...) ; processing (DEFUN SAVE ...) ; processing (DEFUN PARSE-AMAZON-TIMESTAMP ...) ; processing (DEFUN STRINGIFY ...) ; processing (DEFUN PARAMETERS-ALIST ...) ; processing (DEFUN LAST-ENTRY ...) ; processing (DEFUN FILE-SIZE ...) ; processing (DEFVAR +UNIX-TIME-DIFFERENCE+ ...) ; processing (DEFUN UNIX-TIME ...) ; processing (DEFUN OCTET-VECTOR ...) ; processing (DEFUN KEYWORDIFY ...) ; processing (DEFUN MAKE-OCTET-VECTOR ...) ; processing (DEFUN NOW+ ...) ; processing (DEFUN NOW- ...) ; processing (DEFUN COPY-N-OCTETS ...) ; processing (DEFUN STARTS-WITH ...) ; processing (DEFUN ENDS-WITH ...) ; processing (DEFPARAMETER *FILE-BUFFER-SIZE* ...) ; processing (DEFUN MAKE-FILE-BUFFER ...) ; processing (DEFUN READ-EXACTLY-N-OCTETS ...) ; processing (DEFUN READ-COMPLETE-FILE-BUFFER ...) ; processing (DEFUN MERGE-FILE-BUFFERS ...) ; processing (DEFUN SKIP-STREAM-OCTETS ...) ; processing (DEFUN DRAINED-STREAM-VECTOR ...) ; processing (DEFUN PARTIAL-STREAM-VECTOR ...) ; processing (DEFUN STREAM-SUBSET-VECTOR ...) ; processing (DEFUN FILE-SUBSET-VECTOR ...) ; processing (DEFUN ALIST-PLIST ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/zs3/utils-tmpSXW96VDS.fasl ; compilation finished in 0:00:03.147 ; compiling file "/usr/share/common-lisp/source/zs3/crypto.lisp" (written 24 DEC 2017 11:53:51 AM): ; processing (IN-PACKAGE #:ZS3) ; processing (DEFPARAMETER *EMPTY-STRING-SHA256* ...) ; processing (DEFPARAMETER *NEWLINE-VECTOR* ...) ; processing (DEFCLASS DIGESTER ...) ; processing (DEFUN MAKE-DIGESTER ...) ; processing (DEFGENERIC ADD-STRING ...) ; processing (DEFGENERIC ADD-NEWLINE ...) ; processing (DEFGENERIC ADD-LINE ...) ; processing (DEFGENERIC DIGEST ...) ; processing (DEFGENERIC DIGEST64 ...) ; processing (DEFUN FILE-MD5 ...) ; processing (DEFUN FILE-MD5/B64 ...) ; processing (DEFUN FILE-MD5/HEX ...) ; processing (DEFUN FILE-SHA256 ...) ; processing (DEFUN FILE-SHA256/HEX ...) ; processing (DEFUN VECTOR-SHA256 ...) ; processing (DEFUN VECTOR-SHA256/HEX ...) ; processing (DEFUN STRINGS-SHA256/HEX ...) ; processing (DEFUN STRINGS-HMAC-SHA256/HEX ...) ; processing (DEFUN VECTOR-MD5/B64 ...) ; processing (DEFUN FILE-ETAG ...) ; processing (DEFUN SIGN-STRING ...) ; processing (DEFUN HMAC-SHA256 ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/zs3/crypto-tmpJOZ4RWJ2.fasl ; compilation finished in 0:00:00.419 ; compiling file "/usr/share/common-lisp/source/zs3/xml-binding.lisp" (written 24 DEC 2017 11:53:51 AM): ; processing (IN-PACKAGE #:ZS3) ; processing (DEFUN SKIP-DOCUMENT-START ...) ; processing (DEFUN SKIP-CHARACTERS ...) ; processing (DEFUN COLLECT-CHARACTERS ...) ; processing (DEFUN COLLECT-REST-ALIST ...) ; processing (DEFINE-CONDITION XML-BINDING-ERROR ...) ; processing (DEFVAR *BINDER-DEFINITIONS* ...) ; processing (DEFCLASS BINDER ...) ; processing (DEFMACRO DEFBINDER ...) ; processing (DEFUN FIND-BINDER ...) ; processing (DEFUN XML-BIND ...) ; processing (DEFUN TRY-TO-XML-BIND ...) ; processing (DEFVAR *CURRENT-ELEMENT-NAME*) ; processing (DEFUN CREATE-ELEMENT-START-MATCHER ...) ; processing (DEFUN CREATE-ELEMENT-END-MATCHER ...) ; processing (DEFUN CREATE-BINDINGS-EXTENDER ...) ; processing (DEFUN CREATE-SKIPPER ...) ; processing (DEFUN CREATE-BINDINGS-RETURNER ...) ; processing (DEFMACRO CATCHING-XML-ERRORS ...) ; processing (DEFUN CREATE-SEQUENCE-BINDER ...) ; processing (DEFUN CREATE-ALIST-BINDER ...) ; processing (DEFUN CREATE-OPTIONAL-BINDER ...) ; processing (DEFUN CREATE-ALTERNATE-BINDER ...) ; processing (DEFUN CREATE-SUB-BINDER-BINDER ...) ; processing (DEFUN CREATE-SPECIAL-PROCESSOR ...) ; processing (DEFUN CREATE-BINDER ...) ; processing (DEFUN XML-SOURCE ...) ; processing (DEFUN MAKE-BINDER ...) ; processing (DEFUN XML-DOCUMENT-ELEMENT ...) ; processing (DEFUN BVALUE ...) ; processing (DEFUN BFUN ...) ; processing (DEFMACRO ALIST-BIND ...) ; processing (DEFGENERIC MERGE-BINDINGS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/zs3/xml-binding-tmpBECHKCQ0.fasl ; compilation finished in 0:00:00.779 ; compiling file "/usr/share/common-lisp/source/zs3/xml-output.lisp" (written 24 DEC 2017 11:53:51 AM): ; processing (IN-PACKAGE #:ZS3) ; processing (DEFMACRO WITH-XML-OUTPUT ...) ; processing (DEFUN SIMPLE-ELEMENT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/zs3/xml-output-tmpOYQY6WIA.fasl ; compilation finished in 0:00:00.039 ; compiling file "/usr/share/common-lisp/source/zs3/credentials.lisp" (written 24 DEC 2017 11:53:51 AM): ; processing (IN-PACKAGE #:ZS3) ; processing (DEFVAR *CREDENTIALS* ...) ; processing (DEFINE-CONDITION UNSUPPORTED-CREDENTIALS ...) ; processing (DEFGENERIC ACCESS-KEY ...) ; processing (DEFGENERIC SECRET-KEY ...) ; processing (DEFGENERIC SECURITY-TOKEN ...) ; processing (DEFCLASS LAZY-CREDENTIALS-MIXIN ...) ; processing (DEFMETHOD SLOT-UNBOUND ...) ; processing (DEFMETHOD SLOT-UNBOUND ...) ; processing (DEFMETHOD SLOT-UNBOUND ...) ; processing (DEFCLASS FILE-CREDENTIALS ...) ; processing (DEFGENERIC INITIALIZE-LAZY-CREDENTIALS ...) ; processing (DEFUN FILE-CREDENTIALS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/zs3/credentials-tmp50O9T7IY.fasl ; compilation finished in 0:00:00.287 ; compiling file "/usr/share/common-lisp/source/zs3/post.lisp" (written 24 DEC 2017 11:53:51 AM): ; processing (IN-PACKAGE #:ZS3) ; processing (DEFCLASS POST-POLICY ...) ; processing (DEFGENERIC POLICY-SERIALIZE ...) ; processing (DEFMETHOD POLICY-SERIALIZE ...) ; processing (DEFMETHOD POLICY-SERIALIZE ...) ; processing (DEFUN POLICY-STRING64 ...) ; processing (DEFUN POLICY-SIGNATURE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/zs3/post-tmpGZL21UBE.fasl ; compilation finished in 0:00:00.211 ; compiling file "/usr/share/common-lisp/source/zs3/redirects.lisp" (written 24 DEC 2017 11:53:51 AM): ; processing (IN-PACKAGE #:ZS3) ; processing (DEFVAR *PERMANENT-REDIRECTS* ...) ; processing (DEFUN REDIRECT-KEY ...) ; processing (DEFUN REDIRECTION-DATA ...) ; processing (DEFUN REDIRECTED-ENDPOINT ...) ; processing (DEFUN REDIRECTED-REGION ...) ; processing (DEFUN (SETF REDIRECTION-DATA) ...) ; processing (DEFUN CLEAR-REDIRECTS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/zs3/redirects-tmpAKRW6QK6.fasl ; compilation finished in 0:00:00.027 ; compiling file "/usr/share/common-lisp/source/zs3/request.lisp" (written 24 DEC 2017 11:53:51 AM): ; processing (IN-PACKAGE #:ZS3) ; processing (DEFVAR *S3-ENDPOINT* ...) ; processing (DEFVAR *S3-REGION* ...) ; processing (DEFVAR *USE-SSL* ...) ; processing (DEFVAR *USE-CONTENT-MD5* ...) ; processing (DEFVAR *SIGNED-PAYLOAD* ...) ; processing (DEFVAR *USE-KEEP-ALIVE* ...) ; processing (DEFVAR *KEEP-ALIVE-STREAM* ...) ; processing (DEFMACRO WITH-KEEP-ALIVE ...) ; processing (DEFCLASS REQUEST ...) ; processing (DEFMETHOD SLOT-UNBOUND ...) ; processing (DEFMETHOD SLOT-UNBOUND ...) ; processing (DEFMETHOD SLOT-UNBOUND ...) ; processing (DEFGENERIC AMZ-HEADER-VALUE ...) ; processing (DEFGENERIC ENSURE-AMZ-HEADER ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFGENERIC HOST ...) ; processing (DEFGENERIC HTTP-METHOD ...) ; processing (DEFUN PURI-CANONICALIZED-PATH ...) ; processing (DEFGENERIC SIGNED-PATH ...) ; processing (DEFGENERIC REQUEST-PATH ...) ; processing (DEFGENERIC ALL-AMAZON-HEADERS ...) ; processing (DEFGENERIC DATE-STRING ...) ; processing (DEFUN HEADERS-FOR-SIGNING ...) ; file: /usr/share/common-lisp/source/zs3/request.lisp ; in: DEFUN HEADERS-FOR-SIGNING ; (ZS3:PARAMETERS-ALIST "host" (ZS3::HOST ZS3::REQUEST) "content-type" ; (ZS3::CONTENT-TYPE ZS3::REQUEST)) ; ; caught STYLE-WARNING: ; The first argument of type (SIMPLE-ARRAY CHARACTER (4)) cannot be used as a keyword. ; ; caught STYLE-WARNING: ; The third argument of type (SIMPLE-ARRAY CHARACTER (12)) cannot be used as a keyword. ; processing (DEFUN CANONICAL-HEADERS ...) ; processing (DEFUN SIGNED-HEADERS ...) ; processing (DEFUN PARAMETERS-FOR-SIGNING ...) ; processing (DEFUN CANONICAL-PARAMETERS ...) ; processing (DEFUN CANONICAL-PARAMETERS-STRING ...) ; processing (DEFUN PATH-TO-SIGN ...) ; processing (DEFUN CANONICALIZED-REQUEST-LINES ...) ; processing (DEFUN STRING-TO-SIGN-LINES ...) ; processing (DEFUN MAKE-SIGNING-KEY ...) ; processing (DEFUN PAYLOAD-SHA256 ...) ; processing (DEFUN REQUEST-SIGNATURE ...) ; processing (DEFMETHOD AUTHORIZATION-HEADER-VALUE ...) ; processing (DEFGENERIC DRAKMA-HEADERS ...) ; processing (DEFGENERIC URL ...) ; processing (DEFUN SEND-FILE-CONTENT ...) ; processing (DEFGENERIC SEND ...) ; processing (DEFMETHOD ACCESS-KEY ...) ; processing (DEFMETHOD SECRET-KEY ...) ; processing (DEFMETHOD SECURITY-TOKEN ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/zs3/request-tmp8J071LEX.fasl ; compilation finished in 0:00:00.167 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/zs3/response.lisp" (written 24 DEC 2017 11:53:51 AM): ; processing (IN-PACKAGE #:ZS3) ; processing (DEFVAR *RESPONSE-ELEMENT-CLASSES* ...) ; processing (DEFUN SET-ELEMENT-CLASS ...) ; processing (DEFCLASS RESPONSE ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFGENERIC XML-STRING ...) ; processing (DEFGENERIC RESPONSE-SPECIALIZED-CLASS ...) ; processing (DEFGENERIC SPECIALIZED-INITIALIZE ...) ; processing (DEFGENERIC CONTENT-LENGTH ...) ; processing (DEFGENERIC SPECIALIZE-RESPONSE ...) ; processing (DEFUN CLOSE-KEEP-ALIVE ...) ; processing (DEFUN REQUEST-RESPONSE ...) ; processing (DEFVAR *BACKOFF* ...) ; processing (DEFUN SUBMIT-REQUEST ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/zs3/response-tmp9EISPCFY.fasl ; compilation finished in 0:00:00.063 WARNING: redefining ZS3::CONTENT-LENGTH in DEFGENERIC ; compiling file "/usr/share/common-lisp/source/zs3/objects.lisp" (written 24 DEC 2017 11:53:51 AM): ; processing (IN-PACKAGE #:ZS3) ; processing (DEFCLASS PERSON ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFCLASS BUCKET ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFMETHOD NAME ...) ; processing (DEFCLASS KEY ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/zs3/objects-tmpRZ31FVZM.fasl ; compilation finished in 0:00:00.027 ; compiling file "/usr/share/common-lisp/source/zs3/bucket-listing.lisp" (written 24 DEC 2017 11:53:51 AM): ; processing (IN-PACKAGE #:ZS3) ; processing (DEFBINDER ALL-BUCKETS ...) ; processing (DEFCLASS ALL-BUCKETS ...) ; processing (SET-ELEMENT-CLASS "ListAllMyBucketsResult" ...) ; processing (DEFMETHOD SPECIALIZED-INITIALIZE ...) ; processing (DEFBINDER LIST-BUCKET-RESULT ...) ; processing (DEFCLASS BUCKET-LISTING ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (SET-ELEMENT-CLASS "ListBucketResult" ...) ; processing (DEFUN KEY-BINDING-KEY ...) ; processing (DEFMETHOD SPECIALIZED-INITIALIZE ...) ; processing (DEFGENERIC SUCCESSIVE-MARKER ...) ; processing (DEFGENERIC SUCCESSIVE-REQUEST ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/zs3/bucket-listing-tmpT7RFXS2O.fasl ; compilation finished in 0:00:00.059 ; compiling file "/usr/share/common-lisp/source/zs3/errors.lisp" (written 24 DEC 2017 11:53:51 AM): ; processing (IN-PACKAGE #:ZS3) ; processing (DEFBINDER ERROR ...) ; processing (DEFCLASS AMAZON-ERROR ...) ; processing (SET-ELEMENT-CLASS "Error" ...) ; processing (DEFGENERIC ERROR-DATA-VALUE ...) ; processing (DEFMETHOD SPECIALIZED-INITIALIZE ...) ; processing (DEFMETHOD SPECIALIZED-INITIALIZE ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN REPORT-REQUEST-ERROR ...) ; processing (DEFINE-CONDITION REQUEST-ERROR ...) ; processing (DEFPARAMETER *SPECIFIC-ERRORS* ...) ; processing (DEFUN SPECIFIC-ERROR ...) ; processing (DEFGENERIC SIGNAL-SPECIFIC-ERROR ...) ; processing (DEFGENERIC MAYBE-SIGNAL-ERROR ...) ; processing (DEFUN ERROR-READER-NAME ...) ; processing (DEFMACRO DEFINE-SPECIFIC-ERROR ...) ; processing (DEFINE-SPECIFIC-ERROR (INTERNAL-ERROR "InternalError") ...) ; processing (DEFINE-SPECIFIC-ERROR (SLOW-DOWN "SlowDown") ...) ; processing (DEFINE-SPECIFIC-ERROR (NO-SUCH-BUCKET "NoSuchBucket") ...) ; processing (DEFINE-SPECIFIC-ERROR (NO-SUCH-KEY "NoSuchKey") ...) ; processing (DEFINE-SPECIFIC-ERROR (ACCESS-DENIED "AccessDenied") ...) ; processing (DEFINE-SPECIFIC-ERROR (MALFORMED-XML "MalformedXML") ...) ; processing (DEFINE-CONDITION REDIRECT-ERROR ...) ; processing (DEFINE-SPECIFIC-ERROR (PERMANENT-REDIRECT "PermanentRedirect") ...) ; processing (DEFINE-SPECIFIC-ERROR (TEMPORARY-REDIRECT "TemporaryRedirect") ...) ; processing (DEFINE-SPECIFIC-ERROR (SIGNATURE-MISMATCH "SignatureDoesNotMatch") ...) ; processing (DEFINE-SPECIFIC-ERROR (PRECONDITION-FAILED "PreconditionFailed") ...) ; processing (DEFINE-SPECIFIC-ERROR (AUTHORIZATION-HEADER-MALFORMED "AuthorizationHeaderMalformed") ...) ; processing (DEFINE-CONDITION LINKED ...) ; processing (DEFINE-CONDITION BUCKET-RESTRICTIONS ...) ; processing (DEFINE-SPECIFIC-ERROR (INVALID-BUCKET-NAME "InvalidBucketName") ...) ; processing (DEFINE-SPECIFIC-ERROR (BUCKET-EXISTS "BucketAlreadyExists") ...) ; processing (DEFINE-SPECIFIC-ERROR (TOO-MANY-BUCKETS "TooManyBuckets") ...) ; processing (DEFINE-SPECIFIC-ERROR (AMBIGUOUS-GRANT "AmbiguousGrantByEmailAddress") ...) ; processing (DEFINE-SPECIFIC-ERROR (BUCKET-NOT-EMPTY "BucketNotEmpty") ...) ; processing (DEFINE-SPECIFIC-ERROR (INVALID-LOGGING-TARGET "InvalidTargetBucketForLogging") ...) ; processing (DEFINE-SPECIFIC-ERROR (KEY-TOO-LONG "KeyTooLong") ...) ; processing (DEFINE-SPECIFIC-ERROR (REQUEST-TIME-SKEWED "RequestTimeTooSkewed") ...) ; processing (DEFINE-SPECIFIC-ERROR (OPERATION-ABORTED "OperationAborted") ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/zs3/errors-tmpALSWN3ZO.fasl ; compilation finished in 0:00:00.127 ; compiling file "/usr/share/common-lisp/source/zs3/acl.lisp" (written 24 DEC 2017 11:53:51 AM): ; processing (IN-PACKAGE #:ZS3) ; processing (DEFCLASS ACCESS-CONTROL-LIST ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFCLASS GRANT ...) ; processing (DEFCLASS ACL-PERSON ...) ; processing (DEFMETHOD SLOT-UNBOUND ...) ; processing (DEFCLASS ACL-EMAIL ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFCLASS ACL-GROUP ...) ; processing (DEFMETHOD SLOT-UNBOUND ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFGENERIC GRANTEE-FOR-PRINT ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFPARAMETER *PERMISSIONS* ...) ; processing (DEFUN PERMISSION-NAME ...) ; processing (DEFUN PERMISSION-KEYWORD ...) ; processing (DEFPARAMETER *ALL-USERS* ...) ; processing (DEFPARAMETER *AWS-USERS* ...) ; processing (DEFPARAMETER *LOG-DELIVERY* ...) ; processing (DEFGENERIC ACL-SERIALIZE ...) ; processing (DEFMETHOD ACL-SERIALIZE ...) ; processing (DEFVAR *XSI* ...) ; processing (DEFGENERIC XSI-TYPE ...) ; processing (DEFMETHOD ACL-SERIALIZE ...) ; processing (DEFMETHOD ACL-SERIALIZE ...) ; processing (DEFMETHOD ACL-SERIALIZE ...) ; processing (DEFMETHOD ACL-SERIALIZE ...) ; processing (DEFBINDER ACCESS-CONTROL-POLICY ...) ; processing (DEFCLASS ACL-RESPONSE ...) ; processing (SET-ELEMENT-CLASS "AccessControlPolicy" ...) ; processing (DEFGENERIC ACL-EQV ...) ; processing (DEFUN ENSURE-ACL-GROUP ...) ; processing (DEFUN ALIST-GRANT ...) ; processing (DEFMETHOD SPECIALIZED-INITIALIZE ...) ; processing (DEFUN GRANT ...) ; processing (DEFUN ACL-EMAIL ...) ; processing (DEFUN ACL-PERSON ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/zs3/acl-tmp8525G5XJ.fasl ; compilation finished in 0:00:00.111 ; compiling file "/usr/share/common-lisp/source/zs3/logging.lisp" (written 24 DEC 2017 11:53:51 AM): ; processing (IN-PACKAGE #:ZS3) ; processing (DEFCLASS LOGGING-SETUP ...) ; processing (DEFCLASS LOGGING ...) ; processing (DEFBINDER BUCKET-LOGGING-STATUS ...) ; processing (DEFUN BINDINGS-LOGGING-SETUP ...) ; processing (DEFGENERIC LOG-SERIALIZE ...) ; processing (SET-ELEMENT-CLASS "BucketLoggingStatus" ...) ; processing (DEFMETHOD SPECIALIZED-INITIALIZE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/zs3/logging-tmpNBWMKLPF.fasl ; compilation finished in 0:00:00.015 ; compiling file "/usr/share/common-lisp/source/zs3/location.lisp" (written 24 DEC 2017 11:53:51 AM): ; processing (IN-PACKAGE #:ZS3) ; processing (DEFBINDER LOCATION-CONSTRAINT ...) ; processing (DEFCLASS LOCATION-CONSTRAINT ...) ; processing (SET-ELEMENT-CLASS "LocationConstraint" ...) ; processing (DEFMETHOD SPECIALIZED-INITIALIZE ...) ; processing (DEFUN LOCATION-CONSTRAINT-XML ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/zs3/location-tmpZ7NED271.fasl ; compilation finished in 0:00:00.011 ; compiling file "/usr/share/common-lisp/source/zs3/interface.lisp" (written 24 DEC 2017 11:53:51 AM): ; processing (IN-PACKAGE #:ZS3) ; processing (DEFPARAMETER *CANNED-ACCESS-POLICIES* ...) ; processing (DEFUN CANNED-ACCESS-POLICY ...) ; processing (DEFUN ACCESS-POLICY-HEADER ...) ; processing (DEFUN HEAD ...) ; processing (DEFUN ALL-BUCKETS ...) ; processing (DEFUN BUCKET-LOCATION ...) ; processing (DEFUN BUCKET-REGION ...) ; processing (DEFUN REGION-ENDPOINT ...) ; processing (DEFUN QUERY-BUCKET ...) ; processing (DEFUN CONTINUE-BUCKET-QUERY ...) ; processing (DEFUN ALL-KEYS ...) ; processing (DEFUN BUCKET-EXISTS-P ...) ; processing (DEFUN CREATE-BUCKET ...) ; processing (DEFUN DELETE-BUCKET ...) ; processing (DEFUN CHECK-REQUEST-SUCCESS ...) ; processing (DEFUN MAKE-FILE-WRITER-HANDLER ...) ; processing (DEFUN VECTOR-WRITER-HANDLER ...) ; processing (DEFUN STREAM-IDENTITY-HANDLER ...) ; processing (DEFUN MAKE-STRING-WRITER-HANDLER ...) ; processing (DEFUN GET-OBJECT ...) ; processing (DEFUN GET-VECTOR ...) ; processing (DEFUN GET-STRING ...) ; processing (DEFUN GET-FILE ...) ; processing (DEFUN FORMAT-TAGGING-HEADER ...) ; processing (DEFUN PUT-OBJECT ...) ; processing (DEFUN PUT-VECTOR ...) ; processing (DEFUN PUT-STRING ...) ; processing (DEFUN PUT-FILE ...) ; processing (DEFUN PUT-STREAM ...) ; processing (DEFUN DELETE-OBJECT ...) ; processing (DEFUN BULK-DELETE-DOCUMENT ...) ; processing (DEFBINDER DELETE-OBJECTS-RESULT ...) ; processing (DEFUN DELETE-OBJECTS ...) ; processing (DEFUN DELETE-ALL-OBJECTS ...) ; processing (DEFUN COPY-OBJECT ...) ; processing (DEFUN OBJECT-METADATA ...) ; processing (DEFUN SET-STORAGE-CLASS ...) ; processing (DEFPARAMETER *PUBLIC-READ-GRANT* ...) ; processing (DEFUN GET-ACL ...) ; processing (DEFUN PUT-ACL ...) ; processing (DEFUN MAKE-PUBLIC ...) ; processing (DEFUN MAKE-PRIVATE ...) ; processing (DEFPARAMETER *LOG-DELIVERY-GRANTS* ...) ; processing (DEFUN ENABLE-LOGGING-TO ...) ; processing (DEFUN DISABLE-LOGGING-TO ...) ; processing (DEFUN ENABLE-LOGGING ...) ; processing (DEFPARAMETER *EMPTY-LOGGING-SETUP* ...) ; processing (DEFUN DISABLE-LOGGING ...) ; processing (DEFUN LOGGING-SETUP ...) ; processing (DEFCLASS URL-BASED-REQUEST ...) ; processing (DEFMETHOD DATE-STRING ...) ; processing (DEFUN RESOURCE-URL ...) ; processing (DEFUN AUTHORIZED-URL ...) ; file: /usr/share/common-lisp/source/zs3/interface.lisp ; in: DEFUN AUTHORIZED-URL ; (ZS3:PARAMETERS-ALIST "X-Amz-Algorithm" "AWS4-HMAC-SHA256" "X-Amz-Credential" ; (FORMAT NIL "~A/~A/~A/s3/aws4_request" ; (ZS3:ACCESS-KEY ZS3:*CREDENTIALS*) ; (ZS3::ISO8601-BASIC-DATE-STRING ; (ZS3::DATE ZS3::REQUEST)) ; (ZS3::REGION ZS3::REQUEST)) ; "X-Amz-Date" ; (ZS3::ISO8601-BASIC-TIMESTAMP-STRING ; (ZS3::DATE ZS3::REQUEST)) ; "X-Amz-Expires" (- ZS3::EXPIRES (GET-UNIVERSAL-TIME)) ; "X-Amz-SignedHeaders" ; (FORMAT NIL "~{~A~^;~}" ; (ZS3::SIGNED-HEADERS ZS3::REQUEST))) ; ; caught STYLE-WARNING: ; The first argument of type (SIMPLE-ARRAY CHARACTER (15)) cannot be used as a keyword. ; ; caught STYLE-WARNING: ; The third argument of type (SIMPLE-ARRAY CHARACTER (16)) cannot be used as a keyword. ; ; caught STYLE-WARNING: ; The fifth argument of type (SIMPLE-ARRAY CHARACTER (10)) cannot be used as a keyword. ; ; caught STYLE-WARNING: ; The seventh argument of type (SIMPLE-ARRAY CHARACTER (13)) cannot be used as a keyword. ; ; caught STYLE-WARNING: ; The ninth argument of type (SIMPLE-ARRAY CHARACTER (19)) cannot be used as a keyword. ; processing (DEFPARAMETER *ME-CACHE* ...) ; processing (DEFUN ME ...) ; processing (DEFUN MAKE-POST-POLICY ...) ; processing (DEFBINDER GET-TAGGING-RESULT ...) ; processing (DEFUN GET-TAGGING ...) ; processing (DEFUN PUT-TAGGING ...) ; processing (DEFUN DELETE-TAGGING ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/zs3/interface-tmpVAWG08RM.fasl ; compilation finished in 0:00:00.571 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/zs3/cloudfront.lisp" (written 24 DEC 2017 11:53:51 AM): ; processing (IN-PACKAGE #:ZS3) ; processing (DEFVAR *CANONICAL-BUCKET-NAME-SUFFIX* ...) ; processing (DEFPARAMETER *CALLER-REFERENCE-COUNTER* ...) ; processing (DEFPARAMETER *CLOUDFRONT-BASE-URL* ...) ; processing (DEFPARAMETER *DISTRIBUTION-SPECIFIC-ERRORS* ...) ; processing (DEFBINDER DISTRIBUTION-ERROR-RESPONSE ...) ; processing (DEFINE-CONDITION DISTRIBUTION-ERROR ...) ; processing (DEFMACRO DEFINE-SPECIFIC-DISTRIBUTION-ERROR ...) ; processing (DEFINE-SPECIFIC-DISTRIBUTION-ERROR "InvalidIfMatchVersion" ...) ; processing (DEFINE-SPECIFIC-DISTRIBUTION-ERROR "PreconditionFailed" ...) ; processing (DEFINE-SPECIFIC-DISTRIBUTION-ERROR "DistributionNotDisabled" ...) ; processing (DEFINE-SPECIFIC-DISTRIBUTION-ERROR "CNAMEAlreadyExists" ...) ; processing (DEFINE-SPECIFIC-DISTRIBUTION-ERROR "TooManyDistributions" ...) ; processing (DEFUN MAYBE-SIGNAL-DISTRIBUTION-ERROR ...) ; processing (DEFUN CANONICAL-DISTRIBUTION-BUCKET-NAME ...) ; processing (DEFUN GENERATE-CALLER-REFERENCE ...) ; processing (DEFCLASS DISTRIBUTION ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFUN DISTRIBUTION-DOCUMENT ...) ; processing (DEFUN DISTRIBUTION-REQUEST-HEADERS ...) ; processing (DEFUN DISTRIBUTION-REQUEST ...) ; processing (DEFBINDER DISTRIBUTION-CONFIG ...) ; processing (DEFBINDER DISTRIBUTION ...) ; processing (DEFUN BINDINGS-DISTRIBUTION ...) ; processing (DEFUN PUT-CONFIG ...) ; processing (DEFUN LATEST-VERSION ...) ; processing (DEFUN MERGE-INTO ...) ; processing (DEFGENERIC REFRESH ...) ; processing (DEFUN CALL-WITH-LATEST ...) ; processing (DEFUN MODIFY-AND-SAVE ...) ; processing (DEFMACRO WITH-SAVED-MODIFICATIONS ...) ; processing (DEFBINDER DISTRIBUTION-LIST ...) ; processing (DEFUN ALL-DISTRIBUTIONS ...) ; processing (DEFUN CREATE-DISTRIBUTION ...) ; processing (DEFUN %DELETE-DISTRIBUTION ...) ; processing (DEFGENERIC DELETE-DISTRIBUTION ...) ; processing (DEFGENERIC ENABLE ...) ; processing (DEFGENERIC DISABLE ...) ; processing (DEFGENERIC ENSURE-CNAME ...) ; processing (DEFGENERIC REMOVE-CNAME ...) ; processing (DEFGENERIC SET-COMMENT ...) ; processing (DEFUN DISTRIBUTIONS-FOR-BUCKET ...) ; processing (DEFCLASS INVALIDATION ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFBINDER INVALIDATION-BATCH ...) ; processing (DEFBINDER INVALIDATION ...) ; processing (DEFMETHOD MERGE-BINDINGS ...) ; processing (DEFGENERIC DISTRIBUTION-ID ...) ; processing (DEFUN INVALIDATION-REQUEST ...) ; processing (DEFUN INVALIDATION-BATCH-DOCUMENT ...) ; processing (DEFUN INVALIDATE-PATHS ...) ; processing (DEFMETHOD REFRESH ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/zs3/cloudfront-tmp29JNO94I.fasl ; compilation finished in 0:00:02.271 ; compiling file "/usr/share/common-lisp/source/zs3/lifecycle.lisp" (written 24 DEC 2017 11:53:51 AM): ; processing (IN-PACKAGE #:ZS3) ; processing (DEFBINDER LIFECYCLE-CONFIGURATION ...) ; processing (DEFCLASS LIFECYCLE-RULE ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFMETHOD DISABLE ...) ; processing (DEFMETHOD ENABLE ...) ; processing (DEFUN LIFECYCLE-RULE ...) ; processing (DEFUN LIFECYCLE-DOCUMENT ...) ; processing (DEFUN BINDINGS-LIFECYCLE-RULES ...) ; processing (DEFINE-SPECIFIC-ERROR (NO-SUCH-LIFECYCLE-CONFIGURATION "NoSuchLifecycleConfiguration") ...) ; processing (DEFUN BUCKET-LIFECYCLE ...) ; processing (DEFUN DELETE-BUCKET-LIFECYCLE ...) ; processing (DEFUN (SETF BUCKET-LIFECYCLE) ...) ; processing (DEFUN RESTORE-REQUEST-DOCUMENT ...) ; processing (DEFUN RESTORE-OBJECT ...) ; processing (DEFUN OBJECT-RESTORATION-STATUS ...) ; processing (DEFINE-SPECIFIC-ERROR (RESTORE-ALREADY-IN-PROGRESS "RestoreAlreadyInProgress") ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/zs3/lifecycle-tmp9HJS3WPK.fasl ; compilation finished in 0:00:01.383 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/params.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (DEFPACKAGE #:PGLOADER.PARAMS ...) ; processing (IN-PACKAGE :PGLOADER.PARAMS) ; processing (DEFPARAMETER *RELEASE* ...) ; processing (DEFPARAMETER *MAJOR-VERSION* ...) ; processing (DEFPARAMETER *MINOR-VERSION* ...) ; processing (DEFUN GIT-HASH ...) ; processing (DEFPARAMETER *VERSION-STRING* ...) ; processing (DEFVAR *SELF-UPGRADE-IMMUTABLE-SYSTEMS* ...) ; processing (DEFUN GETENV-DEFAULT ...) ; processing (DEFPARAMETER *DRY-RUN* ...) ; processing (DEFPARAMETER *ON-ERROR-STOP* ...) ; processing (DEFINE-CONDITION ON-ERROR-STOP ...) ; processing (DEFPARAMETER *FD-PATH-ROOT* ...) ; processing (DEFPARAMETER *ROOT-DIR* ...) ; processing (DEFPARAMETER *LOG-FILENAME* ...) ; processing (DEFPARAMETER *SUMMARY-PATHNAME* ...) ; processing (DEFPARAMETER *CLIENT-MIN-MESSAGES* ...) ; processing (DEFPARAMETER *LOG-MIN-MESSAGES* ...) ; processing (DEFPARAMETER *REPORT-STREAM* ...) ; processing (DEFVAR *PGSQL-RESERVED-KEYWORDS* ...) ; processing (DEFPARAMETER *IDENTIFIER-CASE* ...) ; processing (DEFPARAMETER *PRESERVE-INDEX-NAMES* ...) ; processing (DEFPARAMETER *COPY-BATCH-ROWS* ...) ; processing (DEFPARAMETER *COPY-BATCH-SIZE* ...) ; processing (DEFPARAMETER *PREFETCH-ROWS* ...) ; processing (DEFPARAMETER *ROWS-PER-RANGE* ...) ; processing (DEFPARAMETER *PG-SETTINGS* ...) ; processing (DEFPARAMETER *MYSQL-SETTINGS* ...) ; processing (DEFPARAMETER *MSSQL-SETTINGS* ...) ; processing (DEFPARAMETER *DEFAULT-TMPDIR* ...) ; processing (DEFUN INIT-PARAMS-FROM-ENVIRONMENT ...) ; processing (DEFVAR *CONTEXT* ...) ; processing (DEFPARAMETER +OS-CODE-SUCCESS+ ...) ; processing (DEFPARAMETER +OS-CODE-ERROR+ ...) ; processing (DEFPARAMETER +OS-CODE-ERROR-USAGE+ ...) ; processing (DEFPARAMETER +OS-CODE-ERROR-BAD-SOURCE+ ...) ; processing (DEFPARAMETER +OS-CODE-ERROR-REGRESS+ ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/params-tmp6OWTJDXT.fasl ; compilation finished in 0:00:00.263 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/package.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (DEFUN EXPORT-INHERITED-SYMBOLS ...) ; processing (DEFPACKAGE #:PGLOADER.TRANSFORMS ...) ; processing (DEFPACKAGE #:PGLOADER.LOGS ...) ; processing (DEFPACKAGE #:PGLOADER.QUOTING ...) ; processing (DEFPACKAGE #:PGLOADER.CATALOG ...) ; processing (DEFPACKAGE #:PGLOADER.STATE ...) ; processing (DEFPACKAGE #:PGLOADER.MONITOR ...) ; processing (DEFPACKAGE #:PGLOADER.QUERIES ...) ; processing (DEFPACKAGE #:PGLOADER.CITUS ...) ; processing (DEFPACKAGE #:PGLOADER.UTILS ...) ; processing (EXPORT-INHERITED-SYMBOLS "pgloader.queries" ...) ; processing (EXPORT-INHERITED-SYMBOLS "pgloader.quoting" ...) ; processing (EXPORT-INHERITED-SYMBOLS "pgloader.catalog" ...) ; processing (EXPORT-INHERITED-SYMBOLS "pgloader.monitor" ...) ; processing (EXPORT-INHERITED-SYMBOLS "pgloader.state" ...) ; processing (EXPORT-INHERITED-SYMBOLS "pgloader.citus" ...) ; processing (DEFPACKAGE #:PGLOADER.ARCHIVE ...) ; processing (DEFPACKAGE #:PGLOADER.PARSE-DATE ...) ; processing (DEFPACKAGE #:PGLOADER.CONNECTION ...) ; processing (DEFPACKAGE #:PGLOADER.PGSQL ...) ; processing (DEFPACKAGE #:PGLOADER.SOURCES ...) ; processing (DEFPACKAGE #:PGLOADER.PGCOPY ...) ; processing (DEFPACKAGE #:PGLOADER.LOAD ...) ; processing (DEFPACKAGE #:PGLOADER.INI ...) ; processing (DEFPACKAGE #:PGLOADER.SQL ...) ; processing (DEFPACKAGE #:PGLOADER.SOURCE.CSV ...) ; processing (DEFPACKAGE #:PGLOADER.SOURCE.FIXED ...) ; processing (DEFPACKAGE #:PGLOADER.SOURCE.COPY ...) ; processing (DEFPACKAGE #:PGLOADER.SOURCE.IXF ...) ; processing (DEFPACKAGE #:PGLOADER.SOURCE.DB3 ...) ; processing (DEFPACKAGE #:PGLOADER.SOURCE.MYSQL ...) ; processing (DEFPACKAGE #:PGLOADER.SOURCE.PGSQL ...) ; processing (DEFPACKAGE #:PGLOADER.SOURCE.SQLITE ...) ; processing (DEFPACKAGE #:PGLOADER.SOURCE.MSSQL ...) ; processing (DEFPACKAGE #:PGLOADER.SOURCE.MSSQL.INDEX-FILTER ...) ; processing (DEFPACKAGE #:PGLOADER.SYSLOG ...) ; processing (DEFPACKAGE #:PGLOADER.PARSER ...) ; processing (DEFPACKAGE #:PGLOADER ...) ; processing (IN-PACKAGE #:PGLOADER) ; processing (LOOP FOR ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/package-tmpERQILLDF.fasl ; compilation finished in 0:00:00.435 WARNING: PGLOADER.UTILS also exports the following symbols: (PGLOADER.CATALOG:ADD-COLUMN PGLOADER.CATALOG:TABLE-INDEX-LIST PGLOADER.STATE:REPORT-PGTABLE-STATS PGLOADER.CATALOG:MATVIEW-DEFINITION PGLOADER.CATALOG:STRING-MATCH-RULE PGLOADER.STATE:PGSTATE-TABLES PGLOADER.CATALOG:ADD-INDEX PGLOADER.CATALOG:FKEY-DELETE-RULE PGLOADER.CATALOG:COUNT-FKEYS PGLOADER.STATE:STATE-POSTLOAD PGLOADER.CATALOG:ADD-EXTENSION PGLOADER.QUERIES:SQL-URL-FOR-VARIANT PGLOADER.CATALOG:FKEY-MATCH-RULE PGLOADER.CATALOG:REGEX-MATCH-RULE PGLOADER.CATALOG:FIND-INDEX PGLOADER.STATE:PGTABLE-REJECT-DATA PGLOADER.STATE:REPORT-PGSTATE-STATS PGLOADER.CATALOG:SCHEMA PGLOADER.STATE:PGTABLE-REJECT-LOGS PGLOADER.CATALOG:COLUMN-TYPE-MOD PGLOADER.CITUS:CITUS-REFERENCE-RULE-P PGLOADER.CATALOG:FORMAT-DROP-SQL PGLOADER.CATALOG:FKEY-FOREIGN-COLUMNS PGLOADER.STATE:REPORT-SUMMARY PGLOADER.CATALOG:FKEY-DEFERRABLE PGLOADER.CATALOG:MATVIEW-NAME PGLOADER.QUERIES:SQL PGLOADER.STATE:PGSTATE-READ PGLOADER.CATALOG:TABLE-FKEY-LIST PGLOADER.CATALOG:MAKE-FKEY PGLOADER.CATALOG:EXTENSION-NAME PGLOADER.CATALOG:FIELD-NAME PGLOADER.CATALOG:FKEY-CONDEF PGLOADER.MONITOR:WITH-STATS-COLLECTION PGLOADER.CATALOG:INDEX-CONNAME PGLOADER.MONITOR:PROCESS-BAD-ROW PGLOADER.CATALOG:TABLE PGLOADER.CATALOG:MAYBE-ADD-TABLE PGLOADER.CATALOG:COLUMN-TRANSFORM-DEFAULT PGLOADER.CATALOG:TABLE-CITUS-RULE PGLOADER.CATALOG:FIND-EXTENSION PGLOADER.CATALOG:INDEX-COLUMNS PGLOADER.CATALOG:FIND-FKEY PGLOADER.CATALOG:INDEX-SCHEMA PGLOADER.CATALOG:MAYBE-ADD-FKEY PGLOADER.CATALOG:SCHEMA-TABLE-LIST PGLOADER.MONITOR:START-MONITOR PGLOADER.CATALOG:MAKE-REGEX-MATCH-RULE PGLOADER.CATALOG:CITUS-DISTRIBUTED-RULE-USING PGLOADER.CITUS:CITUS-DISTRIBUTE-SCHEMA PGLOADER.CATALOG:COLUMN-NULLABLE PGLOADER.CATALOG:TABLE-TRIGGER-LIST PGLOADER.CITUS:CITUS-REFERENCE-RULE-TABLE PGLOADER.CATALOG:PROCEDURE PGLOADER.STATE:PGSTATE-SETF PGLOADER.CATALOG:CITUS-REFERENCE-RULE PGLOADER.CATALOG:MAKE-PROCEDURE PGLOADER.CATALOG:MAKE-CATALOG PGLOADER.CATALOG:CITUS-REFERENCE-RULE-RULE PGLOADER.CATALOG:ADD-FKEY PGLOADER.CATALOG:MATCH-RULE-SCHEMA PGLOADER.STATE:PGTABLE-SECS PGLOADER.MONITOR:FLUSH-SUMMARY PGLOADER.STATE:REPORT-TABLE-NAME PGLOADER.CATALOG:MAKE-STRING-MATCH-RULE PGLOADER.CATALOG:INDEX-NAME PGLOADER.CATALOG:MATCH-RULE-RULE PGLOADER.CATALOG:SCHEMA-EXTENSION-LIST PGLOADER.CATALOG:CITUS-BACKFILL-TABLE-P PGLOADER.CATALOG:FKEY-COLUMNS PGLOADER.CATALOG:CATALOG-NAME PGLOADER.CATALOG:CATALOG-DISTRIBUTION-RULES PGLOADER.CATALOG:FKEY-UPDATE-RULE PGLOADER.MONITOR:NEW-LABEL PGLOADER.MONITOR:UPDATE-STATS PGLOADER.CATALOG:PROCEDURE-NAME PGLOADER.STATE:REPORT-FOOTER PGLOADER.CATALOG:PUSH-TO-END PGLOADER.CATALOG:ALTER-TABLE PGLOADER.CATALOG:INDEX PGLOADER.CATALOG:COUNT-VIEWS PGLOADER.STATE:PGSTATE-DECF PGLOADER.CATALOG:SCHEMA-IN-SEARCH-PATH PGLOADER.STATE:STATE-SECS PGLOADER.MONITOR:SEND-EVENT PGLOADER.CATALOG:CATALOG PGLOADER.STATE:PGSTATE-ROWS PGLOADER.CATALOG:INDEX-SQL PGLOADER.CATALOG:MATVIEW PGLOADER.CATALOG:CREATE-TABLE PGLOADER.CATALOG:MAKE-MATVIEW PGLOADER.CATALOG:TABLE-OID PGLOADER.MONITOR:STOP-MONITOR PGLOADER.CATALOG:SQLTYPE-NAME PGLOADER.CATALOG:WITH-SCHEMA PGLOADER.STATE:REPORT-HEADER PGLOADER.CATALOG:CATALOG-TYPES-WITHOUT-BTREE PGLOADER.STATE:PGSTATE-INCF PGLOADER.MONITOR:ELAPSED-TIME-SINCE PGLOADER.CATALOG:FKEY PGLOADER.STATE:CREATE-STATE PGLOADER.CATALOG:MAYBE-ADD-INDEX PGLOADER.CATALOG:MAKE-CITUS-REFERENCE-RULE PGLOADER.CATALOG:CITUS-DISTRIBUTED-RULE-TABLE PGLOADER.CATALOG:INDEX-TABLE PGLOADER.CATALOG:TRIGGER-ACTION PGLOADER.CATALOG:MAYBE-ADD-EXTENSION PGLOADER.CATALOG:COUNT-INDEXES PGLOADER.CATALOG:REGEX-MATCH-RULE-TARGET PGLOADER.CATALOG:ADD-TABLE PGLOADER.CATALOG:ADD-VIEW PGLOADER.STATE:MAKE-STATE PGLOADER.CATALOG:FKEY-NAME PGLOADER.CATALOG:PROCEDURE-RETURNS PGLOADER.STATE:PGTABLE-STOP PGLOADER.CATALOG:TABLE-NAME PGLOADER.CATALOG:MATCH-RULE-ACTION PGLOADER.CATALOG:ADD-SQLTYPE PGLOADER.CITUS:CITUS-RULE-IS-MISSING-FROM-LIST PGLOADER.CATALOG:COLUMN-TRANSFORM PGLOADER.STATE:PGTABLE-START PGLOADER.CATALOG:COLUMN-COMMENT PGLOADER.CATALOG:TRIGGER PGLOADER.CATALOG:SCHEMA-VIEW-LIST PGLOADER.STATE:PGTABLE-BYTES PGLOADER.CATALOG:COLUMN-TYPE-NAME PGLOADER.CATALOG:MAYBE-ADD-VIEW PGLOADER.CATALOG:MAKE-TABLE PGLOADER.MONITOR:MONITOR-ERROR PGLOADER.CATALOG:TABLE-TABLESPACE PGLOADER.CATALOG:ADD-FIELD PGLOADER.CATALOG:FKEY-FOREIGN-TABLE PGLOADER.CATALOG:PROCEDURE-SCHEMA PGLOADER.MONITOR:TIMING PGLOADER.MONITOR:WITH-MONITOR PGLOADER.CATALOG:SQLTYPE-LIST PGLOADER.CATALOG:COUNT-TABLES PGLOADER.CATALOG:MAKE-COLUMN PGLOADER.CATALOG:INDEX-TYPE PGLOADER.CATALOG:CITUS-DISTRIBUTED-RULE PGLOADER.STATE:PGTABLE-ROWS PGLOADER.CITUS:CITUS-DISTRIBUTED-RULE-P PGLOADER.CATALOG:MATCH-RULE PGLOADER.QUERIES:*QUERIES* PGLOADER.STATE:REPORT-RESULTS PGLOADER.CATALOG:TABLE-SCHEMA PGLOADER.QUOTING:QUOTED-P PGLOADER.CATALOG:SQLTYPE PGLOADER.STATE:PGSTATE-NEW-LABEL PGLOADER.STATE:PGSTATE-SECS PGLOADER.CATALOG:MAKE-INDEX PGLOADER.CATALOG:INDEX-PRIMARY PGLOADER.CATALOG:SQLTYPE-SOURCE-DEF PGLOADER.CATALOG:INDEX-OID PGLOADER.CITUS:CITUS-RULE-TABLE-NOT-FOUND PGLOADER.CATALOG:ADD-SCHEMA PGLOADER.CATALOG:EXTENSION-SCHEMA PGLOADER.STATE:STATE-DATA PGLOADER.STATE:PGSTATE-TABNAMES PGLOADER.CATALOG:FKEY-TABLE PGLOADER.CATALOG:FKEY-INITIALLY-DEFERRED PGLOADER.CATALOG:SQLTYPE-TYPE PGLOADER.CATALOG:INDEX-FILTER PGLOADER.CATALOG:FKEY-OID PGLOADER.CATALOG:TABLE-COLUMN-LIST PGLOADER.CATALOG:SCHEMA-SQLTYPE-LIST PGLOADER.CATALOG:TRIGGER-PROCEDURE PGLOADER.STATE:MAKE-PGSTATE PGLOADER.CATALOG:SCHEMA-SOURCE-NAME PGLOADER.CATALOG:MATCH-RULE-ARGS PGLOADER.MONITOR:LOG-MESSAGE PGLOADER.CATALOG:FIND-VIEW PGLOADER.CATALOG:MAKE-SQLTYPE PGLOADER.CATALOG:VIEW-LIST PGLOADER.CATALOG:FORMAT-TABLE-NAME PGLOADER.CATALOG:TABLE-STORAGE-PARAMETER-LIST PGLOADER.CATALOG:SCHEMA-CATALOG PGLOADER.CATALOG:EXTENSION-LIST PGLOADER.STATE:GET-STATE-SECTION PGLOADER.CATALOG:TRIGGER-P PGLOADER.CATALOG:EXTENSION PGLOADER.CATALOG:TABLE-SOURCE-NAME PGLOADER.CATALOG:SQLTYPE-EXTENSION PGLOADER.CATALOG:SCHEMA-NAME PGLOADER.CATALOG:MAX-INDEXES-PER-TABLE PGLOADER.MONITOR:*MONITORING-KERNEL* PGLOADER.CATALOG:CITUS-FORMAT-SQL-SELECT PGLOADER.CATALOG:INDEX-FK-DEPS PGLOADER.CATALOG:ALTER-SCHEMA PGLOADER.QUOTING:ENSURE-QUOTED PGLOADER.CATALOG:MAYBE-ADD-SCHEMA PGLOADER.CATALOG:INDEX-CONDEF PGLOADER.QUOTING:BUILD-IDENTIFIER PGLOADER.CATALOG:TABLE-COMMENT PGLOADER.CATALOG:CAST PGLOADER.STATE:PGTABLE-INITIALIZE-REJECT-FILES PGLOADER.STATE:STATE-PRELOAD PGLOADER.CATALOG:TABLE-FIELD-LIST PGLOADER.CATALOG:CATALOG-SCHEMA-LIST PGLOADER.CATALOG:FORMAT-DEFAULT-VALUE PGLOADER.CATALOG:INDEX-UNIQUE PGLOADER.STATE:REPORT-FULL-SUMMARY PGLOADER.CATALOG:COLUMN-NAME PGLOADER.CATALOG:MAKE-SCHEMA PGLOADER.CATALOG:MAKE-TRIGGER PGLOADER.STATE:PGSTATE-ERRS PGLOADER.CATALOG:CITUS-DISTRIBUTED-RULE-FROM PGLOADER.CATALOG:SQLTYPE-SCHEMA PGLOADER.QUOTING:ENSURE-UNQUOTED PGLOADER.CATALOG:FIND-TABLE PGLOADER.CATALOG:PROCEDURE-LANGUAGE PGLOADER.CATALOG:MAKE-MATCH-RULE PGLOADER.CATALOG:SQLTYPE-EXTRA PGLOADER.CATALOG:PROCEDURE-BODY PGLOADER.CATALOG:STRING-MATCH-RULE-TARGET PGLOADER.CATALOG:FORMAT-CREATE-SQL PGLOADER.CATALOG:MAKE-CITUS-DISTRIBUTED-RULE PGLOADER.CATALOG:TRIGGER-TABLE PGLOADER.STATE:PGSTATE-GET-LABEL PGLOADER.MONITOR:*MONITORING-QUEUE* PGLOADER.CATALOG:TRIGGER-NAME PGLOADER.CATALOG:COLUMN-DEFAULT PGLOADER.CATALOG:MATCHES PGLOADER.CATALOG:FIND-SCHEMA PGLOADER.CATALOG:TABLE-LIST PGLOADER.CATALOG:MATVIEW-SOURCE-NAME PGLOADER.QUOTING:APPLY-IDENTIFIER-CASE PGLOADER.CATALOG:COLUMN-EXTRA PGLOADER.CATALOG:COLUMN PGLOADER.CATALOG:MATVIEW-SCHEMA) See also: The ANSI Standard, Macro DEFPACKAGE The SBCL Manual, Variable *ON-PACKAGE-VARIANCE* ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/monkey/bind.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:METABANG.BIND) ; processing (DEFUN VAR-IGNORABLE-P ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/monkey/bind-tmpYZQK9040.fasl ; compilation finished in 0:00:00.051 WARNING: redefining METABANG.BIND::VAR-IGNORABLE-P in DEFUN ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/monkey/mssql.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :MSSQL) ; processing (DEFCENUM %SYB-VALUE-TYPE ...) ; processing (DEFUN UNSIGNED-TO-SIGNED ...) ; processing (DEFUN SYSDB-DATA-TO-LISP ...) ; processing (DEFUN MAP-QUERY-RESULTS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/monkey/mssql-tmpMV6W92GO.fasl ; compilation finished in 0:00:00.883 WARNING: redefining MSSQL::SYSDB-DATA-TO-LISP in DEFUN ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/utils/charsets.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.UTILS) ; processing (DEFPARAMETER *CCL-DESCRIBE-CHARACTER-ENCODINGS* ...) ; processing (DEFUN PARSE-CCL-ENCODINGS-DESC-FIRST-LINE ...) ; processing (DEFUN PARSE-CCL-ENCODINGS-DESC ...) ; processing (DEFUN LIST-ENCODINGS-AND-ALIASES ...) ; processing (DEFUN SHOW-ENCODINGS ...) ; processing (DEFUN MAKE-EXTERNAL-FORMAT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/utils/charsets-tmp886ACX8P.fasl ; compilation finished in 0:00:00.463 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/utils/logs.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.LOGS) ; processing (DEFCATEGORY :PANIC) ; processing (DEFCATEGORY :FATAL ...) ; processing (DEFCATEGORY :LOG ...) ; processing (DEFCATEGORY :ERROR ...) ; processing (DEFCATEGORY :WARNING ...) ; processing (DEFCATEGORY :NOTICE ...) ; processing (DEFCATEGORY :SQL ...) ; processing (DEFCATEGORY :INFO ...) ; processing (DEFCATEGORY :DEBUG ...) ; processing (DEFCATEGORY :DATA ...) ; processing (DEFVAR *LOG-MESSENGERS* ...) ; processing (DEFUN START-LOGGER ...) ; processing (DEFUN STOP-LOGGER ...) ; processing (DEFCONSTANT +NSEC+ ...) ; processing (DEFUN FRACTION-TO-NSECS ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/utils/logs-tmp34OPD42E.fasl ; compilation finished in 0:00:00.283 WARNING: redefining PRINT-OBJECT (# #) in DEFMETHOD ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/utils/utils.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.UTILS) ; processing (DEFUN UNQUOTE ...) ; processing (DEFUN EXPAND-USER-HOMEDIR-PATHNAME ...) ; processing (DEFUN PRETTY-PRINT-BYTES ...) ; processing (DEFUN SPLIT-RANGE ...) ; processing (DEFUN DISTRIBUTE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/utils/utils-tmpG6RL7DFQ.fasl ; compilation finished in 0:00:00.547 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/utils/state.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.STATE) ; processing (DEFSTRUCT PGTABLE ...) ; processing (DEFSTRUCT PGSTATE ...) ; processing (DEFSTRUCT STATE ...) ; processing (DEFUN CREATE-STATE ...) ; processing (DEFUN GET-STATE-SECTION ...) ; processing (DEFUN RELATIVE-PATHNAME ...) ; processing (DEFUN REJECT-DATA-FILE ...) ; processing (DEFUN REJECT-LOG-FILE ...) ; processing (DEFMETHOD PGTABLE-INITIALIZE-REJECT-FILES ...) ; file: /build/reproducible-path/pgloader-3.6.2/src/utils/state.lisp ; in: DEFMETHOD PGTABLE-INITIALIZE-REJECT-FILES (PGTABLE T) ; (WITH-OPEN-FILE ; (PGLOADER.STATE::DATA PGLOADER.STATE::DATA-PATHNAME :DIRECTION :OUTPUT ; :IF-EXISTS :RENAME :IF-DOES-NOT-EXIST NIL) ; (DECLARE (IGNORE PGLOADER.STATE::DATA))) ; --> LET UNWIND-PROTECT FLET #:CLEANUP-FUN-6 BLOCK WHEN IF ; ==> ; PGLOADER.STATE::DATA ; ; caught STYLE-WARNING: ; reading an ignored variable: DATA ; --> LET UNWIND-PROTECT FLET #:CLEANUP-FUN-6 BLOCK WHEN IF CLOSE ; ==> ; PGLOADER.STATE::DATA ; ; caught STYLE-WARNING: ; reading an ignored variable: DATA ; (WITH-OPEN-FILE ; (PGLOADER.STATE::LOGS PGLOADER.STATE::LOGS-PATHNAME :DIRECTION :OUTPUT ; :IF-EXISTS :RENAME :IF-DOES-NOT-EXIST NIL) ; (DECLARE (IGNORE PGLOADER.STATE::LOGS))) ; --> LET UNWIND-PROTECT FLET #:CLEANUP-FUN-10 BLOCK WHEN IF ; ==> ; PGLOADER.STATE::LOGS ; ; caught STYLE-WARNING: ; reading an ignored variable: LOGS ; --> LET UNWIND-PROTECT FLET #:CLEANUP-FUN-10 BLOCK WHEN IF CLOSE ; ==> ; PGLOADER.STATE::LOGS ; ; caught STYLE-WARNING: ; reading an ignored variable: LOGS ; processing (DEFUN PGSTATE-GET-LABEL ...) ; processing (DEFUN PGSTATE-NEW-LABEL ...) ; processing (DEFUN PGSTATE-SETF ...) ; processing (DEFUN PGSTATE-INCF ...) ; processing (DEFUN PGSTATE-DECF ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/utils/state-tmp523HMA4J.fasl ; compilation finished in 0:00:03.115 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/utils/transforms.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.TRANSFORMS) ; processing (DEFPACKAGE #:PGLOADER.USER-SYMBOLS ...) ; processing (DEFUN INTERN-SYMBOL ...) ; processing (DEFUN PARSE-COLUMN-TYPEMOD ...) ; processing (DEFUN TYPEMOD-EXPR-MATCHES-P ...) ; processing (DEFUN TYPEMOD-EXPR-TO-FUNCTION ...) ; processing (DECLAIM (INLINE INTERN-SYMBOL ...)) ; processing (DEFUN ZERO-DATES-TO-NULL ...) ; processing (DEFUN DATE-WITH-NO-SEPARATOR ...) ; processing (DEFUN TIME-WITH-NO-SEPARATOR ...) ; processing (DEFUN TINYINT-TO-BOOLEAN ...) ; processing (DEFUN BITS-TO-BOOLEAN ...) ; processing (DEFUN BITS-TO-HEX-BITSTRING ...) ; processing (DEFUN INT-TO-IP ...) ; processing (DEFUN IP-RANGE ...) ; processing (DEFUN CONVERT-MYSQL-POINT ...) ; processing (DEFUN CONVERT-MYSQL-LINESTRING ...) ; processing (DEFUN INTEGER-TO-STRING ...) ; processing (DEFUN FLOAT-TO-STRING ...) ; processing (DEFUN SET-TO-ENUM-ARRAY ...) ; processing (DEFUN EMPTY-STRING-TO-NULL ...) ; processing (DEFUN RIGHT-TRIM ...) ; processing (DEFUN REMOVE-NULL-CHARACTERS ...) ; processing (DEFUN BYTE-VECTOR-TO-BYTEA ...) ; processing (DEFUN ENSURE-PARSE-INTEGER ...) ; processing (DEFUN SQLITE-TIMESTAMP-TO-TIMESTAMP ...) ; processing (DEFMACRO ARR-TO-BYTES-REV ...) ; processing (DEFUN SQL-SERVER-UNIQUEIDENTIFIER-TO-UUID ...) ; processing (DEFUN UNIX-TIMESTAMP-TO-TIMESTAMPTZ ...) ; processing (DEFUN SQL-SERVER-BIT-TO-BOOLEAN ...) ; processing (DEFUN BYTE-VECTOR-TO-HEXSTRING ...) ; processing (DEFUN VARBINARY-TO-STRING ...) ; processing (DEFUN BASE64-DECODE ...) ; processing (DEFUN HEX-TO-DEC ...) ; processing (DEFUN LOGICAL-TO-BOOLEAN ...) ; processing (DEFUN DB3-TRIM-STRING ...) ; processing (DEFUN DB3-NUMERIC-TO-PGSQL-NUMERIC ...) ; processing (DEFUN DB3-NUMERIC-TO-PGSQL-INTEGER ...) ; processing (DEFUN DB3-DATE-TO-PGSQL-DATE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/utils/transforms-tmp7QUN41F9.fasl ; compilation finished in 0:00:04.519 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/utils/read-sql-files.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.SQL) ; processing (DEFSTRUCT PARSER ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFMETHOD PUSH-NEW-TAG ...) ; processing (DEFMETHOD EXTEND-CURRENT-TAG ...) ; processing (DEFMETHOD FORMAT-CURRENT-TAG ...) ; processing (DEFMETHOD MAYBE-CLOSE-TAGS ...) ; processing (DEFMETHOD POP-CURRENT-TAG ...) ; processing (DEFMETHOD RESET-STATE ...) ; processing (DEFUN PARSE-QUERY ...) ; processing (DEFUN READ-LINES ...) ; processing (DEFUN READ-QUERIES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/utils/read-sql-files-tmp6435NPRK.fasl ; compilation finished in 0:00:01.059 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/utils/queries.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.QUERIES) ; processing (DEFPARAMETER *SRC* ...) ; processing (DEFUN LOAD-STATIC-FILE ...) ; processing (DEFUN PATHNAME-TO-URL ...) ; processing (DEFUN LOAD-STATIC-DIRECTORY ...) ; processing (DEFUN WALK-SOURCES-AND-BUILD-FS ...) ; processing (DEFPARAMETER *FS* ...) ; processing (DEFUN SQL ...) ; processing (DEFUN SQL-URL-FOR-VARIANT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/utils/queries-tmpHHG39W7F.fasl ; compilation finished in 0:00:00.275 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/utils/quoting.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.QUOTING) ; processing (DEFUN APPLY-IDENTIFIER-CASE ...) ; processing (DEFUN QUOTED-P ...) ; processing (DEFUN ENSURE-UNQUOTED ...) ; processing (DEFUN ENSURE-QUOTED ...) ; processing (DEFUN BUILD-IDENTIFIER ...) ; processing (DEFUN CAMELCASE-TO-COLNAME ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/utils/quoting-tmpIV07R04M.fasl ; compilation finished in 0:00:00.363 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/utils/catalog.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.CATALOG) ; processing (DEFMACRO PUSH-TO-END ...) ; processing (DEFGENERIC FORMAT-CREATE-SQL ...) ; processing (DEFGENERIC FORMAT-DROP-SQL ...) ; processing (DEFGENERIC FORMAT-DEFAULT-VALUE ...) ; processing (DEFSTRUCT CATALOG ...) ; processing (DEFSTRUCT SCHEMA ...) ; processing (DEFSTRUCT TABLE ...) ; file: /build/reproducible-path/pgloader-3.6.2/src/utils/catalog.lisp ; in: DEFSTRUCT TABLE ; (DEFSTRUCT PGLOADER.CATALOG:TABLE ; PGLOADER.CATALOG::SOURCE-NAME ; PGLOADER.CATALOG::NAME ; PGLOADER.CATALOG:SCHEMA ; PGLOADER.CATALOG::OID ; PGLOADER.CATALOG::COMMENT ; PGLOADER.CATALOG::STORAGE-PARAMETER-LIST ; PGLOADER.CATALOG::TABLESPACE ; PGLOADER.CATALOG::FIELD-LIST ; PGLOADER.CATALOG::COLUMN-LIST ; PGLOADER.CATALOG::INDEX-LIST ; ...) ; --> PROGN EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '# ; '#(# ; #)) ; ; caught STYLE-WARNING: ; Previously compiled call to PGLOADER.CATALOG:TABLE-NAME could not be inlined ; because the structure definition for PGLOADER.CATALOG:TABLE was not yet seen. ; To avoid this warning, DEFSTRUCT should precede references to the affected ; functions, or they must be declared locally notinline at each call site. ; processing (DEFSTRUCT MATVIEW ...) ; processing (DEFSTRUCT EXTENSION ...) ; processing (DEFSTRUCT SQLTYPE ...) ; processing (DEFSTRUCT COLUMN ...) ; processing (DEFSTRUCT FKEY ...) ; processing (DEFSTRUCT INDEX ...) ; processing (DEFSTRUCT TRIGGER ...) ; processing (DEFSTRUCT PROCEDURE ...) ; processing (DEFGENERIC ADD-SCHEMA ...) ; processing (DEFGENERIC ADD-EXTENSION ...) ; processing (DEFGENERIC ADD-TABLE ...) ; processing (DEFGENERIC ADD-VIEW ...) ; processing (DEFGENERIC ADD-SQLTYPE ...) ; processing (DEFGENERIC ADD-COLUMN ...) ; processing (DEFGENERIC ADD-INDEX ...) ; processing (DEFGENERIC ADD-FKEY ...) ; processing (DEFGENERIC ADD-COMMENT ...) ; processing (DEFGENERIC EXTENSION-LIST ...) ; processing (DEFGENERIC TABLE-LIST ...) ; processing (DEFGENERIC VIEW-LIST ...) ; processing (DEFGENERIC FIND-SCHEMA ...) ; processing (DEFGENERIC FIND-EXTENSION ...) ; processing (DEFGENERIC FIND-TABLE ...) ; processing (DEFGENERIC FIND-VIEW ...) ; processing (DEFGENERIC FIND-INDEX ...) ; processing (DEFGENERIC FIND-FKEY ...) ; processing (DEFGENERIC MAYBE-ADD-SCHEMA ...) ; processing (DEFGENERIC MAYBE-ADD-EXTENSION ...) ; processing (DEFGENERIC MAYBE-ADD-TABLE ...) ; processing (DEFGENERIC MAYBE-ADD-VIEW ...) ; processing (DEFGENERIC MAYBE-ADD-INDEX ...) ; processing (DEFGENERIC MAYBE-ADD-FKEY ...) ; processing (DEFGENERIC COUNT-TABLES ...) ; processing (DEFGENERIC COUNT-VIEWS ...) ; processing (DEFGENERIC COUNT-INDEXES ...) ; processing (DEFGENERIC COUNT-FKEYS ...) ; processing (DEFGENERIC MAX-INDEXES-PER-TABLE ...) ; processing (DEFGENERIC CAST ...) ; processing (DEFGENERIC FIELD-NAME ...) ; processing (DEFMETHOD EXTENSION-LIST ...) ; processing (DEFMETHOD EXTENSION-LIST ...) ; processing (DEFMETHOD SQLTYPE-LIST ...) ; processing (DEFMETHOD SQLTYPE-LIST ...) ; processing (DEFMETHOD SQLTYPE-LIST ...) ; processing (DEFMETHOD SQLTYPE-LIST ...) ; processing (DEFMETHOD TABLE-LIST ...) ; processing (DEFMETHOD TABLE-LIST ...) ; processing (DEFMETHOD VIEW-LIST ...) ; processing (DEFMETHOD VIEW-LIST ...) ; processing (DEFUN CREATE-TABLE ...) ; processing (DEFMETHOD ADD-SCHEMA ...) ; processing (DEFMETHOD ADD-EXTENSION ...) ; processing (DEFMETHOD ADD-SQLTYPE ...) ; processing (DEFMETHOD ADD-TABLE ...) ; processing (DEFMETHOD ADD-VIEW ...) ; processing (DEFMETHOD FIND-SCHEMA ...) ; processing (DEFMETHOD FIND-EXTENSION ...) ; processing (DEFMETHOD FIND-TABLE ...) ; processing (DEFMETHOD FIND-VIEW ...) ; processing (DEFMETHOD MAYBE-ADD-SCHEMA ...) ; processing (DEFMETHOD MAYBE-ADD-EXTENSION ...) ; processing (DEFMETHOD MAYBE-ADD-TABLE ...) ; processing (DEFMETHOD MAYBE-ADD-VIEW ...) ; processing (DEFMETHOD ADD-FIELD ...) ; processing (DEFMETHOD ADD-COLUMN ...) ; processing (DEFMETHOD ADD-COLUMN ...) ; processing (DEFMETHOD CAST ...) ; processing (DEFMETHOD CAST ...) ; processing (DEFMETHOD CAST ...) ; processing (DEFMETHOD FIELD-NAME ...) ; processing (DEFMETHOD ADD-INDEX ...) ; processing (DEFMETHOD FIND-INDEX ...) ; processing (DEFMETHOD MAYBE-ADD-INDEX ...) ; processing (DEFMETHOD ADD-FKEY ...) ; processing (DEFMETHOD FIND-FKEY ...) ; processing (DEFMETHOD MAYBE-ADD-FKEY ...) ; processing (DEFMETHOD COUNT-TABLES ...) ; processing (DEFMETHOD COUNT-TABLES ...) ; processing (DEFMETHOD COUNT-VIEWS ...) ; processing (DEFMETHOD COUNT-VIEWS ...) ; processing (DEFMETHOD COUNT-INDEXES ...) ; processing (DEFMETHOD COUNT-INDEXES ...) ; processing (DEFMETHOD COUNT-INDEXES ...) ; processing (DEFMETHOD COUNT-FKEYS ...) ; processing (DEFMETHOD COUNT-FKEYS ...) ; processing (DEFMETHOD COUNT-FKEYS ...) ; processing (DEFMETHOD MAX-INDEXES-PER-TABLE ...) ; processing "Count how many indexes maximum per table are listed in SCHEMA." ; processing (DEFMETHOD MAX-INDEXES-PER-TABLE ...) ; processing (DEFGENERIC FORMAT-TABLE-NAME ...) ; processing (DEFMETHOD FORMAT-TABLE-NAME ...) ; processing (DEFMACRO WITH-SCHEMA ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/utils/catalog-tmp2ANY66A8.fasl ; compilation finished in 0:00:04.959 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/utils/alter-table.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.CATALOG) ; processing (DEFSTRUCT STRING-MATCH-RULE ...) ; processing (DEFSTRUCT REGEX-MATCH-RULE ...) ; processing (DEFGENERIC MATCHES ...) ; processing (DEFSTRUCT MATCH-RULE ...) ; processing (DEFGENERIC ALTER-TABLE ...) ; processing (DEFMETHOD ALTER-TABLE ...) ; processing (DEFMETHOD ALTER-TABLE ...) ; processing (DEFMETHOD ALTER-TABLE ...) ; processing (DEFUN ALTER-TABLE-SET-SCHEMA ...) ; processing (DEFUN ALTER-TABLE-RENAME ...) ; processing (DEFUN ALTER-TABLE-SET-STORAGE-PARAMETERS ...) ; processing (DEFUN ALTER-TABLE-SET-TABLESPACE ...) ; processing (DEFGENERIC RULE-MATCHES ...) ; processing (DEFMETHOD RULE-MATCHES ...) ; processing (DEFMETHOD RULE-MATCHES ...) ; processing (DEFGENERIC ALTER-SCHEMA ...) ; processing (DEFMETHOD ALTER-SCHEMA ...) ; processing (DEFMETHOD ALTER-SCHEMA ...) ; processing (DEFUN ALTER-SCHEMA-RENAME ...) ; processing (DEFUN RESET-SQL-DEFINITIONS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/utils/alter-table-tmpX4XJNZSN.fasl ; compilation finished in 0:00:01.171 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/utils/citus.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.CITUS) ; processing (DEFSTRUCT CITUS-REFERENCE-RULE ...) ; processing (DEFSTRUCT CITUS-DISTRIBUTED-RULE ...) ; processing (DEFUN CITUS-DISTRIBUTE-SCHEMA ...) ; processing (DEFINE-CONDITION CITUS-RULE-TABLE-NOT-FOUND ...) ; processing (DEFUN CITUS-FIND-TABLE ...) ; processing (DEFGENERIC CITUS-RULE-TABLE ...) ; processing (DEFGENERIC CITUS-SET-TABLE ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFGENERIC COMPUTE-FOREIGN-RULES ...) ; processing (DEFMETHOD COMPUTE-FOREIGN-RULES ...) ; processing (DEFMETHOD COMPUTE-FOREIGN-RULES ...) ; processing (DEFUN MAKE-DISTRIBUTED-TABLE-FROM-FKEY ...) ; processing (DEFINE-CONDITION CITUS-RULE-IS-MISSING-FROM-LIST ...) ; processing (DEFGENERIC APPLY-CITUS-RULE ...) ; processing (DEFMETHOD APPLY-CITUS-RULE ...) ; processing (DEFMETHOD APPLY-CITUS-RULE ...) ; processing (DEFUN ADD-COLUMN-TO-PKEY ...) ; processing (DEFUN FORMAT-CITUS-JOIN-CLAUSE ...) ; processing (DEFUN CITUS-FORMAT-SQL-SELECT ...) ; processing (DEFUN CITUS-BACKFILL-TABLE-P ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/utils/citus-tmp349SZV56.fasl ; compilation finished in 0:00:02.111 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/utils/reject.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.MONITOR) ; processing (DEFUN %PROCESS-BAD-ROW ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/utils/reject-tmpIFTUZKCX.fasl ; compilation finished in 0:00:00.107 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/utils/pretty-print-state.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.STATE) ; processing (DEFSTRUCT PRINT-FORMAT) ; processing (DEFSTRUCT (PRINT-FORMAT-HUMAN-READABLE # ...) ...) ; processing (DEFSTRUCT (PRINT-FORMAT-TEXT #)) ; processing (DEFSTRUCT (PRINT-FORMAT-VERBOSE #)) ; processing (DEFSTRUCT (PRINT-FORMAT-TAB #)) ; processing (DEFSTRUCT (PRINT-FORMAT-CSV #)) ; processing (DEFSTRUCT (PRINT-FORMAT-COPY #)) ; processing (DEFSTRUCT (PRINT-FORMAT-JSON #)) ; processing (DEFGENERIC PRETTY-PRINT ...) ; processing (DEFMETHOD PRETTY-PRINT ...) ; processing (DEFMETHOD PRETTY-PRINT ...) ; processing (DEFMETHOD PRETTY-PRINT ...) ; processing (DEFMETHOD PRETTY-PRINT ...) ; processing (DEFMETHOD PRETTY-PRINT ...) ; processing (DEFMETHOD PRETTY-PRINT ...) ; processing (DEFMETHOD PRETTY-PRINT ...) ; processing (DEFMETHOD PRETTY-PRINT ...) ; processing (DEFMETHOD PRETTY-PRINT ...) ; processing (DEFMETHOD PRETTY-PRINT ...) ; processing (DEFMETHOD PRETTY-PRINT ...) ; processing (DEFUN FORMAT-INTERVAL-GUESS ...) ; processing (DEFMACRO DEFINE-YASON-ENCODER ...) ; processing (DEFINE-YASON-ENCODER #) ; processing (DEFINE-YASON-ENCODER #) ; processing (DEFMETHOD YASON:ENCODE ...) ; processing (DEFMETHOD YASON:ENCODE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/utils/pretty-print-state-tmpJ3BP3DY8.fasl ; compilation finished in 0:00:03.947 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/utils/report.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.STATE) ; processing (DEFUN FORMAT-INTERVAL ...) ; processing (DEFUN PARSE-SUMMARY-TYPE ...) ; processing (DEFUN MAX-LENGTH-TABLE-NAME ...) ; processing (DEFUN REPORT-FULL-SUMMARY ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/utils/report-tmp9NC1M3HR.fasl ; compilation finished in 0:00:00.619 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/utils/monitor.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.MONITOR) ; processing (DEFVAR *MONITORING-KERNEL* ...) ; processing (DEFVAR *MONITORING-QUEUE* ...) ; processing (DEFVAR *MONITORING-CHANNEL* ...) ; processing (DEFVAR *SECTIONS* ...) ; processing (DEFSTRUCT START ...) ; processing (DEFSTRUCT STOP ...) ; processing (DEFSTRUCT REPORT-SUMMARY ...) ; processing (DEFSTRUCT LOG-MESSAGE ...) ; processing (DEFSTRUCT NEW-LABEL ...) ; processing (DEFSTRUCT UPDATE-STATS ...) ; processing (DEFSTRUCT BAD-ROW ...) ; processing (DEFINE-CONDITION MONITOR-ERROR ...) ; processing (DEFMACRO LOG-MESSAGE ...) ; processing (DEFUN SEND-LOG-MESSAGE ...) ; processing (DEFUN NEW-LABEL ...) ; processing (DEFUN UPDATE-STATS ...) ; processing (DEFUN PROCESS-BAD-ROW ...) ; processing (DEFUN FLUSH-SUMMARY ...) ; processing (DEFMACRO WITH-STATS-COLLECTION ...) ; processing (DEFUN SEND-EVENT ...) ; processing (DEFUN START-MONITOR ...) ; processing (DEFUN STOP-MONITOR ...) ; processing (DEFUN CALL-WITH-MONITOR ...) ; processing (DEFMACRO WITH-MONITOR ...) ; processing (DEFUN MONITOR ...) ; processing (DEFUN PROCESS-UPDATE-STATS-START-EVENT ...) ; processing (DEFUN PROCESS-UPDATE-STATS-STOP-EVENT ...) ; processing (DEFUN MAYBE-LOG-PROGRESS-MESSAGE ...) ; processing (DEFUN REPORT-CURRENT-SUMMARY ...) ; processing (DEFUN ELAPSED-TIME-SINCE ...) ; processing (DEFMACRO TIMING ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/utils/monitor-tmpCQV7SEDP.fasl ; compilation finished in 0:00:03.571 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/utils/threads.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.UTILS) ; processing (DEFUN MAKE-KERNEL ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/utils/threads-tmpOD15IJQ.fasl ; compilation finished in 0:00:00.191 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/utils/archive.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.ARCHIVE) ; processing (DEFPARAMETER *SUPPORTED-ARCHIVE-TYPES* ...) ; processing (DEFPARAMETER *HTTP-BUFFER-SIZE* ...) ; processing (DEFUN ARCHIVEP ...) ; processing (DEFUN HTTP-FETCH-FILE ...) ; processing (DEFUN ARCHIVE-TYPE ...) ; processing (DEFUN UNZIP ...) ; processing (DEFUN GUNZIP ...) ; processing (DEFUN UNTAR ...) ; processing (DEFUN EXPAND-ARCHIVE ...) ; processing (DEFUN GET-MATCHING-FILENAMES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/utils/archive-tmpGB8XX1TU.fasl ; compilation finished in 0:00:00.599 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/utils/connection.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.CONNECTION) ; processing (DEFCLASS CONNECTION ...) ; processing (DEFINE-CONDITION CONNECTION-ERROR ...) ; processing (DEFGENERIC OPEN-CONNECTION ...) ; processing (DEFGENERIC CLOSE-CONNECTION ...) ; processing (DEFGENERIC CHECK-CONNECTION ...) ; processing (DEFGENERIC CLONE-CONNECTION ...) ; processing (DEFCLASS FD-CONNECTION ...) ; processing (DEFMETHOD CLONE-CONNECTION ...) ; processing (DEFINE-CONDITION FD-CONNECTION-ERROR ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFGENERIC FETCH-FILE ...) ; processing (DEFGENERIC EXPAND ...) ; processing (DEFMETHOD EXPAND ...) ; processing (DEFMETHOD FETCH-FILE ...) ; processing (DEFCLASS DB-CONNECTION ...) ; processing (DEFMETHOD CLONE-CONNECTION ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFINE-CONDITION DB-CONNECTION-ERROR ...) ; processing (DEFGENERIC QUERY ...) ; processing (DEFMACRO WITH-CONNECTION ...) ; processing (DEFMETHOD CHECK-CONNECTION ...) ; processing (DEFMETHOD CHECK-CONNECTION ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/utils/connection-tmpMU5GUFP8.fasl ; compilation finished in 0:00:01.531 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/pgsql/connection.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.PGSQL) ; processing (DEFPARAMETER *PGCONN-VARIANT* ...) ; processing (DEFCLASS PGSQL-CONNECTION ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD CLONE-CONNECTION ...) ; processing (DEFMETHOD SSL-ENABLE-P ...) ; processing (DEFUN NEW-PGSQL-CONNECTION ...) ; processing (DEFVAR *PGSQL-CLIENT-CERTIFICATE* ...) ; processing (DEFVAR *PGSQL-CLIENT-KEY* ...) ; processing (DEFTYPE POSTGRESQL-RETRYABLE ...) ; processing (DEFTYPE POSTGRESQL-UNAVAILABLE ...) ; processing (CL-POSTGRES-ERROR::DEFERROR "53300" ...) ; processing (CL-POSTGRES-ERROR::DEFERROR "53400" ...) ; processing (DEFVAR *RETRY-CONNECT-TIMES* ...) ; processing (DEFVAR *RETRY-CONNECT-DELAY* ...) ; processing (DEFMETHOD OPEN-CONNECTION ...) ; processing (DEFMETHOD CLOSE-CONNECTION ...) ; processing (DEFMETHOD QUERY ...) ; processing (DEFMETHOD QUERY ...) ; processing (DEFMACRO HANDLING-PGSQL-NOTICES ...) ; processing (DEFMACRO WITH-PGSQL-TRANSACTION ...) ; processing (DEFMACRO WITH-PGSQL-CONNECTION ...) ; processing (DEFUN GET-UNIX-SOCKET-DIR ...) ; processing (DEFUN SET-SESSION-GUCS ...) ; processing (DEFUN SANITIZE-USER-GUCS ...) ; processing (DEFUN PGSQL-CONNECT-AND-EXECUTE-WITH-TIMING ...) ; processing (DEFUN PGSQL-EXECUTE-WITH-TIMING ...) ; processing (DEFUN PGSQL-EXECUTE ...) ; processing (DEFUN SET-POSTGRESQL-VERSION ...) ; processing (DEFUN PARSE-POSTGRESQL-VERSION-STRING ...) ; processing (DEFUN LIST-TYPENAMES-WITHOUT-BTREE-SUPPORT ...) ; processing (DEFVAR *REDSHIFT-RESERVED-KEYWORDS* ...) ; processing (DEFUN LIST-RESERVED-KEYWORDS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/pgsql/connection-tmpBP201KII.fasl ; compilation finished in 0:00:02.671 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/pgsql/pgsql-ddl.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.PGSQL) ; processing (DEFMETHOD FORMAT-CREATE-SQL ...) ; processing (DEFMETHOD FORMAT-DROP-SQL ...) ; processing (DEFMETHOD FORMAT-CREATE-SQL ...) ; processing (DEFMETHOD FORMAT-DROP-SQL ...) ; processing (DEFMETHOD FORMAT-CREATE-SQL ...) ; processing (DEFMETHOD FORMAT-DROP-SQL ...) ; processing (DEFMETHOD FORMAT-CREATE-SQL ...) ; processing (DEFMETHOD FORMAT-DROP-SQL ...) ; processing (DEFUN GET-COLUMN-TYPE-NAME-FROM-SQLTYPE ...) ; processing (DEFMETHOD FORMAT-CREATE-SQL ...) ; processing (DEFVAR *PGSQL-DEFAULT-VALUES* ...) ; processing (DEFMETHOD FORMAT-DEFAULT-VALUE ...) ; processing (DEFMETHOD FORMAT-CREATE-SQL ...) ; processing (DEFMETHOD FORMAT-DROP-SQL ...) ; processing (DEFUN INDEX-ACCESS-METHOD ...) ; file: /build/reproducible-path/pgloader-3.6.2/src/pgsql/pgsql-ddl.lisp ; in: DEFUN INDEX-ACCESS-METHOD ; (VALUES) ; ; note: deleting unreachable code ; processing (DEFMETHOD FORMAT-CREATE-SQL ...) ; processing (DEFMETHOD FORMAT-DROP-SQL ...) ; processing (DEFMETHOD FORMAT-CREATE-SQL ...) ; processing (DEFMETHOD FORMAT-DROP-SQL ...) ; processing (DEFMETHOD FORMAT-CREATE-SQL ...) ; processing (DEFMETHOD FORMAT-DROP-SQL ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/pgsql/pgsql-ddl-tmp6LJFJXCQ.fasl ; compilation finished in 0:00:01.419 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/pgsql/pgsql-ddl-citus.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.PGSQL) ; processing (DEFMETHOD FORMAT-CREATE-SQL ...) ; processing (DEFMETHOD FORMAT-CREATE-SQL ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/pgsql/pgsql-ddl-citus-tmpCXNAFKK5.fasl ; compilation finished in 0:00:00.251 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/pgsql/pgsql-schema.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.PGSQL) ; processing (DEFUN FETCH-PGSQL-CATALOG ...) ; processing (DEFUN MAKE-INCLUDING-EXPR-FROM-CATALOG ...) ; processing (DEFUN MAKE-INCLUDING-EXPR-FROM-TABLE ...) ; processing (DEFUN FORMAT-TABLE-NAME-AS-INCLUDING-EXP ...) ; processing (DEFUN QUERY-TABLE-SCHEMA ...) ; processing (DEFUN MAKE-INCLUDING-EXPR-FROM-VIEW-NAMES ...) ; processing (DEFVAR *TABLE-TYPE* ...) ; processing (DEFUN FILTER-LIST-TO-WHERE-CLAUSE ...) ; processing (DEFUN NORMALIZE-EXTRA ...) ; processing (DEFUN LIST-ALL-COLUMNS ...) ; processing (DEFUN LIST-ALL-INDEXES ...) ; processing (DEFUN LIST-ALL-FKEYS ...) ; processing (DEFUN LIST-MISSING-FK-DEPS ...) ; processing (DEFUN LIST-SCHEMAS ...) ; processing (DEFUN LIST-SEARCH-PATH ...) ; processing (DEFUN GET-CURRENT-DATABASE ...) ; processing (DEFUN LIST-TABLE-OIDS ...) ; processing (DEFUN LIST-ALL-SQLTYPES ...) ; processing (DEFUN PARSE-INDEX-COLUMN-NAMES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/pgsql/pgsql-schema-tmpAG4HDK79.fasl ; compilation finished in 0:00:02.283 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/pgsql/merge-catalogs.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.PGSQL) ; processing (DEFUN MERGE-CATALOGS ...) ; processing (DEFUN CHECK-TABLE-COLUMNS ...) ; processing (DEFVAR *TYPE-NAME-MAPPING* ...) ; processing (DEFUN GET-TYPE-NAME ...) ; processing (DEFUN SAME-TYPE-P ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/pgsql/merge-catalogs-tmpTX55LUC3.fasl ; compilation finished in 0:00:00.311 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/pgsql/pgsql-trigger.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.PGSQL) ; processing (DEFVAR *PGSQL-TRIGGERS-PROCEDURES* ...) ; processing (DEFUN BUILD-TRIGGER ...) ; processing (DEFUN PROCESS-TRIGGERS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/pgsql/pgsql-trigger-tmpOFPBS7B8.fasl ; compilation finished in 0:00:00.387 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/pgsql/pgsql-index-filter.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.PGSQL) ; processing (DEFGENERIC TRANSLATE-INDEX-FILTER ...) ; processing (DEFMETHOD TRANSLATE-INDEX-FILTER ...) ; processing (DEFGENERIC PROCESS-INDEX-DEFINITIONS ...) ; processing (DEFMETHOD PROCESS-INDEX-DEFINITIONS ...) ; processing (DEFMETHOD PROCESS-INDEX-DEFINITIONS ...) ; processing (DEFMETHOD PROCESS-INDEX-DEFINITIONS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/pgsql/pgsql-index-filter-tmpN94P6QHO.fasl ; compilation finished in 0:00:00.311 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/pgsql/pgsql-finalize-catalogs.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.PGSQL) ; processing (DEFUN FINALIZE-CATALOGS ...) ; processing (DEFGENERIC ADJUST-DATA-TYPES ...) ; processing (DEFMETHOD ADJUST-DATA-TYPES ...) ; processing (DEFVAR *REDSHIFT-SUPPORTED-DATA-TYPES* ...) ; processing (DEFVAR *REDSHIFT-DECIMAL-MAX-PRECISION* ...) ; processing (DEFVAR *REDSHIFT-VARCHAR-MAX-PRECISION* ...) ; processing (DEFMETHOD ADJUST-DATA-TYPES ...) ; processing (DEFGENERIC DUMB-DOWN-DATA-TYPES-FOR-REDSHIFT ...) ; processing (DEFMETHOD DUMB-DOWN-DATA-TYPES-FOR-REDSHIFT ...) ; processing (DEFMETHOD DUMB-DOWN-DATA-TYPES-FOR-REDSHIFT ...) ; processing (DEFMETHOD DUMB-DOWN-DATA-TYPES-FOR-REDSHIFT ...) ; processing (DEFMETHOD DUMB-DOWN-DATA-TYPES-FOR-REDSHIFT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/pgsql/pgsql-finalize-catalogs-tmp7PI54QD2.fasl ; compilation finished in 0:00:00.699 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/pgsql/pgsql-create-schema.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.PGSQL) ; processing (DEFUN CREATE-SQLTYPES ...) ; processing (DEFUN CREATE-TABLE-SQL-LIST ...) ; processing (DEFUN CREATE-TABLE-LIST ...) ; processing (DEFUN CREATE-SCHEMAS ...) ; processing (DEFUN ADD-TO-SEARCH-PATH ...) ; processing (DEFUN CREATE-EXTENSIONS ...) ; processing (DEFUN CREATE-TABLES ...) ; processing (DEFUN CREATE-VIEWS ...) ; processing (DEFUN CREATE-TRIGGERS ...) ; processing (DEFUN TRUNCATE-TABLES ...) ; processing (DEFUN DISABLE-TRIGGERS ...) ; processing (DEFUN ENABLE-TRIGGERS ...) ; processing (DEFMACRO WITH-DISABLED-TRIGGERS ...) ; processing (DEFUN DROP-PGSQL-FKEYS ...) ; processing (DEFUN CREATE-PGSQL-FKEYS ...) ; processing (DEFUN CREATE-INDEXES-IN-KERNEL ...) ; processing (DEFUN SET-TABLE-OIDS ...) ; processing (DEFUN DROP-INDEXES ...) ; processing (DEFUN MAYBE-DROP-INDEXES ...) ; processing (DEFUN CREATE-INDEXES-AGAIN ...) ; processing (DEFUN RESET-SEQUENCES ...) ; processing (DEFUN COMMENT-ON-TABLES-AND-COLUMNS ...) ; processing (DEFUN CREATE-DISTRIBUTED-TABLE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/pgsql/pgsql-create-schema-tmp2KPVYDA8.fasl ; compilation finished in 0:00:02.463 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/common/api.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCES) ; processing (DEFCLASS COPY ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFGENERIC CONCURRENCY-SUPPORT ...) ; processing (DEFGENERIC MAP-ROWS ...) ; processing (DEFGENERIC PROPROCESS-ROW ...) ; processing (DEFGENERIC QUEUE-RAW-DATA ...) ; processing (DEFGENERIC DATA-IS-PREFORMATTED-P ...) ; processing (DEFGENERIC COPY-COLUMN-LIST ...) ; processing (DEFCLASS MD-COPY ...) ; processing (DEFGENERIC PARSE-HEADER ...) ; processing (DEFGENERIC PROCESS-ROWS ...) ; processing (DEFGENERIC CLONE-COPY-FOR ...) ; processing (DEFCLASS DB-COPY ...) ; processing (DEFGENERIC FETCH-METADATA ...) ; processing (DEFGENERIC CLEANUP ...) ; processing (DEFGENERIC INSTANCIATE-TABLE-COPY-OBJECT ...) ; processing (DEFGENERIC FILTER-LIST-TO-WHERE-CLAUSE ...) ; processing (DEFGENERIC FETCH-COLUMNS ...) ; processing (DEFGENERIC FETCH-INDEXES ...) ; processing (DEFGENERIC FETCH-FOREIGN-KEYS ...) ; processing (DEFGENERIC FETCH-COMMENTS ...) ; processing (DEFGENERIC GET-COLUMN-SQL-EXPRESSION ...) ; processing (DEFGENERIC GET-COLUMN-LIST ...) ; processing (DEFGENERIC FORMAT-MATVIEW-NAME ...) ; processing (DEFGENERIC CREATE-MATVIEWS ...) ; processing (DEFGENERIC DROP-MATVIEWS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/common/api-tmp96FLK53O.fasl ; compilation finished in 0:00:00.159 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/common/methods.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.SOURCES) ; processing (DEFMETHOD DATA-IS-PREFORMATTED-P ...) ; processing (DEFMETHOD PREPROCESS-ROW ...) ; processing (DEFMETHOD COPY-COLUMN-LIST ...) ; processing (DEFMETHOD CLEANUP ...) ; processing (DEFMETHOD INSTANCIATE-TABLE-COPY-OBJECT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/common/methods-tmpVXGJXF6B.fasl ; compilation finished in 0:00:00.239 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/common/md-methods.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.SOURCES) ; processing (DEFMETHOD PARSE-HEADER ...) ; processing (DEFMETHOD PREPROCESS-ROW ...) ; processing (DEFMETHOD COPY-COLUMN-LIST ...) ; processing (DEFMETHOD CLONE-COPY-FOR ...) ; processing (DEFMETHOD MAP-ROWS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/common/md-methods-tmp6TIYUV96.fasl ; compilation finished in 0:00:00.411 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/common/matviews.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCES) ; processing (DEFMETHOD FORMAT-MATVIEW-NAME ...) ; processing (DEFMETHOD CREATE-MATVIEWS ...) ; processing (DEFMETHOD DROP-MATVIEWS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/common/matviews-tmpSE0QLD5B.fasl ; compilation finished in 0:00:00.299 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/common/casting-rules.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.SOURCES) ; processing (DEFVAR *DEFAULT-CAST-RULES* ...) ; processing (DEFVAR *CAST-RULES* ...) ; processing (DEFUN PARSE-COLUMN-UNSIGNED ...) ; processing (DEFUN CAST-RULE-MATCHES ...) ; processing (DEFUN MAKE-PGSQL-TYPE ...) ; processing (DEFUN APPLY-CASTING-RULES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/common/casting-rules-tmp65JBUOWY.fasl ; compilation finished in 0:00:00.575 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/common/files-and-pathnames.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.SOURCES) ; processing (DEFCLASS MD-CONNECTION ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFMETHOD EXPAND ...) ; processing (DEFMETHOD FETCH-FILE ...) ; processing (DEFGENERIC EXPAND-SPEC ...) ; processing (DEFMETHOD EXPAND-SPEC ...) ; processing (DEFMETHOD OPEN-CONNECTION ...) ; processing (DEFMETHOD CLOSE-CONNECTION ...) ; processing (DEFUN GET-PATHNAME ...) ; processing (DEFUN FILTER-DIRECTORY ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/common/files-and-pathnames-tmpE8RY5GCJ.fasl ; compilation finished in 0:00:00.835 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/common/project-fields.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.SOURCES) ; processing (DEFUN PROJECT-FIELDS ...) ; file: /build/reproducible-path/pgloader-3.6.2/src/sources/common/project-fields.lisp ; in: DEFUN PROJECT-FIELDS ; (DEFUN PGLOADER.SOURCES:PROJECT-FIELDS ; (&KEY PGLOADER.SOURCES:FIELDS PGLOADER.SOURCES:COLUMNS (COMPILE T)) ; #<(SIMPLE-ARRAY CHARACTER ; (398)) The simplest projection happens when both FIELDS and COLS are nil: in ; this case the projection is an identity, we simply return what we got. ; ; Other forms of projections consist of forming column... {100AF4800F}> ; (LABELS ((PGLOADER.SOURCES::NULL-AS-PROCESSING-FN ; (PGLOADER.SOURCES::NULL-AS) ; "return a lambda form that will process a value given NULL-AS." ; (IF # ; # ; #)) ; (PGLOADER.SOURCES::FIELD-NAME-AS-SYMBOL ; (PGLOADER.SOURCES::FIELD-NAME-OR-LIST) ; "we need to deal with symbols as we generate code" ; (TYPECASE PGLOADER.SOURCES::FIELD-NAME-OR-LIST # #)) ; (PGLOADER.SOURCES::PROCESS-FIELD ; (PGLOADER.SOURCES::FIELD-NAME-OR-LIST) ; "Given a field entry, return a function dealing with nulls for it" ; (DESTRUCTURING-BIND # # #))) ; (LET* ((PGLOADER.SOURCES::PROJECTION #)) ; (IF COMPILE ; (COMPILE NIL PGLOADER.SOURCES::PROJECTION) ; PGLOADER.SOURCES::PROJECTION)))) ; --> PROGN ; ==> ; (SB-IMPL::%DEFUN 'PGLOADER.SOURCES:PROJECT-FIELDS ; (SB-INT:NAMED-LAMBDA PGLOADER.SOURCES:PROJECT-FIELDS ; (&KEY PGLOADER.SOURCES:FIELDS PGLOADER.SOURCES:COLUMNS ; (COMPILE T)) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; #<(SIMPLE-ARRAY CHARACTER ; (398)) The simplest projection happens when both FIELDS and COLS are nil: in ; this case the projection is an identity, we simply return what we got. ; ; Other forms of projections consist of forming column... {100AF4800F}> ; (BLOCK PGLOADER.SOURCES:PROJECT-FIELDS ; (LABELS (# # #) ; (LET* # ; #))))) ; ; caught STYLE-WARNING: ; Call to PGLOADER.TRANSFORMS:INTERN-SYMBOL could not be inlined because its ; source code was not saved. A global INLINE or SB-EXT:MAYBE-INLINE proclamation ; must be in effect to save function definitions for inlining. ; processing (DEFUN REFORMAT-THEN-PROCESS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/common/project-fields-tmpK6B9YU0C.fasl ; compilation finished in 0:00:00.727 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/csv/csv-guess.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.SOURCE.CSV) ; processing (DEFPARAMETER *SEPARATORS* ...) ; processing (DEFPARAMETER *ESCAPE-QUOTES* ...) ; processing (DEFUN GET-FILE-SAMPLE ...) ; processing (DEFUN GET-STREAM-SAMPLE ...) ; processing (DEFUN TRY-CSV-PARAMS ...) ; processing (DEFUN GUESS-CSV-PARAMS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/csv/csv-guess-tmp6RAYVCZW.fasl ; compilation finished in 0:00:00.639 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/csv/csv.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.CSV) ; processing (DEFCLASS CSV-CONNECTION ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFCLASS COPY-CSV ...) ; processing (DEFMETHOD CLONE-COPY-FOR ...) ; processing (DEFMETHOD PARSE-HEADER ...) ; processing (DEFMETHOD PROCESS-ROWS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/csv/csv-tmpA61ZVGEL.fasl ; compilation finished in 0:00:00.903 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/fixed/fixed-guess.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.FIXED) ; processing (DEFGENERIC GET-FIRST-LINES ...) ; processing (DEFUN GUESS-FIXED-SPECS-FROM-HEADER ...) ; processing (DEFUN GUESS-FIXED-SPECS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/fixed/fixed-guess-tmp4RW61Z3D.fasl ; compilation finished in 0:00:00.655 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/fixed/fixed.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.FIXED) ; processing (DEFCLASS FIXED-CONNECTION ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFCLASS COPY-FIXED ...) ; processing (DEFMETHOD CLONE-COPY-FOR ...) ; processing (DEFMETHOD PARSE-HEADER ...) ; processing (DECLAIM (INLINE PARSE-ROW)) ; file: /build/reproducible-path/pgloader-3.6.2/src/sources/fixed/fixed.lisp ; in: DECLAIM (INLINE PARSE-ROW) ; (DECLAIM (INLINE PGLOADER.SOURCE.FIXED::PARSE-ROW)) ; --> EVAL-WHEN ; ==> ; (SB-C::%PROCLAIM '(INLINE PGLOADER.SOURCE.FIXED::PARSE-ROW) ; (SB-C:SOURCE-LOCATION)) ; ; caught STYLE-WARNING: ; Proclaiming PGLOADER.SOURCE.FIXED::PARSE-ROW to be INLINE, but 1 call to it was ; previously compiled. A declaration of NOTINLINE at the call site will eliminate ; this warning, as will proclaiming and defining the function before its first ; potential use. ; processing (DEFUN PARSE-ROW ...) ; file: /build/reproducible-path/pgloader-3.6.2/src/sources/fixed/fixed.lisp ; in: DEFUN PARSE-ROW ; (DESTRUCTURING-BIND ; (&KEY PGLOADER.SOURCE.FIXED::START LENGTH &ALLOW-OTHER-KEYS) ; PGLOADER.SOURCE.FIXED::OPTS ; (LET ((PGLOADER.SOURCE.FIXED::END (+ PGLOADER.SOURCE.FIXED::START LENGTH))) ; (WHEN (<= PGLOADER.SOURCE.FIXED::START PGLOADER.SOURCE.FIXED::LEN) ; (SUBSEQ PGLOADER.SOURCE.FIXED::LINE PGLOADER.SOURCE.FIXED::START ; (MIN PGLOADER.SOURCE.FIXED::LEN PGLOADER.SOURCE.FIXED::END))))) ; ; caught STYLE-WARNING: ; This is not a NUMBER: ; NIL ; See also: ; The SBCL Manual, Node "Handling of Types" ; processing (DEFMETHOD PROCESS-ROWS ...) ; file: /build/reproducible-path/pgloader-3.6.2/src/sources/fixed/fixed.lisp ; in: DEFMETHOD PROCESS-ROWS (COPY-FIXED T T) ; (PGLOADER.SOURCE.FIXED::PARSE-ROW PGLOADER.SOURCE.FIXED::FIXED-COLS-SPECS ; PGLOADER.SOURCE.FIXED::LINE) ; --> BLOCK LOOP BLOCK LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* ; --> TAGBODY SB-LOOP::LOOP-COLLECT-RPLACD ; ==> ; (RPLACD #:LOOP-LIST-TAIL-16 ; (SETQ #:LOOP-LIST-TAIL-16 ; (LIST (DESTRUCTURING-BIND # PGLOADER.SOURCE.FIXED::OPTS #)))) ; ; caught STYLE-WARNING: ; This is not a NUMBER: ; NIL ; See also: ; The SBCL Manual, Node "Handling of Types" ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/fixed/fixed-tmpLUSCH4I7.fasl ; compilation finished in 0:00:00.627 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/copy.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.COPY) ; processing (DEFCLASS COPY-CONNECTION ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFCLASS COPY-COPY ...) ; processing (DEFMETHOD CLONE-COPY-FOR ...) ; processing (DECLAIM (INLINE PARSE-ROW)) ; processing (DEFUN PARSE-ROW ...) ; processing (DEFMETHOD PROCESS-ROWS ...) ; processing (DEFMETHOD DATA-IS-PREFORMATTED-P ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/copy-tmp7IXFX52H.fasl ; compilation finished in 0:00:00.567 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/db3/db3-cast-rules.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.DB3) ; processing (DEFPARAMETER *DB3-DEFAULT-CAST-RULES* ...) ; processing (DEFSTRUCT (DB3-COLDEF #) ...) ; processing (DEFMETHOD CAST ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/db3/db3-cast-rules-tmp2R82LQR0.fasl ; compilation finished in 0:00:00.247 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/db3/db3-connection.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.DB3) ; processing (DEFCLASS DBF-CONNECTION ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD OPEN-CONNECTION ...) ; processing (DEFMETHOD CLOSE-CONNECTION ...) ; processing (DEFMETHOD CLONE-CONNECTION ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/db3/db3-connection-tmpN3B5JWXT.fasl ; compilation finished in 0:00:00.395 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/db3/db3-schema.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.DB3) ; processing (DEFCLASS COPY-DB3 ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD FETCH-COLUMNS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/db3/db3-schema-tmp5K3D12M0.fasl ; compilation finished in 0:00:00.195 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/db3/db3.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.DB3) ; processing (DEFMETHOD MAP-ROWS ...) ; processing (DEFMETHOD INSTANCIATE-TABLE-COPY-OBJECT ...) ; processing (DEFMETHOD FETCH-METADATA ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/db3/db3-tmpYZS9ORGN.fasl ; compilation finished in 0:00:00.863 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/ixf/ixf-cast-rules.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.IXF) ; processing (DEFVAR *IXF-PGSQL-TYPE-MAPPING* ...) ; processing (DEFUN CAST-IXF-TYPE ...) ; processing (DEFUN TRANSFORM-FUNCTION ...) ; processing (DEFMETHOD CAST ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/ixf/ixf-cast-rules-tmpKA4LL4BN.fasl ; compilation finished in 0:00:00.403 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/ixf/ixf-connection.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.IXF) ; processing (DEFCLASS IXF-CONNECTION ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD OPEN-CONNECTION ...) ; processing (DEFMETHOD CLOSE-CONNECTION ...) ; processing (DEFMETHOD CLONE-CONNECTION ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/ixf/ixf-connection-tmpKRR1J698.fasl ; compilation finished in 0:00:00.399 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/ixf/ixf-schema.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.IXF) ; processing (DEFCLASS COPY-IXF ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD FETCH-COLUMNS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/ixf/ixf-schema-tmp570ISN87.fasl ; compilation finished in 0:00:00.119 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/ixf/ixf.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.IXF) ; processing (DEFMETHOD MAP-ROWS ...) ; processing (DEFMETHOD INSTANCIATE-TABLE-COPY-OBJECT ...) ; processing (DEFMETHOD FETCH-METADATA ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/ixf/ixf-tmpIPPJG5IK.fasl ; compilation finished in 0:00:00.523 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/sqlite/sqlite-cast-rules.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.SQLITE) ; processing (DEFVAR *SQLITE-DB* ...) ; processing (DEFPARAMETER *SQLITE-DEFAULT-CAST-RULES* ...) ; processing (DEFSTRUCT (COLDEF #) ...) ; processing (DEFUN NORMALIZE ...) ; processing (DEFUN CTYPE-TO-DTYPE ...) ; processing (DEFMETHOD CAST ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/sqlite/sqlite-cast-rules-tmpCY2HPI62.fasl ; compilation finished in 0:00:00.439 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/sqlite/sqlite-connection.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.SQLITE) ; processing (DEFVAR *SQLITE-DB* ...) ; processing (DEFCLASS SQLITE-CONNECTION ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD OPEN-CONNECTION ...) ; processing (DEFMETHOD CLOSE-CONNECTION ...) ; processing (DEFMETHOD CLONE-CONNECTION ...) ; processing (DEFMETHOD QUERY ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/sqlite/sqlite-connection-tmpL4PLYSMQ.fasl ; compilation finished in 0:00:00.299 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/sqlite/sqlite-schema.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.SQLITE) ; processing (DEFCLASS COPY-SQLITE ...) ; processing (DEFUN SQLITE-ENCODING ...) ; processing (DEFMETHOD FILTER-LIST-TO-WHERE-CLAUSE ...) ; processing (DEFUN LIST-TABLES ...) ; processing (DEFUN FIND-SEQUENCE ...) ; processing (DEFUN FIND-AUTO-INCREMENT-IN-CREATE-SQL ...) ; processing (DEFUN LIST-COLUMNS ...) ; processing (DEFMETHOD FETCH-COLUMNS ...) ; processing (DEFUN ADD-UNLISTED-PRIMARY-KEY-INDEX ...) ; processing (DEFUN IS-INDEX-PK ...) ; processing (DEFUN LIST-INDEX-COLS ...) ; processing (DEFUN LIST-INDEXES ...) ; processing (DEFMETHOD FETCH-INDEXES ...) ; processing (DEFUN LIST-FKEYS ...) ; processing (DEFMETHOD FETCH-FOREIGN-KEYS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/sqlite/sqlite-schema-tmp90WIGG8R.fasl ; compilation finished in 0:00:01.251 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/sqlite/sqlite.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.SQLITE) ; processing (DECLAIM (INLINE PARSE-VALUE)) ; processing (DEFUN PARSE-VALUE ...) ; processing (DEFMETHOD MAP-ROWS ...) ; processing (DEFMETHOD COPY-COLUMN-LIST ...) ; processing (DEFMETHOD FETCH-METADATA ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/sqlite/sqlite-tmpPHN42PM1.fasl ; compilation finished in 0:00:00.975 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/mssql/mssql-cast-rules.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.MSSQL) ; processing (DEFPARAMETER *MSSQL-DEFAULT-CAST-RULES* ...) ; processing (DEFSTRUCT (MSSQL-COLUMN #) ...) ; processing (DEFMETHOD FIELD-NAME ...) ; processing (DEFMETHOD MSSQL-COLUMN-CTYPE ...) ; processing (DEFMETHOD CAST ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/mssql/mssql-cast-rules-tmpFXGWJOII.fasl ; compilation finished in 0:00:00.295 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/mssql/mssql-connection.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.MSSQL) ; processing (DEFVAR *MSSQL-DB* ...) ; processing (DEFCLASS MSSQL-CONNECTION ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD OPEN-CONNECTION ...) ; processing (DEFMETHOD CLOSE-CONNECTION ...) ; processing (DEFMETHOD CLONE-CONNECTION ...) ; processing (DEFMETHOD QUERY ...) ; processing (DEFUN MSSQL-QUERY ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/mssql/mssql-connection-tmp61U154E8.fasl ; compilation finished in 0:00:00.047 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/mssql/mssql-schema.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.MSSQL) ; processing (DEFCLASS COPY-MSSQL ...) ; processing (DEFVAR *TABLE-TYPE* ...) ; processing (DEFMETHOD FILTER-LIST-TO-WHERE-CLAUSE ...) ; processing (DEFMETHOD FETCH-COLUMNS ...) ; processing (DEFMETHOD FETCH-INDEXES ...) ; processing (DEFMETHOD FETCH-FOREIGN-KEYS ...) ; processing (DEFMETHOD GET-COLUMN-SQL-EXPRESSION ...) ; processing (DEFMETHOD GET-COLUMN-LIST ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/mssql/mssql-schema-tmpJL840EJB.fasl ; compilation finished in 0:00:00.199 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/mssql/mssql.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.MSSQL) ; processing (DEFMETHOD MAP-ROWS ...) ; processing (DEFMETHOD FETCH-METADATA ...) ; processing (DEFMETHOD CLEANUP ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/mssql/mssql-tmpP6WT67MY.fasl ; compilation finished in 0:00:00.071 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/mssql/mssql-index-filters.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.SOURCE.MSSQL.INDEX-FILTER) ; processing (DEFMETHOD TRANSLATE-INDEX-FILTER ...) ; processing (DEFUN PARSE-INDEX-FILTER-CLAUSE ...) ; processing (DEFRULE WHITESPACE ...) ; processing (DEFRULE PUNCT ...) ; processing (DEFRULE NAMESTRING ...) ; processing (DEFRULE MSSQL-BRACKETED-IDENTIFIER ...) ; processing (DEFRULE MSSQL-IDENTIFIER ...) ; processing (DEFRULE = ...) ; processing (DEFRULE <= ...) ; processing (DEFRULE >= ...) ; processing (DEFRULE < ...) ; processing (DEFRULE > ...) ; processing (DEFRULE <> ...) ; processing (DEFRULE != ...) ; processing (DEFRULE IN ...) ; processing (DEFRULE O-P ...) ; processing (DEFRULE C-P ...) ; processing (DEFRULE BETWEEN ...) ; processing (DEFRULE AND-OP ...) ; processing (DEFRULE MSSQL-OPERATOR ...) ; processing (DEFRULE DIGITS ...) ; processing (DEFRULE QUOTED ...) ; processing (DEFRULE MSSQL-CONSTANT-PARENS ...) ; processing (DEFRULE MSSQL-CONSTANT-NO-PARENS ...) ; processing (DEFRULE MSSQL-CONSTANT ...) ; processing (DEFRULE MSSQL-IS-NOT-NULL ...) ; processing (DEFRULE MSSQL-IS-NULL ...) ; processing (DEFRULE MSSQL-WHERE-IS-NULL ...) ; processing (DEFRULE MSSQL-WHERE-ID-OP-CONST ...) ; processing (DEFRULE MSSQL-WHERE-CONST-OP-ID ...) ; processing (DEFRULE MSSQL-WHERE-OP ...) ; processing (DEFRULE ANOTHER-CONSTANT ...) ; processing (DEFRULE MSSQL-IN-LIST ...) ; processing (DEFRULE MSSQL-WHERE-IN ...) ; processing (DEFRULE MSSQL-WHERE-BETWEEN ...) ; processing (DEFRULE MSSQL-INDEX-FILTER ...) ; processing (DEFRULE ANOTHER-INDEX-FILTER ...) ; processing (DEFRULE MSSQL-INDEX-WHERE-CLAUSE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/mssql/mssql-index-filters-tmpHKLMC92Z.fasl ; compilation finished in 0:00:00.047 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/mysql/mysql-cast-rules.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.MYSQL) ; processing (DEFUN ENUM-OR-SET-NAME ...) ; processing (DEFPARAMETER *MYSQL-DEFAULT-CAST-RULES* ...) ; processing (DEFSTRUCT (MYSQL-COLUMN #) ...) ; processing (DEFMETHOD FIELD-NAME ...) ; processing (DEFUN EXPLODE-MYSQL-ENUM ...) ; processing (DEFUN NORMALIZE-EXTRA ...) ; processing (DEFMETHOD CAST ...) ; processing (DEFUN TEST-CASTS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/mysql/mysql-cast-rules-tmpI2PYUEMW.fasl ; compilation finished in 0:00:00.051 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/mysql/mysql-connection.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.MYSQL) ; processing (DEFVAR *CONNECTION* ...) ; processing (DEFCLASS MYSQL-CONNECTION ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; processing (DEFMETHOD CLONE-CONNECTION ...) ; processing (DEFMETHOD SSL-MODE ...) ; processing (DEFMETHOD OPEN-CONNECTION ...) ; processing (DEFMETHOD CLOSE-CONNECTION ...) ; processing (DEFMETHOD QUERY ...) ; processing (DECLAIM (INLINE MYSQL-QUERY)) ; processing (DEFUN MYSQL-QUERY ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/mysql/mysql-connection-tmpOKTALX52.fasl ; compilation finished in 0:00:00.027 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/mysql/mysql-schema.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.MYSQL) ; processing (DEFCLASS COPY-MYSQL ...) ; processing (DEFVAR *TABLE-TYPE* ...) ; processing (DEFMETHOD FILTER-LIST-TO-WHERE-CLAUSE ...) ; processing (DEFUN CLEANUP-DEFAULT-VALUE ...) ; processing (DEFMETHOD FETCH-COLUMNS ...) ; processing (DEFMETHOD FETCH-INDEXES ...) ; processing (DEFMETHOD FETCH-FOREIGN-KEYS ...) ; processing (DEFUN LIST-TABLE-COMMENTS ...) ; processing (DEFUN LIST-COLUMNS-COMMENTS ...) ; processing (DEFMETHOD GET-COLUMN-SQL-EXPRESSION ...) ; processing (DEFMETHOD GET-COLUMN-LIST ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/mysql/mysql-schema-tmpGJIHCBMO.fasl ; compilation finished in 0:00:00.067 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/mysql/mysql.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.MYSQL) ; processing (DEFMETHOD CONCURRENCY-SUPPORT ...) ; processing (DEFUN CALL-WITH-ENCODING-HANDLER ...) ; processing (DEFMACRO WITH-ENCODING-HANDLER ...) ; processing (DEFMETHOD MAP-ROWS ...) ; processing (DEFMETHOD COPY-COLUMN-LIST ...) ; processing (DEFMETHOD FETCH-METADATA ...) ; processing (DEFMETHOD CLEANUP ...) ; processing (DEFVAR *DECODING-AS* ...) ; processing (DEFUN APPLY-DECODING-AS-FILTERS ...) ; processing (DEFMETHOD INSTANCIATE-TABLE-COPY-OBJECT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/mysql/mysql-tmp59XTDCD6.fasl ; compilation finished in 0:00:01.339 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/pgsql/pgsql-cast-rules.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.PGSQL) ; processing (DEFPARAMETER *PGSQL-DEFAULT-CAST-RULES* ...) ; processing (DEFMETHOD PGSQL-COLUMN-CTYPE ...) ; processing (DEFMETHOD CAST ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/pgsql/pgsql-cast-rules-tmp1Z52HZRL.fasl ; compilation finished in 0:00:00.247 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/sources/pgsql/pgsql.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.PGSQL) ; processing (DEFCLASS COPY-PGSQL ...) ; processing (DEFMETHOD MAP-ROWS ...) ; processing (DEFMETHOD COPY-COLUMN-LIST ...) ; processing (DEFMETHOD FETCH-METADATA ...) ; processing (DEFMETHOD CLEANUP ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/sources/pgsql/pgsql-tmp24DFEJ91.fasl ; compilation finished in 0:00:01.231 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/pg-copy/copy-batch.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.PGCOPY) ; processing (DEFSTRUCT (BATCH #) ...) ; processing (DEFUN INIT-BATCH-MAX-COUNT ...) ; processing (DEFUN BATCH-OVERSIZED-P ...) ; processing (DEFUN BATCH-FULL-P ...) ; processing (DEFUN PUSH-ROW ...) ; processing (DEFUN FORMAT-ROW-IN-BATCH ...) ; processing (DEFUN ADD-ROW-TO-CURRENT-BATCH ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/pg-copy/copy-batch-tmpIGJ98JSU.fasl ; compilation finished in 0:00:00.107 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/pg-copy/copy-format.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.PGCOPY) ; processing (DEFUN PREPARE-AND-FORMAT-ROW ...) ; processing (DEFUN PREPARE-ROW ...) ; processing (DEFUN FORMAT-VECTOR-ROW ...) ; file: /build/reproducible-path/pgloader-3.6.2/src/pg-copy/copy-format.lisp ; in: DEFUN FORMAT-VECTOR-ROW ; (MAP 'VECTOR ; (LAMBDA (PGLOADER.PGCOPY::COL) ; (IF (PGLOADER.PGCOPY::COL-NULL-P PGLOADER.PGCOPY::COL) ; 2 ; (PGLOADER.PGCOPY::COPY-UTF-8-BYTE-LENGTH PGLOADER.PGCOPY::COL))) ; PGLOADER.PGCOPY::ROW) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (+ PGLOADER.PGCOPY::NB-COLS (REDUCE #'+ PGLOADER.PGCOPY::LENS)) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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. ; (LOOP :FOR PGLOADER.PGCOPY::COL :ACROSS PGLOADER.PGCOPY::ROW ; :FOR PGLOADER.PGCOPY::I FIXNUM :FROM 1 ; :FOR POSITION ...) ; --> BLOCK LET LET LET LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE ; ==> ; (AREF #:LOOP-ACROSS-VECTOR-0 #:LOOP-ACROSS-INDEX-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. ; (+ PGLOADER.PGCOPY::NB-COLS (REDUCE #'+ PGLOADER.PGCOPY::LENS)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; (+ POSITION PGLOADER.PGCOPY::COL-LEN) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first result of inline (signed-byte 64) arithmetic ; processing (DEFUN FORMAT-ESCAPED-VECTOR-ROW ...) ; file: /build/reproducible-path/pgloader-3.6.2/src/pg-copy/copy-format.lisp ; in: DEFUN FORMAT-ESCAPED-VECTOR-ROW ; (MAP 'VECTOR ; (LAMBDA (PGLOADER.PGCOPY::COL) ; (IF (PGLOADER.PGCOPY::COL-NULL-P PGLOADER.PGCOPY::COL) ; 2 ; (CL-POSTGRES-TRIVIAL-UTF-8:UTF-8-BYTE-LENGTH ; PGLOADER.PGCOPY::COL))) ; PGLOADER.PGCOPY::ROW) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (+ PGLOADER.PGCOPY::NB-COLS (REDUCE #'+ PGLOADER.PGCOPY::LENS)) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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. ; (LOOP :FOR PGLOADER.PGCOPY::COL :ACROSS PGLOADER.PGCOPY::ROW ; :FOR PGLOADER.PGCOPY::I :FROM 1 ; :FOR POSITION := ...) ; --> BLOCK LET LET LET LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE ; ==> ; (AREF #:LOOP-ACROSS-VECTOR-0 #:LOOP-ACROSS-INDEX-1) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (REPLACE PGLOADER.PGCOPY::BUF PGLOADER.PGCOPY::UTF-8-BYTES :START1 POSITION) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)). ; (+ POSITION PGLOADER.PGCOPY::COL-LEN) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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. ; (LOOP :FOR PGLOADER.PGCOPY::COL :ACROSS PGLOADER.PGCOPY::ROW ; :FOR PGLOADER.PGCOPY::I :FROM 1 ; :FOR POSITION := ...) ; --> BLOCK LET LET LET LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE ; ==> ; (AREF #:LOOP-ACROSS-VECTOR-0 #:LOOP-ACROSS-INDEX-1) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (+ POSITION PGLOADER.PGCOPY::COL-LEN 1) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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 conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; (+ PGLOADER.PGCOPY::NB-COLS (REDUCE #'+ PGLOADER.PGCOPY::LENS)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; (+ POSITION PGLOADER.PGCOPY::COL-LEN) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline float arithmetic (cost 2) because: ; The first argument is a (OR NUMBER . #2=(NULL)), not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER . #3=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (OR NUMBER . #2#), not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER . #3#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; (LOOP :FOR PGLOADER.PGCOPY::COL :ACROSS PGLOADER.PGCOPY::ROW ; :FOR PGLOADER.PGCOPY::I :FROM 1 ; :FOR POSITION := ...) ; --> BLOCK LET LET LET LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE ; ==> ; (1+ PGLOADER.PGCOPY::I) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES (INTEGER 2) . #2=(&OPTIONAL)), not a (VALUES ; FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES (INTEGER 2) . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (+ POSITION PGLOADER.PGCOPY::COL-LEN 1) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; processing (DECLAIM (INLINE INSERT-COPY-SEPARATOR ...)) ; file: /build/reproducible-path/pgloader-3.6.2/src/pg-copy/copy-format.lisp ; in: DECLAIM (INLINE INSERT-COPY-SEPARATOR INSERT-COPY-NULL COL-NULL-P) ; (DECLAIM ; (INLINE PGLOADER.PGCOPY::INSERT-COPY-SEPARATOR ; PGLOADER.PGCOPY::INSERT-COPY-NULL PGLOADER.PGCOPY::COL-NULL-P)) ; --> EVAL-WHEN ; ==> ; (SB-C::%PROCLAIM ; '(INLINE PGLOADER.PGCOPY::INSERT-COPY-SEPARATOR ; PGLOADER.PGCOPY::INSERT-COPY-NULL PGLOADER.PGCOPY::COL-NULL-P) ; (SB-C:SOURCE-LOCATION)) ; ; caught STYLE-WARNING: ; Proclaiming PGLOADER.PGCOPY::INSERT-COPY-SEPARATOR to be INLINE, but 2 calls to ; it were previously compiled. A declaration of NOTINLINE at the call sites will ; eliminate this warning, as will proclaiming and defining the function before ; its first potential use. ; ; caught STYLE-WARNING: ; Proclaiming PGLOADER.PGCOPY::INSERT-COPY-NULL to be INLINE, but 2 calls to it ; were previously compiled. A declaration of NOTINLINE at the call sites will ; eliminate this warning, as will proclaiming and defining the function before ; its first potential use. ; ; caught STYLE-WARNING: ; Proclaiming PGLOADER.PGCOPY::COL-NULL-P to be INLINE, but 4 calls to it were ; previously compiled. A declaration of NOTINLINE at the call sites will ; eliminate this warning, as will proclaiming and defining the function before ; its first potential use. ; processing (DEFUN COL-NULL-P ...) ; processing (DEFUN INSERT-COPY-NULL ...) ; processing (DEFUN INSERT-COPY-SEPARATOR ...) ; processing (DEFUN APPLY-TRANSFORMS ...) ; processing (DEFUN COPY-UTF-8-BYTE-LENGTH ...) ; file: /build/reproducible-path/pgloader-3.6.2/src/pg-copy/copy-format.lisp ; in: DEFUN COPY-UTF-8-BYTE-LENGTH ; (INCF LENGTH 1) ; --> SETQ THE ; ==> ; (+ 1 LENGTH) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; (INCF LENGTH ; (COND ((< PGLOADER.PGCOPY::CODE 2048) 1) ; ((< PGLOADER.PGCOPY::CODE 65536) 2) (T 3))) ; --> SETQ THE ; ==> ; (+ ; (COND ((< PGLOADER.PGCOPY::CODE 2048) 1) ((< PGLOADER.PGCOPY::CODE 65536) 2) ; (T 3)) ; LENGTH) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do inline (signed-byte 64) arithmetic (cost 4) because: ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; etc. ; (INCF LENGTH 1) ; --> SETQ THE ; ==> ; (+ 1 LENGTH) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; processing (DEFMACRO AS-COPY-UTF-8-BYTES ...) ; processing (DEFUN STRING-TO-COPY-UTF-8-BYTES ...) ; file: /build/reproducible-path/pgloader-3.6.2/src/pg-copy/copy-format.lisp ; in: DEFUN STRING-TO-COPY-UTF-8-BYTES ; (PGLOADER.PGCOPY::AS-COPY-UTF-8-BYTES CHAR PGLOADER.PGCOPY::ADD-BYTE) ; --> LET COND IF PROGN PGLOADER.PGCOPY::ADD-BYTE PROGN SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER4 #:POSITION5) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER6 #:POSITION7) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> LET COND IF IF PROGN PGLOADER.PGCOPY::ADD-BYTE PROGN SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER8 #:POSITION9) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER10 #:POSITION11) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> LET COND IF IF IF PROGN PGLOADER.PGCOPY::ADD-BYTE PROGN SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER12 #:POSITION13) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER14 #:POSITION15) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> LET COND IF IF IF IF PROGN PGLOADER.PGCOPY::ADD-BYTE PROGN SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER16 #:POSITION17) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER18 #:POSITION19) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> LET COND IF IF IF IF IF PROGN PGLOADER.PGCOPY::ADD-BYTE PROGN SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER20 #:POSITION21) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER22 #:POSITION23) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> LET COND IF IF IF IF IF IF PROGN PGLOADER.PGCOPY::ADD-BYTE PROGN SETF ; --> LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER24 #:POSITION25) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER26 #:POSITION27) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> LET COND IF IF IF IF IF IF IF PGLOADER.PGCOPY::ADD-BYTE PROGN SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER28 #:POSITION29) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> LET COND IF IF IF IF IF IF IF IF PROGN PGLOADER.PGCOPY::ADD-BYTE PROGN ; --> SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER30 #:POSITION31) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER32 #:POSITION33) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> LET COND IF IF IF IF IF IF IF IF IF PROGN PGLOADER.PGCOPY::ADD-BYTE PROGN ; --> SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER34 #:POSITION35) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER36 #:POSITION37) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER38 #:POSITION39) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; --> LET COND IF IF IF IF IF IF IF IF IF THE PROGN PGLOADER.PGCOPY::ADD-BYTE ; --> PROGN SETF LET* ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER40 #:POSITION41) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER42 #:POSITION43) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER44 #:POSITION45) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; ==> ; (FUNCALL #'(SETF AREF) #:NEW1 #:BUFFER46 #:POSITION47) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY * ; (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY. ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/pg-copy/copy-format-tmpP7GRL47U.fasl ; compilation finished in 0:00:02.855 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/pg-copy/copy-db-write.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.PGCOPY) ; processing (DEFINE-CONDITION COPY-INIT-ERROR ...) ; processing (DEFUN DB-WRITE-BATCH ...) ; processing (DEFUN DB-WRITE-ROW ...) ; processing (DEFUN DB-WRITE-VECTOR-ROW ...) ; file: /build/reproducible-path/pgloader-3.6.2/src/pg-copy/copy-db-write.lisp ; in: DEFUN DB-WRITE-VECTOR-ROW ; (LENGTH PGLOADER.PGCOPY::ROW) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (+ 4 PGLOADER.PGCOPY::ROW-BYTES) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; (LOOP :FOR PGLOADER.PGCOPY::COL :ACROSS PGLOADER.PGCOPY::ROW ; :FOR PGLOADER.PGCOPY::I FIXNUM :FROM 1 ; :DO (IF (PGLOADER.PGCOPY::COL-NULL-P PGLOADER.PGCOPY::COL) ; (PROGN ; (PGLOADER.PGCOPY::SEND-BYTE 92) ; (PGLOADER.PGCOPY::SEND-BYTE 78)) ; (LOOP :FOR CHAR :ACROSS PGLOADER.PGCOPY::COL ; :DO (PGLOADER.PGCOPY::AS-COPY-UTF-8-BYTES CHAR ; PGLOADER.PGCOPY::SEND-BYTE))) ...) ; --> BLOCK LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE ; ==> ; (AREF #:LOOP-ACROSS-VECTOR-24 #:LOOP-ACROSS-INDEX-25) ; ; 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. ; (LOOP :FOR CHAR :ACROSS PGLOADER.PGCOPY::COL ; :DO (PGLOADER.PGCOPY::AS-COPY-UTF-8-BYTES CHAR ; PGLOADER.PGCOPY::SEND-BYTE)) ; --> BLOCK LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE ; ==> ; (AREF #:LOOP-ACROSS-VECTOR-28 #:LOOP-ACROSS-INDEX-29) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (MAP 'VECTOR ; (LAMBDA (PGLOADER.PGCOPY::COL) ; (IF (PGLOADER.PGCOPY::COL-NULL-P PGLOADER.PGCOPY::COL) ; 2 ; (PGLOADER.PGCOPY::COPY-UTF-8-BYTE-LENGTH PGLOADER.PGCOPY::COL))) ; PGLOADER.PGCOPY::ROW) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (+ PGLOADER.PGCOPY::NBCOLS (REDUCE #'+ PGLOADER.PGCOPY::COL-BYTES)) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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. ; (INCF (CL-POSTGRES::COPIER-COUNT PGLOADER.PGCOPY::COPIER)) ; --> LET* ; ==> ; (+ 1 (CL-POSTGRES::COPIER-COUNT #:COPIER36)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; (+ 4 PGLOADER.PGCOPY::ROW-BYTES) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (< PGLOADER.PGCOPY::I PGLOADER.PGCOPY::NBCOLS) ; ; 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. ; (+ PGLOADER.PGCOPY::NBCOLS (REDUCE #'+ PGLOADER.PGCOPY::COL-BYTES)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; (INCF (CL-POSTGRES::COPIER-COUNT PGLOADER.PGCOPY::COPIER)) ; --> LET* ; ==> ; (+ 1 (CL-POSTGRES::COPIER-COUNT #:COPIER36)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (CL-POSTGRES::WITH-RECONNECT-RESTART PGLOADER.CONNECTION:CONNECTION ; (CL-POSTGRES::USING-CONNECTION PGLOADER.CONNECTION:CONNECTION ; (CL-POSTGRES::WITH-SYNCING ; (CL-POSTGRES::WRITE-UINT1 CL-POSTGRES::SOCKET 100) ; (CL-POSTGRES::WRITE-UINT4 CL-POSTGRES::SOCKET ; (+ 4 PGLOADER.PGCOPY::ROW-BYTES)) ; (MACROLET (#) ; (LOOP :FOR PGLOADER.PGCOPY::COL :ACROSS PGLOADER.PGCOPY::ROW ; :FOR PGLOADER.PGCOPY::I FIXNUM :FROM 1 ; :DO # ...))))) ; --> LET LABELS ; ==> ; (#:G2 (CL-POSTGRES::ERR) ; (RESTART-CASE (ERROR CL-POSTGRES::ERR) ; (:RECONNECT NIL :REPORT "Try to reconnect" ; (CL-POSTGRES:REOPEN-DATABASE #:G0) (#:G1)))) ; ; note: Return type not fixed values, so can't use known return convention: ; * ; processing (DEFUN DB-WRITE-ESCAPED-VECTOR-ROW ...) ; file: /build/reproducible-path/pgloader-3.6.2/src/pg-copy/copy-db-write.lisp ; in: DEFUN DB-WRITE-ESCAPED-VECTOR-ROW ; (LENGTH PGLOADER.PGCOPY::ROW) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (+ 4 PGLOADER.PGCOPY::ROW-BYTES) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; (LOOP :FOR PGLOADER.PGCOPY::COL :ACROSS PGLOADER.PGCOPY::ROW ; :FOR PGLOADER.PGCOPY::I FIXNUM :FROM 1 ; :DO (IF (PGLOADER.PGCOPY::COL-NULL-P PGLOADER.PGCOPY::COL) ; (PROGN ; (PGLOADER.PGCOPY::SEND-BYTE 92) ; (PGLOADER.PGCOPY::SEND-BYTE 78)) ; (LOOP :FOR CHAR :ACROSS PGLOADER.PGCOPY::COL ; :DO (CL-POSTGRES-TRIVIAL-UTF-8::AS-UTF-8-BYTES CHAR ; PGLOADER.PGCOPY::SEND-BYTE))) ...) ; --> BLOCK LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE ; ==> ; (AREF #:LOOP-ACROSS-VECTOR-24 #:LOOP-ACROSS-INDEX-25) ; ; 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. ; (LOOP :FOR CHAR :ACROSS PGLOADER.PGCOPY::COL ; :DO (CL-POSTGRES-TRIVIAL-UTF-8::AS-UTF-8-BYTES CHAR ; PGLOADER.PGCOPY::SEND-BYTE)) ; --> BLOCK LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE ; ==> ; (AREF #:LOOP-ACROSS-VECTOR-28 #:LOOP-ACROSS-INDEX-29) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (MAP 'VECTOR ; (LAMBDA (PGLOADER.PGCOPY::COL) ; (IF (PGLOADER.PGCOPY::COL-NULL-P PGLOADER.PGCOPY::COL) ; 2 ; (CL-POSTGRES-TRIVIAL-UTF-8:UTF-8-BYTE-LENGTH ; PGLOADER.PGCOPY::COL))) ; PGLOADER.PGCOPY::ROW) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (+ PGLOADER.PGCOPY::NBCOLS (REDUCE #'+ PGLOADER.PGCOPY::COL-BYTES)) ; ; note: unable to ; open-code float conversion of first argument in mixed RATIONAL-FLOAT 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 of second argument in mixed FLOAT-RATIONAL 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 of first argument in mixed RATIONAL-(COMPLEX FLOAT) 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 of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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 of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT 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 of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT 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 of first argument in mixed SINGLE-FLOAT-(COMPLEX DOUBLE-FLOAT) 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 of second argument in mixed (COMPLEX DOUBLE-FLOAT)-SINGLE-FLOAT 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. ; (INCF (CL-POSTGRES::COPIER-COUNT PGLOADER.PGCOPY::COPIER)) ; --> LET* ; ==> ; (+ 1 (CL-POSTGRES::COPIER-COUNT #:COPIER36)) ; ; note: unable to ; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion of second argument in mixed (COMPLEX FLOAT)-RATIONAL 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. ; (+ 4 PGLOADER.PGCOPY::ROW-BYTES) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (< PGLOADER.PGCOPY::I PGLOADER.PGCOPY::NBCOLS) ; ; 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. ; (+ PGLOADER.PGCOPY::NBCOLS (REDUCE #'+ PGLOADER.PGCOPY::COL-BYTES)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=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 . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; &REST T). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT &REST T). ; etc. ; (INCF (CL-POSTGRES::COPIER-COUNT PGLOADER.PGCOPY::COPIER)) ; --> LET* ; ==> ; (+ 1 (CL-POSTGRES::COPIER-COUNT #:COPIER36)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do #1=inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; &REST T). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #2#), not a (VALUES FIXNUM &REST T). ; etc. ; (CL-POSTGRES::WITH-RECONNECT-RESTART PGLOADER.CONNECTION:CONNECTION ; (CL-POSTGRES::USING-CONNECTION PGLOADER.CONNECTION:CONNECTION ; (CL-POSTGRES::WITH-SYNCING ; (CL-POSTGRES::WRITE-UINT1 CL-POSTGRES::SOCKET 100) ; (CL-POSTGRES::WRITE-UINT4 CL-POSTGRES::SOCKET ; (+ 4 PGLOADER.PGCOPY::ROW-BYTES)) ; (MACROLET (#) ; (LOOP :FOR PGLOADER.PGCOPY::COL :ACROSS PGLOADER.PGCOPY::ROW ; :FOR PGLOADER.PGCOPY::I FIXNUM :FROM 1 ; :DO # ...))))) ; --> LET LABELS ; ==> ; (#:G2 (CL-POSTGRES::ERR) ; (RESTART-CASE (ERROR CL-POSTGRES::ERR) ; (:RECONNECT NIL :REPORT "Try to reconnect" ; (CL-POSTGRES:REOPEN-DATABASE #:G0) (#:G1)))) ; ; note: Return type not fixed values, so can't use known return convention: ; * ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/pg-copy/copy-db-write-tmp6WQCTWZY.fasl ; compilation finished in 0:00:01.111 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/pg-copy/copy-rows-in-stream.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.PGCOPY) ; processing (DEFUN STREAM-ROWS-TO-COPY ...) ; processing (DEFUN STREAM-ROW ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/pg-copy/copy-rows-in-stream-tmp1RW346KS.fasl ; compilation finished in 0:00:00.179 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/pg-copy/copy-rows-in-batch.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.PGCOPY) ; processing (DEFUN BATCH-ROWS-TO-COPY ...) ; processing (DEFUN SEND-BATCH ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/pg-copy/copy-rows-in-batch-tmpDHMOASYF.fasl ; compilation finished in 0:00:00.427 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/pg-copy/copy-rows-in-batch-through-s3.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.PGCOPY) ; processing (DEFUN BATCH-ROWS-TO-S3-THEN-COPY ...) ; processing (DEFUN PREPARE-AND-FORMAT-ROW-FOR-S3 ...) ; processing (DEFUN SEND-BATCH-THROUGH-S3 ...) ; processing (DEFUN BATCH-AS-SINGLE-VECTOR ...) ; processing (DEFUN GET-AWS-CREDENTIALS-AND-SETUP ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/pg-copy/copy-rows-in-batch-through-s3-tmpLV9XXT6H.fasl ; compilation finished in 0:00:00.659 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/pg-copy/copy-retry-batch.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.PGCOPY) ; processing (DEFUN NEXT-BATCH-ROWS ...) ; processing (DEFUN PARSE-COPY-ERROR-CONTEXT ...) ; processing (DEFUN RETRY-BATCH ...) ; processing (DEFUN COPY-PARTIAL-BATCH ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/pg-copy/copy-retry-batch-tmp49ODV8UF.fasl ; compilation finished in 0:00:00.459 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/pg-copy/copy-from-queue.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.PGCOPY) ; processing (DEFUN COPY-ROWS-FROM-QUEUE ...) ; processing (DEFUN PREPARE-COPY-PARAMETERS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/pg-copy/copy-from-queue-tmpCGWUF3C1.fasl ; compilation finished in 0:00:00.451 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/load/api.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.LOAD) ; processing (DEFGENERIC COPY-FROM ...) ; processing (DEFGENERIC COPY-TO ...) ; processing (DEFGENERIC COPY-DATABASE ...) ; processing (DEFGENERIC PREPARE-PGSQL-DATABASE ...) ; processing (DEFGENERIC COMPLETE-PGSQL-DATABASE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/load/api-tmpWYLQBKV1.fasl ; compilation finished in 0:00:00.043 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/load/copy-data.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.LOAD) ; processing (DEFMETHOD QUEUE-RAW-DATA ...) ; processing (DEFMETHOD COPY-TO ...) ; file: /build/reproducible-path/pgloader-3.6.2/src/load/copy-data.lisp ; in: DEFMETHOD COPY-TO (COPY T) ; (PGLOADER.PGSQL:FORMAT-VECTOR-ROW PGLOADER.LOAD::TEXT-FILE PGLOADER.LOAD::ROW ; (PGLOADER.SOURCES:TRANSFORMS ; PGLOADER.SOURCES:COPY)) ; ; caught STYLE-WARNING: ; The function FORMAT-VECTOR-ROW is called with three arguments, but wants exactly two. ; processing (DEFMETHOD COPY-FROM ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/load/copy-data-tmpQZJT0GSW.fasl ; compilation finished in 0:00:00.803 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/load/load-file.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.LOAD) ; processing (DEFMETHOD COPY-DATABASE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/load/load-file-tmp80IHNYG7.fasl ; compilation finished in 0:00:01.299 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/load/migrate-database.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.LOAD) ; processing (DEFMETHOD PREPARE-PGSQL-DATABASE ...) ; processing (DEFMETHOD COMPLETE-PGSQL-DATABASE ...) ; processing (DEFUN PROCESS-CATALOG ...) ; processing (DEFMETHOD COPY-DATABASE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/load/migrate-database-tmp4W6239QB.fasl ; compilation finished in 0:00:03.999 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/parse-ini.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.INI) ; processing (DEFPARAMETER *GLOBAL-SECTION* ...) ; processing (DEFSTRUCT PARAMS ...) ; processing (DEFUN PROCESS-TRUE-FALSE ...) ; processing (DEFUN READ-DEFAULT-VALUE-FOR-PARAM ...) ; processing (DEFUN READ-VALUE-FOR-PARAM ...) ; processing (DEFMETHOD SET-PARAM ...) ; processing (DEFMETHOD SET-GUCS ...) ; processing (DEFUN GET-GUCS ...) ; processing (DEFUN MERGE-GUCS ...) ; processing (DEFUN USER-DEFINED-COLUMNS ...) ; processing (DEFUN SPLIT-COLUMNS-SPECS ...) ; processing (DEFUN GET-PGSQL-COLUMN-SPECS ...) ; processing (DEFUN PARSE-COLUMNS-SPEC ...) ; processing (DEFUN PARSE-ONLY-COLS ...) ; processing (DEFUN COMPUTE-COLUMNS ...) ; processing (DEFUN PARSE-SECTION ...) ; processing (DEFUN GET-CONNECTION-PARAMS ...) ; processing (DEFUN GET-CONNECTION-STRING ...) ; processing (DEFUN READ-INI-FILE ...) ; processing (DEFUN PARSE-INI-FILE ...) ; processing (DEFUN PRINT-CSV-OPTION ...) ; processing (DEFUN WRITE-COMMAND-TO-STRING ...) ; processing (DEFUN CONVERT-INI-INTO-COMMANDS ...) ; processing (DEFUN CONVERT-INI-INTO-FILES ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/parse-ini-tmpPLIY2OU6.fasl ; compilation finished in 0:00:02.647 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/template.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.PARSER) ; processing (DEFUN APPLY-TEMPLATE ...) ; processing (DEFUN INITIALIZE-CONTEXT ...) ; processing (DEFUN READ-INI-FILE ...) ; processing (DEFMETHOD MUSTACHE::CONTEXT-GET ...) ; processing (DEFMETHOD MUSTACHE::CONTEXT-GET ...) ; processing (DEFUN CONTEXT-GET-FROM-ENVIRONMENT ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/template-tmpDQVK0IID.fasl ; compilation finished in 0:00:00.347 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/command-utils.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.PARSER) ; processing (DEFVAR *CWD* ...) ; processing (DEFVAR *DATA-EXPECTED-INLINE* ...) ; processing (DEFRULE SINGLE-LINE-COMMENT ...) ; processing (DEFRULE MULTI-LINE-COMMENT ...) ; processing (DEFRULE COMMENTS ...) ; processing (DEFRULE KEEP-A-SINGLE-WHITESPACE ...) ; processing (DEFRULE WHITESPACE ...) ; processing (DEFRULE IGNORE-WHITESPACE ...) ; processing (DEFRULE PUNCT ...) ; processing (DEFRULE NAMESTRING ...) ; processing (DEFRULE DOUBLE-QUOTED-NAMESTRING ...) ; processing (DEFRULE QUOTED-NAMESTRING ...) ; processing (DEFRULE NAME ...) ; processing (DEFRULE TRIMMED-NAME ...) ; processing (DEFRULE NAMESTRING-OR-REGEX ...) ; processing (DEFRULE MAYBE-QUOTED-NAMESTRING ...) ; processing (DEFRULE OPEN-PAREN ...) ; processing (DEFRULE CLOSE-PAREN ...) ; processing (DEFRULE COMMA-SEPARATOR ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/command-utils-tmp4IEM0NNS.fasl ; compilation finished in 0:00:00.139 WARNING: Prefix " " before " " in an ESRAP OR expression. WARNING: Prefix " " before " " in an ESRAP OR expression. ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/command-keywords.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.PARSER) ; processing (DEFMACRO DEF-KEYWORD-RULE ...) ; processing (DEF-KEYWORD-RULE "load") ; processing (DEF-KEYWORD-RULE "data") ; processing (DEF-KEYWORD-RULE "from") ; processing (DEF-KEYWORD-RULE "csv") ; processing (DEF-KEYWORD-RULE "dbf") ; processing (DEF-KEYWORD-RULE "ixf") ; processing (DEF-KEYWORD-RULE "fixed") ; processing (DEF-KEYWORD-RULE "copy") ; processing (DEF-KEYWORD-RULE "into") ; processing (DEF-KEYWORD-RULE "with") ; processing (DEF-KEYWORD-RULE "when") ; processing (DEF-KEYWORD-RULE "set") ; processing (DEF-KEYWORD-RULE "tablespace") ; processing (DEF-KEYWORD-RULE "database") ; processing (DEF-KEYWORD-RULE "messages") ; processing (DEF-KEYWORD-RULE "matches") ; processing (DEF-KEYWORD-RULE "in") ; processing (DEF-KEYWORD-RULE "directory") ; processing (DEF-KEYWORD-RULE "registering") ; processing (DEF-KEYWORD-RULE "cast") ; processing (DEF-KEYWORD-RULE "column") ; processing (DEF-KEYWORD-RULE "target") ; processing (DEF-KEYWORD-RULE "columns") ; processing (DEF-KEYWORD-RULE "type") ; processing (DEF-KEYWORD-RULE "extra") ; processing (DEF-KEYWORD-RULE "include") ; processing (DEF-KEYWORD-RULE "drop") ; processing (DEF-KEYWORD-RULE "not") ; processing (DEF-KEYWORD-RULE "to") ; processing (DEF-KEYWORD-RULE "no") ; processing (DEF-KEYWORD-RULE "null") ; processing (DEF-KEYWORD-RULE "default") ; processing (DEF-KEYWORD-RULE "typemod") ; processing (DEF-KEYWORD-RULE "using") ; processing (DEF-KEYWORD-RULE "on") ; processing (DEF-KEYWORD-RULE "error") ; processing (DEF-KEYWORD-RULE "stop") ; processing (DEF-KEYWORD-RULE "resume") ; processing (DEF-KEYWORD-RULE "next") ; processing (DEF-KEYWORD-RULE "parameters") ; processing (DEF-KEYWORD-RULE "workers") ; processing (DEF-KEYWORD-RULE "batch") ; processing (DEF-KEYWORD-RULE "rows") ; processing (DEF-KEYWORD-RULE "prefetch") ; processing (DEF-KEYWORD-RULE "size") ; processing (DEF-KEYWORD-RULE "concurrency") ; processing (DEF-KEYWORD-RULE "max") ; processing (DEF-KEYWORD-RULE "parallel") ; processing (DEF-KEYWORD-RULE "reject") ; processing (DEF-KEYWORD-RULE "file") ; processing (DEF-KEYWORD-RULE "log") ; processing (DEF-KEYWORD-RULE "level") ; processing (DEF-KEYWORD-RULE "encoding") ; processing (DEF-KEYWORD-RULE "timezone") ; processing (DEF-KEYWORD-RULE "decoding") ; processing (DEF-KEYWORD-RULE "truncate") ; processing (DEF-KEYWORD-RULE "disable") ; processing (DEF-KEYWORD-RULE "triggers") ; processing (DEF-KEYWORD-RULE "lines") ; processing (DEF-KEYWORD-RULE "having") ; processing (DEF-KEYWORD-RULE "fields") ; processing (DEF-KEYWORD-RULE "optionally") ; processing (DEF-KEYWORD-RULE "enclosed") ; processing (DEF-KEYWORD-RULE "by") ; processing (DEF-KEYWORD-RULE "escaped") ; processing (DEF-KEYWORD-RULE "terminated") ; processing (DEF-KEYWORD-RULE "escape") ; processing (DEF-KEYWORD-RULE "mode") ; processing (DEF-KEYWORD-RULE "nullif") ; processing (DEF-KEYWORD-RULE "blank") ; processing (DEF-KEYWORD-RULE "trim") ; processing (DEF-KEYWORD-RULE "both") ; processing (DEF-KEYWORD-RULE "left") ; processing (DEF-KEYWORD-RULE "right") ; processing (DEF-KEYWORD-RULE "whitespace") ; processing (DEF-KEYWORD-RULE "from") ; processing (DEF-KEYWORD-RULE "for") ; processing (DEF-KEYWORD-RULE "skip") ; processing (DEF-KEYWORD-RULE "header") ; processing (DEF-KEYWORD-RULE "null") ; processing (DEF-KEYWORD-RULE "if") ; processing (DEF-KEYWORD-RULE "as") ; processing (DEF-KEYWORD-RULE "blanks") ; processing (DEF-KEYWORD-RULE "date") ; processing (DEF-KEYWORD-RULE "format") ; processing (DEF-KEYWORD-RULE "keep") ; processing (DEF-KEYWORD-RULE "trim") ; processing (DEF-KEYWORD-RULE "unquoted") ; processing (DEF-KEYWORD-RULE "delimiter") ; processing (DEF-KEYWORD-RULE "distribute") ; processing (DEF-KEYWORD-RULE "reference") ; processing (DEF-KEYWORD-RULE "schema") ; processing (DEF-KEYWORD-RULE "schemas") ; processing (DEF-KEYWORD-RULE "only") ; processing (DEF-KEYWORD-RULE "drop") ; processing (DEF-KEYWORD-RULE "alter") ; processing (DEF-KEYWORD-RULE "create") ; processing (DEF-KEYWORD-RULE "rename") ; processing (DEF-KEYWORD-RULE "materialize") ; processing (DEF-KEYWORD-RULE "reset") ; processing (DEF-KEYWORD-RULE "table") ; processing (DEF-KEYWORD-RULE "name") ; processing (DEF-KEYWORD-RULE "names") ; processing (DEF-KEYWORD-RULE "tables") ; processing (DEF-KEYWORD-RULE "views") ; processing (DEF-KEYWORD-RULE "index") ; processing (DEF-KEYWORD-RULE "indexes") ; processing (DEF-KEYWORD-RULE "preserve") ; processing (DEF-KEYWORD-RULE "uniquify") ; processing (DEF-KEYWORD-RULE "sequences") ; processing (DEF-KEYWORD-RULE "foreign") ; processing (DEF-KEYWORD-RULE "keys") ; processing (DEF-KEYWORD-RULE "downcase") ; processing (DEF-KEYWORD-RULE "quote") ; processing (DEF-KEYWORD-RULE "snake_case") ; processing (DEF-KEYWORD-RULE "identifiers") ; processing (DEF-KEYWORD-RULE "including") ; processing (DEF-KEYWORD-RULE "excluding") ; processing (DEF-KEYWORD-RULE "like") ; processing (DEF-KEYWORD-RULE "multiple") ; processing (DEF-KEYWORD-RULE "single") ; processing (DEF-KEYWORD-RULE "reader") ; processing (DEF-KEYWORD-RULE "readers") ; processing (DEF-KEYWORD-RULE "per") ; processing (DEF-KEYWORD-RULE "thread") ; processing (DEF-KEYWORD-RULE "range") ; processing (DEF-KEYWORD-RULE "signed") ; processing (DEF-KEYWORD-RULE "unsigned") ; processing (DEF-KEYWORD-RULE "archive") ; processing (DEF-KEYWORD-RULE "before") ; processing (DEF-KEYWORD-RULE "after") ; processing (DEF-KEYWORD-RULE "finally") ; processing (DEF-KEYWORD-RULE "and") ; processing (DEF-KEYWORD-RULE "do") ; processing (DEF-KEYWORD-RULE "execute") ; processing (DEF-KEYWORD-RULE "filename") ; processing (DEF-KEYWORD-RULE "filenames") ; processing (DEF-KEYWORD-RULE "matching") ; processing (DEF-KEYWORD-RULE "first") ; processing (DEF-KEYWORD-RULE "all") ; processing (DEFRULE KW-AUTO-INCREMENT ...) ; processing (DEFRULE KW-ON-UPDATE-CURRENT-TIMESTAMP ...) ; processing (DEFRULE KW-POSTGRESQL ...) ; processing (DEFRULE KW-MYSQL ...) ; processing (DEFRULE KW-MSSQL ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/command-keywords-tmpIBGLG2RO.fasl ; compilation finished in 0:00:01.527 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/command-regexp.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.PARSER) ; processing (DEFUN PROCESS-QUOTED-REGEX ...) ; processing (DEFRULE SINGLE-QUOTED-REGEX ...) ; processing (DEFRULE DOUBLE-QUOTED-REGEX ...) ; processing (DEFRULE PARENS-QUOTED-REGEX ...) ; processing (DEFRULE BRACES-QUOTED-REGEX ...) ; processing (DEFRULE CHEVRON-QUOTED-REGEX ...) ; processing (DEFRULE BRACKETS-QUOTED-REGEX ...) ; processing (DEFRULE SLASH-QUOTED-REGEX ...) ; processing (DEFRULE PIPE-QUOTED-REGEX ...) ; processing (DEFRULE SHARP-QUOTED-REGEX ...) ; processing (DEFRULE QUOTED-REGEX ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/command-regexp-tmpEGCLAL00.fasl ; compilation finished in 0:00:00.111 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/parse-pgpass.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.PARSER) ; processing (DEFSTRUCT PGPASS ...) ; processing (DEFUN PGPASS-CHAR-P ...) ; processing (DEFRULE PGPASS-ESCAPED-CHAR ...) ; processing (DEFRULE PGPASS-IPV6-HOSTNAME ...) ; processing (DEFRULE PGPASS-ENTRY ...) ; processing (DEFRULE PGPASS-LINE ...) ; processing (DEFUN GET-PGPASS-FILENAME ...) ; processing (DEFUN PARSE-PGPASS-FILE ...) ; processing (DEFUN MATCH-HOSTNAME ...) ; processing (DEFUN MATCH-PGPASS ...) ; processing (DEFUN MATCH-PGPASS-ENTRIES ...) ; processing (DEFUN MATCH-PGPASS-FILE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/parse-pgpass-tmpSZHJVKDY.fasl ; compilation finished in 0:00:00.287 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/command-db-uri.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.PARSER) ; processing (DEFRULE DSN-PORT ...) ; processing (DEFRULE DOUBLED-AT-SIGN ...) ; processing (DEFRULE DOUBLED-COLON ...) ; processing (DEFRULE PASSWORD ...) ; processing (DEFRULE USERNAME ...) ; processing (DEFRULE DSN-USER-PASSWORD ...) ; processing (DEFUN HEXDIGIT-CHAR-P ...) ; processing (DEFRULE IPV4-PART ...) ; processing (DEFRULE IPV4 ...) ; processing (DEFRULE IPV6 ...) ; processing (DEFUN SOCKET-DIRECTORY-CHARACTER-P ...) ; processing (DEFRULE SOCKET-DIRECTORY ...) ; processing (DEFRULE NETWORK-LABEL-LETTERS-DIGIT ...) ; processing (DEFRULE NETWORK-LABEL-WITH-HYPHEN ...) ; processing (DEFRULE NETWORK-LABEL-NO-HYPHEN ...) ; processing (DEFRULE NETWORK-LABEL ...) ; processing (DEFRULE NETWORK-HOSTNAME ...) ; processing (DEFRULE HOSTNAME ...) ; processing (DEFUN PROCESS-HOSTNAME ...) ; processing (DEFRULE DSN-HOSTNAME ...) ; processing (DEFRULE DSN-DBNAME ...) ; processing (DEFRULE DSN-OPTION-SSL-DISABLE ...) ; processing (DEFRULE DSN-OPTION-SSL-ALLOW ...) ; processing (DEFRULE DSN-OPTION-SSL-PREFER ...) ; processing (DEFRULE DSN-OPTION-SSL-REQUIRE ...) ; processing (DEFRULE DSN-OPTION-SSL ...) ; processing (DEFUN GET-PGSSLMODE ...) ; processing (DEFRULE QUALIFIED-TABLE-NAME ...) ; processing (DEFRULE DSN-TABLE-NAME ...) ; processing (DEFRULE DSN-OPTION-TABLE-NAME ...) ; processing (DEFRULE URI-PARAM ...) ; processing (DEFMACRO MAKE-DSN-OPTION-RULE ...) ; processing (MAKE-DSN-OPTION-RULE DSN-OPTION-HOST ...) ; processing (MAKE-DSN-OPTION-RULE DSN-OPTION-PORT ...) ; processing (MAKE-DSN-OPTION-RULE DSN-OPTION-DBNAME ...) ; processing (MAKE-DSN-OPTION-RULE DSN-OPTION-USER ...) ; processing (MAKE-DSN-OPTION-RULE DSN-OPTION-PASS ...) ; processing (DEFRULE DSN-OPTION ...) ; processing (DEFRULE ANOTHER-DSN-OPTION ...) ; processing (DEFRULE DSN-OPTIONS ...) ; processing (DEFRULE PGSQL-PREFIX ...) ; processing (DEFRULE PGSQL-URI ...) ; processing (DEFRULE TARGET ...) ; processing (DEFUN PGSQL-CONNECTION-BINDINGS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/command-db-uri-tmpUAHIESL5.fasl ; compilation finished in 0:00:00.891 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/command-source.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.PARSER) ; processing (DEFUN FILENAME-CHARACTER-P ...) ; processing (DEFRULE STDIN ...) ; processing (DEFRULE INLINE ...) ; processing (DEFRULE FILENAME ...) ; processing (DEFRULE QUOTED-FILENAME ...) ; processing (DEFRULE MAYBE-QUOTED-FILENAME ...) ; processing (DEFRULE HTTP-URI ...) ; processing (DEFRULE MAYBE-QUOTED-FILENAME-OR-HTTP-URI ...) ; processing (DEFRULE FILENAME-OR-HTTP-URI ...) ; processing (DEFRULE SOURCE-URI ...) ; processing (DEFRULE LOAD-FROM ...) ; processing (DEFRULE SOURCE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/command-source-tmpW9B68D3X.fasl ; compilation finished in 0:00:00.255 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/command-options.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.PARSER) ; processing (DEFUN OPTNAME-CHAR-P ...) ; processing (DEFRULE OPTNAME-ELEMENT ...) ; processing (DEFRULE ANOTHER-OPTNAME-ELEMENT ...) ; processing (DEFRULE OPTNAME ...) ; processing (DEFUN OPTVALUE-CHAR-P ...) ; processing (DEFRULE OPTVALUE ...) ; processing (DEFRULE EQUAL-SIGN ...) ; processing (DEFRULE OPTION-WORKERS ...) ; processing (DEFRULE OPTION-CONCURRENCY ...) ; processing (DEFRULE OPTION-MAX-PARALLEL-CREATE-INDEX ...) ; processing (DEFRULE OPTION-BATCH-ROWS ...) ; processing (DEFRULE BYTE-SIZE-MULTIPLIER ...) ; processing (DEFRULE BYTE-SIZE-UNIT ...) ; processing (DEFRULE BATCH-SIZE ...) ; processing (DEFRULE OPTION-BATCH-SIZE ...) ; processing (DEFRULE OPTION-PREFETCH-ROWS ...) ; processing (DEFRULE OPTION-ROWS-PER-RANGE ...) ; processing (DEFUN BATCH-CONTROL-BINDINGS ...) ; processing (DEFUN IDENTIFIER-CASE-BINDING ...) ; processing (DEFUN REMOVE-BATCH-CONTROL-OPTION ...) ; processing (DEFMACRO MAKE-OPTION-RULE ...) ; processing (MAKE-OPTION-RULE INCLUDE-DROP ...) ; processing (MAKE-OPTION-RULE TRUNCATE ...) ; processing (MAKE-OPTION-RULE DISABLE-TRIGGERS ...) ; processing (MAKE-OPTION-RULE DROP-INDEXES ...) ; processing (MAKE-OPTION-RULE CREATE-TABLES ...) ; processing (MAKE-OPTION-RULE CREATE-INDEXES ...) ; processing (MAKE-OPTION-RULE RESET-SEQUENCES ...) ; processing (MAKE-OPTION-RULE FOREIGN-KEYS ...) ; processing (DEFRULE OPTION-DROP-SCHEMA ...) ; processing (DEFRULE OPTION-REINDEX ...) ; processing (DEFRULE OPTION-SINGLE-READER ...) ; processing (DEFRULE OPTION-MULTIPLE-READERS ...) ; processing (DEFRULE OPTION-SCHEMA-ONLY ...) ; processing (DEFRULE OPTION-DATA-ONLY ...) ; processing (DEFRULE OPTION-ON-ERROR-STOP ...) ; processing (DEFRULE OPTION-ON-ERROR-RESUME-NEXT ...) ; processing (DEFRULE OPTION-IDENTIFIERS-CASE ...) ; processing (DEFRULE OPTION-INDEX-NAMES ...) ; processing (DEFRULE OPTION-ENCODING ...) ; processing (DEFRULE COMMA ...) ; processing (DEFUN FLATTEN-OPTION-LIST ...) ; processing (DEFRULE GENERIC-OPTNAME ...) ; processing (DEFRULE GENERIC-VALUE ...) ; processing (DEFRULE GENERIC-OPTION ...) ; processing (DEFRULE ANOTHER-GENERIC-OPTION ...) ; processing (DEFRULE GENERIC-OPTION-LIST ...) ; processing (DEFRULE GUCS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/command-options-tmpIEKBGFG3.fasl ; compilation finished in 0:00:01.215 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/command-sql-block.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.PARSER) ; processing (DEFRULE DOUBLE-DOLLAR ...) ; processing (DEFRULE DOLLAR-QUOTED ...) ; processing (DEFRULE ANOTHER-DOLLAR-QUOTED ...) ; processing (DEFRULE DOLLAR-QUOTED-LIST ...) ; processing (DEFRULE SQL-FILE ...) ; processing (DEFRULE LOAD-DO ...) ; processing (DEFRULE LOAD-EXECUTE ...) ; processing (DEFRULE BEFORE-LOAD ...) ; processing (DEFRULE FINALLY ...) ; processing (DEFRULE AFTER-LOAD ...) ; processing (DEFRULE AFTER-SCHEMA ...) ; processing (DEFUN SQL-CODE-BLOCK ...) ; processing (DEFUN EXECUTE-SQL-CODE-BLOCK ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/command-sql-block-tmpK26E5ZH.fasl ; compilation finished in 0:00:00.531 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/command-sexp.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.PARSER) ; processing (DEFUN NOT-DOUBLEQUOTE ...) ; processing (DEFUN SYMBOL-CHARACTER-P ...) ; processing (DEFUN SYMBOL-FIRST-CHARACTER-P ...) ; processing (DEFRULE SEXP-SYMBOL ...) ; processing (DEFRULE SEXP-CHAR ...) ; processing (DEFRULE SEXP-STRING-CHAR ...) ; processing (DEFRULE SEXP-STRING ...) ; processing (DEFRULE SEXP-INTEGER ...) ; processing (DEFRULE SEXP-LIST ...) ; processing (DEFRULE SEXP-ATOM ...) ; processing (DEFRULE SEXP ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/command-sexp-tmpVCL2WD00.fasl ; compilation finished in 0:00:00.291 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/command-csv.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.PARSER) ; processing (DEFRULE HEX-CHAR-CODE ...) ; processing (DEFRULE TAB-SEPARATOR ...) ; processing (DEFRULE BACKSLASH-SEPARATOR ...) ; processing (DEFRULE SINGLE-QUOTE-SEPARATOR ...) ; processing (DEFRULE OTHER-CHAR-SEPARATOR ...) ; processing (DEFRULE SEPARATOR ...) ; processing (DEFRULE OPTION-SKIP-HEADER ...) ; processing (DEFRULE OPTION-CSV-HEADER ...) ; processing (DEFRULE OPTION-FIELDS-ENCLOSED-BY ...) ; processing (DEFRULE OPTION-FIELDS-NOT-ENCLOSED ...) ; processing (DEFRULE QUOTE-QUOTE ...) ; processing (DEFRULE BACKSLASH-QUOTE ...) ; processing (DEFRULE ESCAPED-QUOTE-NAME ...) ; processing (DEFRULE ESCAPED-QUOTE-LITERAL ...) ; processing (DEFRULE ESCAPED-QUOTE ...) ; processing (DEFRULE ESCAPE-MODE-QUOTE ...) ; processing (DEFRULE ESCAPE-MODE-FOLLOWING ...) ; processing (DEFRULE ESCAPE-MODE ...) ; processing (DEFRULE OPTION-FIELDS-ESCAPED-BY ...) ; processing (DEFRULE OPTION-TERMINATED-BY ...) ; processing (DEFRULE OPTION-FIELDS-TERMINATED-BY ...) ; processing (DEFRULE OPTION-LINES-TERMINATED-BY ...) ; processing (DEFRULE OPTION-KEEP-UNQUOTED-BLANKS ...) ; processing (DEFRULE OPTION-TRIM-UNQUOTED-BLANKS ...) ; processing (DEFRULE OPTION-CSV-ESCAPE-MODE ...) ; processing (DEFRULE CSV-OPTION ...) ; processing (DEFRULE CSV-OPTIONS ...) ; processing (DEFRULE SINGLE-QUOTED-STRING ...) ; processing (DEFRULE DOUBLE-QUOTED-STRING ...) ; processing (DEFRULE QUOTED-STRING ...) ; processing (DEFRULE OPTION-DATE-FORMAT ...) ; processing (DEFRULE BLANKS ...) ; processing (DEFRULE OPTION-NULL-IF ...) ; processing (DEFRULE OPTION-TRIM-BOTH-WHITESPACE ...) ; processing (DEFRULE OPTION-TRIM-LEFT-WHITESPACE ...) ; processing (DEFRULE OPTION-TRIM-RIGHT-WHITESPACE ...) ; processing (DEFRULE CSV-FIELD-OPTION ...) ; processing (DEFRULE ANOTHER-CSV-FIELD-OPTION ...) ; processing (DEFRULE OPEN-SQUARE-BRACKET ...) ; processing (DEFRULE CLOSE-SQUARE-BRACKET ...) ; processing (DEFRULE CSV-FIELD-OPTION-LIST ...) ; processing (DEFRULE CSV-FIELD-OPTIONS ...) ; processing (DEFRULE CSV-BARE-FIELD-NAME ...) ; processing (DEFRULE CSV-QUOTED-FIELD-NAME ...) ; processing (DEFRULE CSV-FIELD-NAME ...) ; processing (DEFRULE CSV-SOURCE-FIELD ...) ; processing (DEFRULE ANOTHER-CSV-SOURCE-FIELD ...) ; processing (DEFRULE CSV-SOURCE-FIELDS ...) ; processing (DEFRULE HAVING-FIELDS ...) ; processing (DEFRULE CSV-SOURCE-FIELD-LIST ...) ; processing (DEFRULE COLUMN-NAME ...) ; processing (DEFRULE COLUMN-TYPE ...) ; processing (DEFRULE COLUMN-EXPRESSION ...) ; processing (DEFRULE CSV-TARGET-COLUMN ...) ; processing (DEFRULE ANOTHER-CSV-TARGET-COLUMN ...) ; processing (DEFRULE CSV-TARGET-COLUMNS ...) ; processing (DEFRULE TARGET-COLUMNS ...) ; processing (DEFRULE CSV-TARGET-COLUMN-LIST ...) ; processing (DEFRULE CSV-TARGET-TABLE ...) ; processing (DEFUN FIND-ENCODING-BY-NAME-OR-ALIAS ...) ; processing (DEFRULE ENCODING ...) ; processing (DEFRULE FILE-ENCODING ...) ; processing (DEFRULE FIRST-FILENAME-MATCHING ...) ; processing (DEFRULE ALL-FILENAME-MATCHING ...) ; processing (DEFRULE IN-DIRECTORY ...) ; processing (DEFRULE FILENAME-MATCHING ...) ; processing (DEFRULE CSV-URI ...) ; processing (DEFRULE CSV-FILE-SOURCE ...) ; processing (DEFRULE CSV-SOURCE ...) ; processing (DEFUN LIST-SYMBOLS ...) ; processing (DEFRULE LOAD-CSV-FILE-OPTIONAL-CLAUSES ...) ; processing (DEFRULE LOAD-CSV-FILE-COMMAND ...) ; processing (DEFUN LISP-CODE-FOR-CSV-DRY-RUN ...) ; processing (DEFUN LISP-CODE-FOR-LOADING-FROM-CSV ...) ; processing (DEFRULE LOAD-CSV-FILE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/command-csv-tmpZQ9PPEAP.fasl ; compilation finished in 0:00:01.875 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/command-ixf.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.PARSER) ; processing (DEFRULE TZ-UTC ...) ; processing (DEFRULE TZ-GMT ...) ; processing (DEFRULE TZ-NAME ...) ; processing (DEFRULE OPTION-TIMEZONE ...) ; processing (DEFRULE IXF-OPTION ...) ; processing (DEFRULE IXF-OPTIONS ...) ; processing (DEFRULE IXF-URI ...) ; processing (DEFRULE IXF-FILE-SOURCE ...) ; processing (DEFRULE IXF-SOURCE ...) ; processing (DEFRULE LOAD-IXF-OPTIONAL-CLAUSES ...) ; processing (DEFRULE LOAD-IXF-COMMAND ...) ; processing (DEFUN LISP-CODE-FOR-LOADING-FROM-IXF ...) ; processing (DEFRULE LOAD-IXF-FILE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/command-ixf-tmpNRJPZMRB.fasl ; compilation finished in 0:00:00.335 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/command-fixed.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.PARSER) ; processing (DEFRULE OPTION-FIXED-HEADER ...) ; processing (DEFRULE HEX-NUMBER ...) ; processing (DEFRULE DEC-NUMBER ...) ; processing (DEFRULE NUMBER ...) ; processing (DEFRULE FIELD-START-POSITION ...) ; processing (DEFRULE FIXED-FIELD-LENGTH ...) ; processing (DEFRULE FIXED-SOURCE-FIELD ...) ; processing (DEFRULE ANOTHER-FIXED-SOURCE-FIELD ...) ; processing (DEFRULE FIXED-SOURCE-FIELDS ...) ; processing (DEFRULE FIXED-SOURCE-FIELD-LIST ...) ; processing (DEFRULE FIXED-OPTION ...) ; processing (DEFRULE FIXED-OPTIONS ...) ; processing (DEFRULE FIXED-URI ...) ; processing (DEFRULE FIXED-FILE-SOURCE ...) ; processing (DEFRULE FIXED-SOURCE ...) ; processing (DEFRULE LOAD-FIXED-COLS-FILE-OPTIONAL-CLAUSES ...) ; processing (DEFRULE LOAD-FIXED-COLS-FILE-COMMAND ...) ; processing (DEFUN LISP-CODE-FOR-LOADING-FROM-FIXED ...) ; processing (DEFRULE LOAD-FIXED-COLS-FILE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/command-fixed-tmpPP68IXIC.fasl ; compilation finished in 0:00:00.735 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/command-copy.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.PARSER) ; processing (DEFRULE COPY-SOURCE-FIELD ...) ; processing (DEFRULE ANOTHER-COPY-SOURCE-FIELD ...) ; processing (DEFRULE COPY-SOURCE-FIELDS ...) ; processing (DEFRULE COPY-SOURCE-FIELD-LIST ...) ; processing (DEFRULE OPTION-DELIMITER ...) ; processing (DEFRULE OPTION-NULL ...) ; processing (DEFRULE COPY-OPTION ...) ; processing (DEFRULE COPY-OPTIONS ...) ; processing (DEFRULE COPY-URI ...) ; processing (DEFRULE COPY-FILE-SOURCE ...) ; processing (DEFRULE COPY-SOURCE ...) ; processing (DEFRULE LOAD-COPY-FILE-OPTIONAL-CLAUSES ...) ; processing (DEFRULE LOAD-COPY-FILE-COMMAND ...) ; processing (DEFUN LISP-CODE-FOR-LOADING-FROM-COPY ...) ; processing (DEFRULE LOAD-COPY-FILE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/command-copy-tmpR43VJ9D9.fasl ; compilation finished in 0:00:00.451 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/command-dbf.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.PARSER) ; processing (DEFRULE OPTION-CREATE-TABLE ...) ; processing (DEFRULE QUOTED-TABLE-NAME ...) ; processing (DEFRULE OPTION-TABLE-NAME ...) ; processing (DEFRULE DBF-OPTION ...) ; processing (DEFRULE DBF-OPTIONS ...) ; processing (DEFRULE DBF-URI ...) ; processing (DEFRULE DBF-FILE-SOURCE ...) ; processing (DEFRULE DBF-SOURCE ...) ; processing (DEFRULE LOAD-DBF-OPTIONAL-CLAUSES ...) ; processing (DEFRULE DBF-FILE-ENCODING ...) ; processing (DEFRULE LOAD-DBF-COMMAND ...) ; processing (DEFUN LISP-CODE-FOR-DBF-DRY-RUN ...) ; processing (DEFUN LISP-CODE-FOR-LOADING-FROM-DBF ...) ; processing (DEFRULE LOAD-DBF-FILE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/command-dbf-tmpRFKXLIA4.fasl ; compilation finished in 0:00:00.379 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/command-cast-rules.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.PARSER) ; processing (DEFRULE CAST-TYPEMOD-GUARD ...) ; processing (DEFRULE CAST-DEFAULT-GUARD ...) ; processing (DEFRULE CAST-UNSIGNED-GUARD ...) ; processing (DEFRULE CAST-SIGNED-GUARD ...) ; processing (DEFRULE CAST-SOURCE-EXTRA ...) ; processing (DEFRULE CAST-TYPE-NAME ...) ; processing (DEFRULE CAST-SOURCE-TYPE ...) ; processing (DEFRULE TABLE-COLUMN-NAME ...) ; processing (DEFRULE CAST-SOURCE-COLUMN ...) ; processing (DEFRULE CAST-SOURCE-EXTRA-OR-GUARD ...) ; processing (DEFRULE CAST-SOURCE ...) ; processing (DEFRULE CAST-TO-TYPE ...) ; processing (DEFRULE CAST-KEEP-DEFAULT ...) ; processing (DEFRULE CAST-KEEP-TYPEMOD ...) ; processing (DEFRULE CAST-KEEP-NOT-NULL ...) ; processing (DEFRULE CAST-DROP-DEFAULT ...) ; processing (DEFRULE CAST-DROP-TYPEMOD ...) ; processing (DEFRULE CAST-DROP-NOT-NULL ...) ; processing (DEFRULE CAST-SET-NOT-NULL ...) ; processing (DEFRULE CAST-KEEP-EXTRA ...) ; processing (DEFRULE CAST-DROP-EXTRA ...) ; processing (DEFRULE CAST-DEF ...) ; processing (DEFUN FUNCTION-NAME-CHARACTER-P ...) ; processing (DEFRULE FUNCTION-NAME ...) ; processing (DEFRULE PACKAGE-AND-FUNCTION-NAMES ...) ; processing (DEFRULE MAYBE-QUALIFIED-FUNCTION-NAME ...) ; processing (DEFRULE TRANSFORM-EXPRESSION ...) ; processing (DEFRULE CAST-FUNCTION ...) ; processing (DEFUN FIX-TARGET-TYPE ...) ; processing (DEFRULE CAST-RULE ...) ; processing (DEFRULE ANOTHER-CAST-RULE ...) ; processing (DEFRULE CAST-RULE-LIST ...) ; processing (DEFRULE CASTS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/command-cast-rules-tmpULFHDN08.fasl ; compilation finished in 0:00:00.467 WARNING: Prefix ":" before "::" in an ESRAP OR expression. ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/command-materialize-views.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.PARSER) ; processing (DEFRULE VIEW-NAME ...) ; processing (DEFRULE VIEW-SQL ...) ; processing (DEFRULE VIEW-DEFINITION ...) ; processing (DEFRULE ANOTHER-VIEW-DEFINITION ...) ; processing (DEFRULE VIEWS-LIST ...) ; processing (DEFRULE MATERIALIZE-ALL-VIEWS ...) ; processing (DEFRULE MATERIALIZE-VIEW-LIST ...) ; processing (DEFRULE MATERIALIZE-VIEWS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/command-materialize-views-tmpOPRDPHFK.fasl ; compilation finished in 0:00:00.139 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/command-alter-table.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.PARSER) ; processing (DEFRULE MATCH-RULE-TARGET-REGEX ...) ; processing (DEFRULE MATCH-RULE-TARGET-STRING ...) ; processing (DEFRULE MATCH-RULE-TARGET ...) ; processing (DEFRULE ANOTHER-MATCH-RULE-TARGET ...) ; processing (DEFRULE FILTER-LIST-MATCHING ...) ; processing (DEFRULE ALTER-TABLE-NAMES-MATCHING ...) ; processing (DEFRULE IN-SCHEMA ...) ; processing (DEFRULE RENAME-TO ...) ; processing (DEFRULE SET-SCHEMA ...) ; processing (DEFRULE SET-STORAGE-PARAMETERS ...) ; processing (DEFRULE SET-TABLESPACE ...) ; processing (DEFRULE ALTER-TABLE-ACTION ...) ; processing (DEFRULE ALTER-TABLE-COMMAND ...) ; processing (DEFRULE ALTER-TABLE ...) ; processing (DEFRULE ALTER-SCHEMA-RENAME-TO ...) ; processing (DEFRULE ALTER-SCHEMA ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/command-alter-table-tmp8WFA6KMU.fasl ; compilation finished in 0:00:00.411 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/command-distribute.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.PARSER) ; processing (DEFUN CREATE-TABLE-FROM-DSN-TABLE-NAME ...) ; processing (DEFRULE DISTRIBUTE-REFERENCE ...) ; processing (DEFRULE DISTRIBUTE-USING ...) ; processing (DEFRULE DISTRIBUTE-FROM-TABLENAME ...) ; processing (DEFRULE MAYBE-QUALIFIED-DIST-FROM-TABLE-NAME ...) ; processing (DEFRULE DISTRIBUTE-FROM-LIST ...) ; processing (DEFRULE DISTRIBUTE-USING-FROM ...) ; processing (DEFRULE DISTRIBUTE-COMMANDS ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/command-distribute-tmpZIM0NZGF.fasl ; compilation finished in 0:00:00.307 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/command-mysql.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.PARSER) ; processing (DEFRULE MYSQL-OPTION ...) ; processing (DEFRULE MYSQL-OPTIONS ...) ; processing (DEFRULE INCLUDING-MATCHING ...) ; processing (DEFRULE EXCLUDING-MATCHING ...) ; processing (DEFRULE DECODING-TABLE-AS ...) ; processing (DEFRULE DECODING-TABLES-AS ...) ; processing (DEFRULE MYSQL-GUCS ...) ; processing (DEFRULE LOAD-MYSQL-OPTIONAL-CLAUSES ...) ; processing (DEFRULE MYSQL-PREFIX ...) ; processing (DEFRULE MYSQL-DSN-OPTION-USESSL-TRUE ...) ; processing (DEFRULE MYSQL-DSN-OPTION-USESSL-FALSE ...) ; processing (DEFRULE MYSQL-DSN-OPTION-USESSL ...) ; processing (DEFRULE MYSQL-DSN-OPTION ...) ; processing (DEFRULE MYSQL-DSN-OPTIONS ...) ; processing (DEFRULE MYSQL-URI ...) ; processing (DEFRULE MYSQL-SOURCE ...) ; processing (DEFRULE LOAD-MYSQL-COMMAND ...) ; processing (DEFUN LISP-CODE-FOR-MYSQL-DRY-RUN ...) ; processing (DEFUN LISP-CODE-FOR-LOADING-FROM-MYSQL ...) ; processing (DEFRULE LOAD-MYSQL-DATABASE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/command-mysql-tmp3R1UUX74.fasl ; compilation finished in 0:00:00.871 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/command-including-like.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.PARSER) ; processing (DEFRULE LIKE-EXPRESSION ...) ; processing (DEFRULE ANOTHER-LIKE-EXPRESSION ...) ; processing (DEFRULE FILTER-LIST-LIKE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/command-including-like-tmpJE96SV6A.fasl ; compilation finished in 0:00:00.059 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/command-mssql.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.PARSER) ; processing (MAKE-OPTION-RULE CREATE-SCHEMAS ...) ; processing (DEFRULE MSSQL-OPTION ...) ; processing (DEFRULE MSSQL-OPTIONS ...) ; processing (DEFRULE INCLUDING-IN-SCHEMA ...) ; processing (DEFRULE INCLUDING-LIKE-IN-SCHEMA ...) ; processing (DEFRULE EXCLUDING-IN-SCHEMA ...) ; processing (DEFRULE EXCLUDING-LIKE-IN-SCHEMA ...) ; processing (DEFRULE MSSQL-GUCS ...) ; processing (DEFRULE LOAD-MSSQL-OPTIONAL-CLAUSES ...) ; processing (DEFRULE MSSQL-PREFIX ...) ; processing (DEFRULE MSSQL-URI ...) ; processing (DEFRULE MSSQL-SOURCE ...) ; processing (DEFRULE LOAD-MSSQL-COMMAND ...) ; processing (DEFUN LISP-CODE-FOR-MSSQL-DRY-RUN ...) ; processing (DEFUN LISP-CODE-FOR-LOADING-FROM-MSSQL ...) ; processing (DEFRULE LOAD-MSSQL-DATABASE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/command-mssql-tmpM126WEAV.fasl ; compilation finished in 0:00:00.547 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/command-sqlite.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.PARSER) ; processing (DEFRULE SQLITE-OPTION ...) ; processing (DEFRULE SQLITE-OPTIONS ...) ; processing (DEFRULE INCLUDING-LIKE ...) ; processing (DEFRULE EXCLUDING-LIKE ...) ; processing (DEFRULE SQLITE-DB-URI ...) ; processing (DEFRULE SQLITE-URI ...) ; processing (DEFRULE SQLITE-SOURCE ...) ; processing (DEFRULE LOAD-SQLITE-OPTIONAL-CLAUSES ...) ; processing (DEFRULE LOAD-SQLITE-COMMAND ...) ; processing (DEFUN LISP-CODE-FOR-SQLITE-DRY-RUN ...) ; processing (DEFUN LISP-CODE-FOR-LOADING-FROM-SQLITE ...) ; processing (DEFRULE LOAD-SQLITE-DATABASE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/command-sqlite-tmpS2HNWOVW.fasl ; compilation finished in 0:00:00.391 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/command-pgsql.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.PARSER) ; processing (DEFRULE PGSQL-OPTION ...) ; processing (DEFRULE PGSQL-OPTIONS ...) ; processing (DEFRULE INCLUDING-MATCHING-IN-SCHEMA-FILTER ...) ; processing (DEFRULE INCLUDING-MATCHING-IN-SCHEMA ...) ; processing (DEFRULE EXCLUDING-MATCHING-IN-SCHEMA-FILTER ...) ; processing (DEFRULE EXCLUDING-MATCHING-IN-SCHEMA ...) ; processing (DEFRULE LOAD-PGSQL-OPTIONAL-CLAUSES ...) ; processing (DEFRULE PGSQL-SOURCE ...) ; processing (DEFRULE LOAD-PGSQL-COMMAND ...) ; processing (DEFUN LISP-CODE-FOR-PGSQL-DRY-RUN ...) ; processing (DEFUN LISP-CODE-FOR-LOADING-FROM-PGSQL ...) ; processing (DEFRULE LOAD-PGSQL-DATABASE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/command-pgsql-tmpR3PRZE8Z.fasl ; compilation finished in 0:00:00.491 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/command-archive.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.PARSER) ; processing (DEFRULE ARCHIVE-COMMAND ...) ; processing (DEFRULE ANOTHER-ARCHIVE-COMMAND ...) ; processing (DEFRULE ARCHIVE-COMMAND-LIST ...) ; processing (DEFRULE ARCHIVE-SOURCE ...) ; processing (DEFRULE LOAD-ARCHIVE-CLAUSES ...) ; processing (DEFRULE LOAD-ARCHIVE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/command-archive-tmpBE4ZJXFG.fasl ; compilation finished in 0:00:00.199 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/command-parser.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.PARSER) ; processing (DEFRULE END-OF-COMMAND ...) ; processing (DEFRULE COMMAND ...) ; processing (DEFRULE COMMANDS ...) ; processing (DEFUN PARSE-COMMANDS ...) ; processing (DEFUN INJECT-INLINE-DATA-POSITION ...) ; processing (DEFUN PROCESS-RELATIVE-PATHNAMES ...) ; processing (DEFUN PARSE-COMMANDS-FROM-FILE ...) ; file: /build/reproducible-path/pgloader-3.6.2/src/parsers/command-parser.lisp ; in: DEFUN PARSE-COMMANDS-FROM-FILE ; (ERROR "Inline data not found in '~a'." PGLOADER.PARSER::FILENAME) ; ==> ; "Inline data not found in '~a'." ; ; note: deleting unreachable code ; processing (DEFVAR *DATA-SOURCE-FILENAME-EXTENSIONS* ...) ; processing (DEFUN PARSE-FILENAME-FOR-SOURCE-TYPE ...) ; processing (DEFVAR *PARSE-RULE-FOR-SOURCE-TYPES* ...) ; processing (DEFUN PARSE-SOURCE-STRING-FOR-TYPE ...) ; processing (DEFRULE SOURCE-URI ...) ; processing (DEFUN PARSE-SOURCE-STRING ...) ; processing (DEFUN PARSE-TARGET-STRING ...) ; processing (DEFUN PARSE-CLI-GUCS ...) ; processing (DEFRULE DBF-TYPE-NAME ...) ; processing (DEFRULE SQLITE-TYPE-NAME ...) ; processing (DEFRULE CLI-TYPE ...) ; processing (DEFUN PARSE-CLI-TYPE ...) ; processing (DEFUN PARSE-CLI-ENCODING ...) ; processing (DEFUN PARSE-CLI-FIELDS ...) ; processing (DEFUN PARSE-CLI-OPTIONS ...) ; processing (DEFUN PARSE-CLI-CASTS ...) ; processing (DEFUN PARSE-SQL-FILE ...) ; processing (DEFRULE PG-DB-URI-FROM-COMMAND ...) ; processing (DEFRULE PG-DB-URI-FROM-FILES ...) ; processing (DEFRULE PG-DB-URI-FROM-SOURCE-TARGET ...) ; processing (DEFRULE PG-DB-URI-FROM-SOURCE-TABLE-TARGET ...) ; processing (DEFRULE PG-DB-URI-FROM-SOURCE-AND-ENCODING ...) ; processing (DEFUN PARSE-TARGET-PG-DB-URI ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/command-parser-tmpICLLCELY.fasl ; compilation finished in 0:00:01.791 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/parse-sqlite-type-name.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE :PGLOADER.PARSER) ; processing (DEFRULE EXTRA-QUALIFIERS ...) ; processing (DEFRULE SQLITE-SINGLE-TYPEMOD ...) ; processing (DEFRULE SQLITE-DOUBLE-TYPEMOD ...) ; processing (DEFRULE SQLITE-TYPEMOD ...) ; processing (DEFRULE SQLITE-TYPE-NAME ...) ; processing (DEFUN PARSE-SQLITE-TYPE-NAME ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/parse-sqlite-type-name-tmpGJJYZTZA.fasl ; compilation finished in 0:00:00.143 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/parsers/date-format.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER.PARSE-DATE) ; processing (DEFVAR *CENTURY* ...) ; processing (DEFUN PARSE-DATE-STRING ...) ; processing (DEFVAR *OFFSET* ...) ; processing (DEFUN PARSE-DATE-FORMAT ...) ; processing (DEFRULE FORMAT-STRING ...) ; processing (DEFRULE NOISE ...) ; processing (DEFRULE YEAR ...) ; processing (DEFRULE YEAR4 ...) ; processing (DEFRULE YEAR3 ...) ; processing (DEFRULE YEAR2 ...) ; processing (DEFRULE MONTH ...) ; processing (DEFRULE MM ...) ; processing (DEFRULE DAY ...) ; processing (DEFRULE DD ...) ; processing (DEFRULE HOUR ...) ; processing (DEFRULE HH ...) ; processing (DEFRULE HH12 ...) ; processing (DEFRULE HH24 ...) ; processing (DEFRULE AMPM ...) ; processing (DEFRULE AM ...) ; processing (DEFRULE AM-DOT ...) ; processing (DEFRULE PM ...) ; processing (DEFRULE PM-DOT ...) ; processing (DEFRULE MINUTE ...) ; processing (DEFRULE MI ...) ; processing (DEFRULE SECONDS ...) ; processing (DEFRULE SS ...) ; processing (DEFRULE MILLISECONDS ...) ; processing (DEFRULE MS ...) ; processing (DEFRULE MICROSECONDS ...) ; processing (DEFRULE US ...) ; processing (DEFUN BUILD-FORMAT-SPEC ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/parsers/date-format-tmpO5YPH4GB.fasl ; compilation finished in 0:00:00.559 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/api.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER) ; processing (DEFINE-CONDITION SOURCE-DEFINITION-ERROR ...) ; processing (DEFINE-CONDITION CLI-PARSING-ERROR ...) ; processing (DEFINE-CONDITION LOAD-FILES-NOT-FOUND-ERROR ...) ; processing (DEFUN PROCESS-COMMAND-FILE ...) ; processing (DEFUN PROCESS-SOURCE-AND-TARGET ...) ; processing (DEFUN RUN-COMMANDS ...) ; processing (DEFUN LOAD-DATA ...) ; file: /build/reproducible-path/pgloader-3.6.2/src/api.lisp ; in: DEFUN LOAD-DATA ; 'PGLOADER.SOURCE.COPY:COPY-CONNECTION ; ; note: deleting unreachable code ; 'PGLOADER.SOURCE.FIXED:FIXED-CONNECTION ; ; note: deleting unreachable code ; processing (DEFVAR *GET-CODE-FOR-SOURCE* ...) ; processing (DEFUN LISP-CODE-FOR-LOADING ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/api-tmpCVBSS8KL.fasl ; compilation finished in 0:00:01.639 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/regress/regress.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER) ; processing (DEFINE-CONDITION REGRESSION-TEST-ERROR ...) ; processing (DEFUN PROCESS-REGRESSION-TEST ...) ; processing (DEFUN LIST-COLUMNS ...) ; processing (DEFUN REGRESSION-TEST-EXPECTED-DATA-SOURCE ...) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/regress/regress-tmpWOI7FLUF.fasl ; compilation finished in 0:00:01.547 ; compiling file "/build/reproducible-path/pgloader-3.6.2/src/main.lisp" (written 22 MAR 2020 09:26:18 AM): ; processing (IN-PACKAGE #:PGLOADER) ; processing (DEFUN LOG-THRESHOLD ...) ; processing (DEFPARAMETER *OPT-SPEC* ...) ; processing (DEFUN PRINT-BACKTRACE ...) ; processing (DEFUN MKDIR-OR-DIE ...) ; processing (DEFUN LOG-FILE-NAME ...) ; processing (DEFUN USAGE ...) ; processing (DEFVAR *SELF-UPGRADED-ALREADY* ...) ; processing (DEFUN SELF-UPGRADE ...) ; processing (DEFUN PARSE-SUMMARY-FILENAME ...) ; processing (DEFVAR *--LOAD-LIST-FILE-EXTENSION-WHITELIST* ...) ; processing (DEFUN LOAD-EXTRA-TRANSFORMATION-FUNCTIONS ...) ; processing (DEFUN MAIN ...) ; file: /build/reproducible-path/pgloader-3.6.2/src/main.lisp ; in: DEFUN MAIN ; (PGLOADER.MONITOR:LOG-MESSAGE :LOG "Main logs in '~a'" ; (UIOP/FILESYSTEM:NATIVE-NAMESTRING ; PGLOADER.PARAMS:*LOG-FILENAME*)) ; --> WHEN IF PGLOADER.MONITOR::SEND-LOG-MESSAGE ; ==> ; "Main logs in '~a'" ; ; note: deleting unreachable code ; (PGLOADER.MONITOR:LOG-MESSAGE :LOG "Data errors in '~a'~%" ; PGLOADER.PARAMS:*ROOT-DIR*) ; --> WHEN IF PGLOADER.MONITOR::SEND-LOG-MESSAGE ; ==> ; "Data errors in '~a'~%" ; ; note: deleting unreachable code ; (WHEN PGLOADER::NO-SSL-CERT-VERIFICATION ; (SETF CL+SSL:*MAKE-SSL-CLIENT-STREAM-VERIFY-DEFAULT* NIL)) ; --> IF ; ==> ; PGLOADER::NO-SSL-CERT-VERIFICATION ; ; note: deleting unreachable code ; (AND PGLOADER::REGRESS (= 1 (LENGTH PGLOADER::ARGUMENTS))) ; --> IF ; ==> ; PGLOADER::REGRESS ; ; note: deleting unreachable code ; (LENGTH PGLOADER::ARGUMENTS) ; ==> ; PGLOADER::ARGUMENTS ; ; note: deleting unreachable code ; (PGLOADER::PROCESS-REGRESSION-TEST (FIRST PGLOADER::ARGUMENTS)) ; ; note: deleting unreachable code ; (COND ; ((AND PGLOADER::REGRESS (= 1 (LENGTH PGLOADER::ARGUMENTS))) ; (PGLOADER::PROCESS-REGRESSION-TEST (FIRST PGLOADER::ARGUMENTS))) ; (PGLOADER::REGRESS ; (PGLOADER.MONITOR:LOG-MESSAGE :FATAL ; "Regression testing requires a single .load file as input.")) ; ((= 2 (LENGTH PGLOADER::ARGUMENTS)) ; (PGLOADER::PROCESS-SOURCE-AND-TARGET (FIRST PGLOADER::ARGUMENTS) ; (SECOND PGLOADER::ARGUMENTS) TYPE ; PGLOADER::ENCODING SET PGLOADER::WITH ; PGLOADER::FIELD PGLOADER.CATALOG:CAST ; PGLOADER::BEFORE PGLOADER::AFTER)) ; (T ; (LET ((PGLOADER::CLI-OPTIONS `#)) ; (LOOP :FOR (PGLOADER::CLI-OPTION-NAME ; PGLOADER::CLI-OPTION-VALUE) :IN PGLOADER::CLI-OPTIONS ; :WHEN PGLOADER::CLI-OPTION-VALUE ; :DO (PGLOADER.MONITOR:LOG-MESSAGE :FATAL ; "Option ~s is ignored when using a load file" ; PGLOADER::CLI-OPTION-NAME)) ; (UNLESS (REMOVE-IF #'NULL #) ; (PGLOADER::PROCESS-COMMAND-FILE PGLOADER::ARGUMENTS))))) ; --> IF IF ; ==> ; PGLOADER::REGRESS ; ; note: deleting unreachable code ; (PGLOADER.MONITOR:LOG-MESSAGE :FATAL ; "Regression testing requires a single .load file as input.") ; --> WHEN IF PGLOADER.MONITOR::SEND-LOG-MESSAGE ; ==> ; "Regression testing requires a single .load file as input." ; ; note: deleting unreachable code ; (LENGTH PGLOADER::ARGUMENTS) ; ==> ; PGLOADER::ARGUMENTS ; ; note: deleting unreachable code ; (PGLOADER::PROCESS-SOURCE-AND-TARGET (FIRST PGLOADER::ARGUMENTS) ; (SECOND PGLOADER::ARGUMENTS) TYPE ; PGLOADER::ENCODING SET PGLOADER::WITH ; PGLOADER::FIELD PGLOADER.CATALOG:CAST ; PGLOADER::BEFORE PGLOADER::AFTER) ; ==> ; TYPE ; ; note: deleting unreachable code ; (LET ((PGLOADER::CLI-OPTIONS ; `(("--type" ,TYPE) ("--encoding" ,PGLOADER::ENCODING) ("--set" ,SET) ; ("--with" ,PGLOADER::WITH) ("--field" ,PGLOADER::FIELD) ; ("--cast" ,PGLOADER.CATALOG:CAST) ("--before" ,PGLOADER::BEFORE) ; ("--after" ,PGLOADER::AFTER)))) ; (LOOP :FOR (PGLOADER::CLI-OPTION-NAME ; PGLOADER::CLI-OPTION-VALUE) :IN PGLOADER::CLI-OPTIONS ; :WHEN PGLOADER::CLI-OPTION-VALUE ; :DO (PGLOADER.MONITOR:LOG-MESSAGE :FATAL ; "Option ~s is ignored when using a load file" ; PGLOADER::CLI-OPTION-NAME)) ; (UNLESS (REMOVE-IF #'NULL (MAPCAR #'SECOND PGLOADER::CLI-OPTIONS)) ; (PGLOADER::PROCESS-COMMAND-FILE PGLOADER::ARGUMENTS))) ; ; note: deleting unreachable code ; (LOOP :FOR (PGLOADER::CLI-OPTION-NAME ; PGLOADER::CLI-OPTION-VALUE) :IN PGLOADER::CLI-OPTIONS ; :WHEN PGLOADER::CLI-OPTION-VALUE ; :DO (PGLOADER.MONITOR:LOG-MESSAGE :FATAL ; "Option ~s is ignored when using a load file" ; PGLOADER::CLI-OPTION-NAME)) ; --> BLOCK LET SB-KERNEL:THE* PGLOADER::CLI-OPTIONS ; ==> ; PGLOADER::CLI-OPTIONS ; ; note: deleting unreachable code ; (PGLOADER.MONITOR:LOG-MESSAGE :FATAL ; "Option ~s is ignored when using a load file" ; PGLOADER::CLI-OPTION-NAME) ; --> WHEN IF PGLOADER.MONITOR::SEND-LOG-MESSAGE ; ==> ; "Option ~s is ignored when using a load file" ; ; note: deleting unreachable code ; (LOOP :FOR (PGLOADER::CLI-OPTION-NAME ; PGLOADER::CLI-OPTION-VALUE) :IN PGLOADER::CLI-OPTIONS ; :WHEN PGLOADER::CLI-OPTION-VALUE ; :DO (PGLOADER.MONITOR:LOG-MESSAGE :FATAL ; "Option ~s is ignored when using a load file" ; PGLOADER::CLI-OPTION-NAME)) ; --> BLOCK LET TAGBODY IF ; ==> ; PGLOADER::CLI-OPTION-VALUE ; ; note: deleting unreachable code ; #'NULL ; ; note: deleting unreachable code ; (REMOVE-IF #'NULL (MAPCAR #'SECOND PGLOADER::CLI-OPTIONS)) ; ; note: deleting unreachable code ; (PGLOADER::PROCESS-COMMAND-FILE PGLOADER::ARGUMENTS) ; ==> ; PGLOADER::ARGUMENTS ; ; note: deleting unreachable code ; (PGLOADER.INI:CONVERT-INI-INTO-COMMANDS PGLOADER::FILENAME) ; ==> ; PGLOADER::FILENAME ; ; note: deleting unreachable code ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/build/reproducible-path/pgloader-3.6.2/src/main-tmpYSK53869.fasl ; compilation finished in 0:00:01.315 ; file: /usr/share/common-lisp/source/cl-mustache/mustache.lisp ; in: DEFUN MUSTACHE::%OUTPUT ; (EQ MUSTACHE:*MUSTACHE-OUTPUT* MUSTACHE::*REAL-STANDARD-OUTPUT*) ; ; caught WARNING: ; undefined variable: MUSTACHE:*MUSTACHE-OUTPUT* ; file: /build/reproducible-path/pgloader-3.6.2/src/sources/mysql/mysql-cast-rules.lisp ; in: DEFUN PGLOADER.SOURCE.MYSQL::TEST-CASTS ; (PGLOADER.SOURCE.MYSQL::FORMAT-COLUMN PGLOADER.SOURCE.MYSQL::PGCOL) ; ; caught STYLE-WARNING: ; undefined function: PGLOADER.SOURCE.MYSQL::FORMAT-COLUMN ; file: /build/reproducible-path/pgloader-3.6.2/src/parsers/parse-ini.lisp ; in: DEFUN PGLOADER.INI::GET-PGSQL-COLUMN-SPECS ; (PGLOADER.INI::LIST-COLUMNS PGLOADER.INI::PGCONN PGLOADER.CATALOG:TABLE-NAME) ; ; caught STYLE-WARNING: ; undefined function: PGLOADER.INI::LIST-COLUMNS ; file: /build/reproducible-path/pgloader-3.6.2/src/sources/common/matviews.lisp ; in: ; DEFMETHOD PGLOADER.SOURCES:FORMAT-MATVIEW-NAME (T PGLOADER.SOURCES:DB-COPY) ; (PGLOADER.CATALOG:SCHEMA-SOURCE-NAME PGLOADER.CATALOG:SCHEMA) ; ; caught WARNING: ; undefined variable: PGLOADER.CATALOG:SCHEMA ; file: /usr/share/common-lisp/source/metatilities-base/dev/copy-file.lisp ; in: DEFUN METABANG.UTILITIES:COPY-FILE ; (MAKE-CONDITION 'METABANG.UTILITIES::SOURCE/TARGET-TARGET-ALREADY-EXISTS ; :PATHNAME METABANG.UTILITIES::FROM :TARGET-PATHNAME ; METABANG.UTILITIES::TO) ; ; caught STYLE-WARNING: ; undefined type: METABANG.UTILITIES::SOURCE/TARGET-TARGET-ALREADY-EXISTS ; ; compilation unit finished ; Undefined type: ; METABANG.UTILITIES::SOURCE/TARGET-TARGET-ALREADY-EXISTS ; Undefined functions: ; PGLOADER.SOURCE.MYSQL::FORMAT-COLUMN PGLOADER.INI::LIST-COLUMNS ; Undefined variables: ; MUSTACHE:*MUSTACHE-OUTPUT* PGLOADER.CATALOG:SCHEMA ; caught 2 WARNING conditions ; caught 72 STYLE-WARNING conditions ; printed 2206 notes ; compiling file "/usr/share/common-lisp/source/cl-containers/dev/utilities-integration.lisp" (written 28 MAR 2017 01:15:31 AM): ; processing (IN-PACKAGE #:METATILITIES) ; processing (MAKE-LOAD-FORM* ABSTRACT-CONTAINER) ; processing (MAKE-LOAD-FORM* CONTAINER-NODE-MIXIN) ; wrote /build/reproducible-path/pgloader-3.6.2/debian/home/.cache/common-lisp/sbcl-2.1.1.debian-linux-x64/usr/share/common-lisp/source/cl-containers/dev/utilities-integration-tmpUIKNFBUS.fasl ; compilation finished in 0:00:00.087 test ! -f buildapp.fail /usr/bin/make -C docs html make[2]: Entering directory '/build/reproducible-path/pgloader-3.6.2/docs' Running Sphinx v3.4.3 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 26 source files that are out of date updating environment: [new config] 26 added, 0 changed, 0 removed reading sources... [ 3%] bugreport reading sources... [ 7%] index reading sources... [ 11%] intro reading sources... [ 15%] pgloader reading sources... [ 19%] pgloader-usage-examples reading sources... [ 23%] quickstart reading sources... [ 26%] ref/archive reading sources... [ 30%] ref/copy reading sources... [ 34%] ref/csv reading sources... [ 38%] ref/dbf reading sources... [ 42%] ref/fixed reading sources... [ 46%] ref/ixf reading sources... [ 50%] ref/mssql reading sources... [ 53%] ref/mysql reading sources... [ 57%] ref/pgsql reading sources... [ 61%] ref/pgsql-citus-target reading sources... [ 65%] ref/pgsql-redshift reading sources... [ 69%] ref/sqlite reading sources... [ 73%] ref/transforms reading sources... [ 76%] tutorial/csv reading sources... [ 80%] tutorial/dBase reading sources... [ 84%] tutorial/fixed reading sources... [ 88%] tutorial/geolite reading sources... [ 92%] tutorial/mysql reading sources... [ 96%] tutorial/sqlite reading sources... [100%] tutorial/tutorial /build/reproducible-path/pgloader-3.6.2/docs/tutorial/tutorial.rst:2: WARNING: Duplicate explicit target name: "postgresql". tutorial/sqlite.rst:4: WARNING: Duplicate target name, cannot be used as a unique reference: "postgresql". looking for now-outdated files... none found pickling environment... done checking consistency... /build/reproducible-path/pgloader-3.6.2/docs/pgloader-usage-examples.rst: WARNING: document isn't included in any toctree done preparing documents... WARNING: unsupported theme option 'github_user' given WARNING: unsupported theme option 'github_repo' given WARNING: unsupported theme option 'description' given WARNING: unsupported theme option 'travis_button' given WARNING: unsupported theme option 'show_related' given done writing output... [ 3%] bugreport writing output... [ 7%] index writing output... [ 11%] intro writing output... [ 15%] pgloader writing output... [ 19%] pgloader-usage-examples writing output... [ 23%] quickstart writing output... [ 26%] ref/archive writing output... [ 30%] ref/copy writing output... [ 34%] ref/csv writing output... [ 38%] ref/dbf writing output... [ 42%] ref/fixed writing output... [ 46%] ref/ixf writing output... [ 50%] ref/mssql writing output... [ 53%] ref/mysql writing output... [ 57%] ref/pgsql writing output... [ 61%] ref/pgsql-citus-target writing output... [ 65%] ref/pgsql-redshift writing output... [ 69%] ref/sqlite writing output... [ 73%] ref/transforms writing output... [ 76%] tutorial/csv writing output... [ 80%] tutorial/dBase writing output... [ 84%] tutorial/fixed writing output... [ 88%] tutorial/geolite writing output... [ 92%] tutorial/mysql writing output... [ 96%] tutorial/sqlite writing output... [100%] tutorial/tutorial 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, 9 warnings. The HTML pages are in _build/html. make[2]: Leaving directory '/build/reproducible-path/pgloader-3.6.2/docs' make[1]: Leaving directory '/build/reproducible-path/pgloader-3.6.2' debian/rules override_dh_auto_build-indep make[1]: Entering directory '/build/reproducible-path/pgloader-3.6.2' # do nothing make[1]: Leaving directory '/build/reproducible-path/pgloader-3.6.2' debian/rules override_dh_auto_test make[1]: Entering directory '/build/reproducible-path/pgloader-3.6.2' # do nothing make[1]: Leaving directory '/build/reproducible-path/pgloader-3.6.2' create-stamp debian/debhelper-build-stamp dh_testroot dh_prep dh_installdirs dh_auto_install dh_install dh_installdocs dh_installchangelogs debian/rules override_dh_installman-arch make[1]: Entering directory '/build/reproducible-path/pgloader-3.6.2' mkdir -p debian/pgloader/usr/share/man/man1/ PATH=debian/pgloader/usr/bin:/usr/sbin:/usr/bin:/sbin:/bin:/usr/games \ help2man --version-string 3.6.2 \ --no-info \ --name "extract, transform and load data into PostgreSQL" \ pgloader > \ debian/pgloader/usr/share/man/man1/pgloader.1 make[1]: Leaving directory '/build/reproducible-path/pgloader-3.6.2' dh_perl dh_link dh_strip_nondeterminism dh_compress dh_fixperms dh_missing debian/rules override_dh_dwz make[1]: Entering directory '/build/reproducible-path/pgloader-3.6.2' # do nothing, sbcl doesn't write any debug info make[1]: Leaving directory '/build/reproducible-path/pgloader-3.6.2' debian/rules override_dh_strip make[1]: Entering directory '/build/reproducible-path/pgloader-3.6.2' # do nothing, sbcl doesn't write any debug info make[1]: Leaving directory '/build/reproducible-path/pgloader-3.6.2' dh_makeshlibs -a dh_shlibdeps -a dh_installdeb debian/rules override_dh_gencontrol make[1]: Entering directory '/build/reproducible-path/pgloader-3.6.2' dh_gencontrol -- -V"ssl:Depends=libssl1.1" make[1]: Leaving directory '/build/reproducible-path/pgloader-3.6.2' dh_md5sums dh_builddeb dpkg-deb: building package 'pgloader' in '../pgloader_3.6.2-1_amd64.deb'. dpkg-deb: building package 'cl-pgloader' in '../cl-pgloader_3.6.2-1_all.deb'. dpkg-genbuildinfo --build=binary dpkg-genchanges --build=binary >../pgloader_3.6.2-1_amd64.changes dpkg-genchanges: info: binary-only upload (no source code included) dpkg-source --after-build . dpkg-source: info: using options from pgloader-3.6.2/debian/source/options: --extend-diff-ignore=src/params.lisp --extend-diff-ignore=src/parsers/command-csv.lisp dpkg-buildpackage: info: binary-only upload (no source included) dpkg-genchanges: info: including full source code in upload I: copying local configuration I: unmounting dev/ptmx filesystem I: unmounting dev/pts filesystem I: unmounting dev/shm filesystem I: unmounting proc filesystem I: unmounting sys filesystem I: cleaning the build env I: removing directory /srv/workspace/pbuilder/1894023 and its subdirectories I: Current time: Sat Jan 6 10:47:15 -12 2024 I: pbuilder-time-stamp: 1704581235 Sat Jan 6 22:47:19 UTC 2024 I: 1st build successful. Starting 2nd build on remote node ionos5-amd64.debian.net. Sat Jan 6 22:47:19 UTC 2024 I: Preparing to do remote build '2' on ionos5-amd64.debian.net. Sat Jan 6 23:03:46 UTC 2024 I: Deleting $TMPDIR on ionos5-amd64.debian.net. Sat Jan 6 23:03:47 UTC 2024 I: pgloader_3.6.2-1_amd64.changes: Format: 1.8 Date: Tue, 14 Jul 2020 17:02:30 +0200 Source: pgloader Binary: cl-pgloader pgloader Architecture: all amd64 Version: 3.6.2-1 Distribution: unstable Urgency: medium Maintainer: Dimitri Fontaine Changed-By: Christoph Berg Description: cl-pgloader - extract, transform and load data into PostgreSQL pgloader - extract, transform and load data into PostgreSQL Changes: pgloader (3.6.2-1) unstable; urgency=medium . * New upstream version. * debian/tests/ssl: Add --debug to get backtraces. * debian/rules: Sync loaded systems with Makefile. * debian/rules: Print actual compiler log. * debian/rules: Skip dh_dwz like dh_strip as it fails on buster. * Bump required cl-db3 version to 20200212. * Note that we need cl-plus-ssl 20190204 or later. * Note that we need cl-csv 20180712 or later. * DH 13. Checksums-Sha1: 037df9754ea378a127b50a87f1fa16d077997006 152528 cl-pgloader_3.6.2-1_all.deb 6e404b7012400c274b41f8913ae1a90aeefa170b 9662 pgloader_3.6.2-1_amd64.buildinfo 7b475efa40437937f8cdb9631a361d4c89745d4a 26907072 pgloader_3.6.2-1_amd64.deb Checksums-Sha256: ce7661b71db432d290d32a2c3a9d7c722fd9cc929d34364d322052da2ca7b75b 152528 cl-pgloader_3.6.2-1_all.deb 56b590d6c725b677ab3c054d0508fb5e0a22464de2d8dc50c6ab3fb656f97c99 9662 pgloader_3.6.2-1_amd64.buildinfo edcee6e13ecc11ed821a8288fe9222b605d9d89cd6497679b1c0391183946036 26907072 pgloader_3.6.2-1_amd64.deb Files: a6377f4c90dd80c080ab485c8ffe8201 152528 lisp optional cl-pgloader_3.6.2-1_all.deb f10a7c1861d2b0a0e6cf99cd30c10b0b 9662 database optional pgloader_3.6.2-1_amd64.buildinfo cb02c914e33b64dbf7b69d1eac448f16 26907072 database optional pgloader_3.6.2-1_amd64.deb Sat Jan 6 23:03:48 UTC 2024 I: diffoscope 240 will be used to compare the two builds: # Profiling output for: /usr/bin/diffoscope --timeout 7200 --html /srv/reproducible-results/rbuild-debian/r-b-build.aAjhA4H9/pgloader_3.6.2-1.diffoscope.html --text /srv/reproducible-results/rbuild-debian/r-b-build.aAjhA4H9/pgloader_3.6.2-1.diffoscope.txt --json /srv/reproducible-results/rbuild-debian/r-b-build.aAjhA4H9/pgloader_3.6.2-1.diffoscope.json --profile=- /srv/reproducible-results/rbuild-debian/r-b-build.aAjhA4H9/b1/pgloader_3.6.2-1_amd64.changes /srv/reproducible-results/rbuild-debian/r-b-build.aAjhA4H9/b2/pgloader_3.6.2-1_amd64.changes ## close_archive (total time: 0.000s) 0.000s 6 calls diffoscope.comparators.deb.DebContainer 0.000s 10 calls diffoscope.comparators.xz.XzContainer 0.000s 8 calls diffoscope.comparators.tar.TarContainer 0.000s 2 calls diffoscope.comparators.deb.DebTarContainer ## command (total time: 18.513s) 7.138s 110 calls objdump 5.701s 59 calls diff 3.307s 10 calls xz 1.859s 479 calls readelf 0.288s 11 calls strings 0.202s 2 calls objcopy 0.008s 3 calls cmp 0.008s 3 calls cmp (external) 0.001s 10 calls cmp (internal) ## compare_files (cumulative) (total time: 63.427s) 12.938s 1 call abc.DotChangesFile 12.907s 1 call abc.DebFile 12.721s 2 calls abc.XzFile 9.370s 1 call abc.DebDataTarFile 8.988s 1 call abc.ElfFile 6.055s 5 calls diffoscope.comparators.elf.ElfCodeSection 0.396s 16 calls diffoscope.comparators.elf.ElfSection 0.041s 1 call abc.TarFile 0.010s 1 call abc.Md5sumsFile ## container_extract (total time: 3.805s) 3.308s 10 calls diffoscope.comparators.xz.XzContainer 0.278s 12 calls diffoscope.comparators.deb.DebContainer 0.212s 182 calls diffoscope.comparators.deb.DebTarContainer 0.008s 10 calls diffoscope.comparators.tar.TarContainer ## diff (total time: 0.081s) 0.081s 5 calls linediff ## has_same_content_as (total time: 0.010s) 0.003s 1 call abc.DebDataTarFile 0.003s 1 call abc.ElfFile 0.003s 2 calls abc.DebFile 0.000s 2 calls abc.Md5sumsFile 0.000s 2 calls abc.TextFile 0.000s 2 calls abc.XzFile 0.000s 1 call abc.DotChangesFile 0.000s 1 call abc.TarFile 0.000s 16 calls diffoscope.comparators.elf.ElfSection 0.000s 5 calls diffoscope.comparators.elf.ElfCodeSection ## main (total time: 13.687s) 13.686s 2 calls outputs 0.001s 1 call cleanup ## open_archive (total time: 0.000s) 0.000s 10 calls diffoscope.comparators.xz.XzContainer 0.000s 8 calls diffoscope.comparators.tar.TarContainer 0.000s 6 calls diffoscope.comparators.deb.DebContainer 0.000s 2 calls diffoscope.comparators.deb.DebTarContainer ## output (total time: 0.118s) 0.115s 1 call html 0.002s 1 call text 0.001s 1 call json ## recognizes (total time: 0.942s) 0.300s 12 calls diffoscope.comparators.binary.FilesystemFile 0.293s 352 calls diffoscope.comparators.elf.ElfSection 0.216s 888 calls diffoscope.comparators.utils.libarchive.LibarchiveMember 0.063s 110 calls diffoscope.comparators.elf.ElfCodeSection 0.040s 492 calls diffoscope.comparators.utils.archive.ArchiveMember 0.030s 216 calls diffoscope.comparators.debian.DebControlMember 0.000s 10 calls abc.DotChangesFile 0.000s 16 calls abc.Md5sumsFile ## specialize (total time: 0.451s) 0.451s 33 calls specialize Sat Jan 6 23:04:02 UTC 2024 E: pgloader failed to build reproducibly in bullseye on amd64. Sat Jan 6 23:04:02 UTC 2024 E: diffoscope 240 found issues, please check https://tests.reproducible-builds.org/debian/dbd/bullseye/amd64/pgloader_3.6.2-1.diffoscope.html Sat Jan 6 23:04:04 UTC 2024 I: Submitting .buildinfo files to external archives: Sat Jan 6 23:04:04 UTC 2024 I: Submitting 12K b1/pgloader_3.6.2-1_amd64.buildinfo.asc Sat Jan 6 23:04:05 UTC 2024 I: Submitting 12K b2/pgloader_3.6.2-1_amd64.buildinfo.asc Sat Jan 6 23:04:06 UTC 2024 I: Done submitting .buildinfo files to http://buildinfo.debian.net/api/submit. Sat Jan 6 23:04:06 UTC 2024 I: Done submitting .buildinfo files. Sat Jan 6 23:04:06 UTC 2024 I: Removing signed pgloader_3.6.2-1_amd64.buildinfo.asc files: removed './b1/pgloader_3.6.2-1_amd64.buildinfo.asc' removed './b2/pgloader_3.6.2-1_amd64.buildinfo.asc'