Mon Jan 8 11:35:39 UTC 2024 I: starting to build pgloader/bookworm/arm64 on jenkins on '2024-01-08 11:35' Mon Jan 8 11:35:39 UTC 2024 I: The jenkins build log is/was available at https://jenkins.debian.net/userContent/reproducible/debian/build_service/arm64_22/18658/console.log Mon Jan 8 11:35:39 UTC 2024 I: Downloading source for bookworm/pgloader=3.6.9-1 --2024-01-08 11:35:40-- http://cdn-fastly.deb.debian.org/debian/pool/main/p/pgloader/pgloader_3.6.9-1.dsc Connecting to 78.137.99.97:3128... connected. Proxy request sent, awaiting response... 200 OK Length: 2795 (2.7K) [text/prs.lines.tag] Saving to: ‘pgloader_3.6.9-1.dsc’ 0K .. 100% 237M=0s 2024-01-08 11:35:40 (237 MB/s) - ‘pgloader_3.6.9-1.dsc’ saved [2795/2795] Mon Jan 8 11:35:40 UTC 2024 I: pgloader_3.6.9-1.dsc -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA256 Format: 3.0 (quilt) Source: pgloader Binary: pgloader Architecture: any Version: 3.6.9-1 Maintainer: Dimitri Fontaine Uploaders: Christoph Berg , Homepage: https://github.com/dimitri/pgloader Standards-Version: 4.6.0 Vcs-Browser: https://github.com/dimitri/pgloader Vcs-Git: https://github.com/dimitri/pgloader.git Testsuite: autopkgtest Testsuite-Triggers: ca-certificates, cl-postmodern, postgresql, postgresql-15-ip4r, postgresql-ip4r 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, libsqlite3-dev, postgresql-15-ip4r | postgresql-ip4r , python3-sphinx, python3-sphinx-rtd-theme, sbcl (>= 1.1.13), tzdata Package-List: pgloader deb database optional arch=any Checksums-Sha1: 4e6827066b34346cb35d04866611fd25722c1ac2 3722879 pgloader_3.6.9.orig.tar.gz 285bc35aec917d9ad0af7f35573446d56fa2943f 9332 pgloader_3.6.9-1.debian.tar.xz Checksums-Sha256: 5639c580cd2c207947b6487316e901cb36291ea2be5bf1eb60cd6dba131aab3f 3722879 pgloader_3.6.9.orig.tar.gz 440c5b94ea817e0f07795586f9d717ad146cc0cae272c7cd6ec24d645ac2e09e 9332 pgloader_3.6.9-1.debian.tar.xz Files: 6bd9672b92f04ceeaaf80c275f04710c 3722879 pgloader_3.6.9.orig.tar.gz 3f24b928f34c366bbe946edfeeda9e60 9332 pgloader_3.6.9-1.debian.tar.xz -----BEGIN PGP SIGNATURE----- iQIzBAEBCAAdFiEEXEj+YVf0kXlZcIfGTFprqxLSp64FAmNWkTMACgkQTFprqxLS p66pRw/+PxG2WPTs/8JPvcCpxfsVDhgkpVT/1liF/4k8Bw/coyQu8LvfBf+4u2Wr 4HroJ9BGeDZ5a4dUqWVWHOWQXJRO2IqVGIRtDMiH2CYhxEaRKBwKjjUl2y9ZQU72 qLZJIs0uDJ0OGgqSeEtIy67lFx+yYKTLkWEmYX+Wwto8QnDlNLDWKzUOyq26M4Fo MZxpe0LodYcIl/MI7Z5FwuFXDWI0L6fMu2atIZ5M2SJhBIlOB55UQnpxOyzAN/sF kCa1B7vnH8fzITq7LI6BIcqLy3VDYutotrAE5vTyXMx3BnVpuCdwSKdMUPuz36OY ao8hyyeN/qVxzr6aLg1Gh/c0XZ24zLE4iJBsxMqODSPofJWWkRUjkdEgWD4i53E+ Stl3SYeyuT013TJHAS+3HDw8eCkKg0YmmNhMJdXkFnSPxnLOyaBW8Z66P6QtQ9QY iaKkGc/H0Twi1KDCyL/RIeCVCcp6JMRoTA+wmb/PkqZp9CtJJ0vOpQykXA11Q8nh 0WhxuCjvHx9Kn264FHj5dElEMCtXxCuAcFlZaSsmBiJ4i87q/ZplnFbvzLIy/os9 gOg1VTcV4N13bFXhHdI0Uw2EULbiWpNz5CQNL116KTu0Ubrf/Ki6IT5Uxg8IuHhD 5U2//l+5NGLfegebHD0iu42m70nUoa3uKCh2udUUW2lPyEeJATA= =o5NI -----END PGP SIGNATURE----- Mon Jan 8 11:35:40 UTC 2024 I: Checking whether the package is not for us Mon Jan 8 11:35:40 UTC 2024 I: Starting 1st build on remote node codethink04-arm64.debian.net. Mon Jan 8 11:35:40 UTC 2024 I: Preparing to do remote build '1' on codethink04-arm64.debian.net. Mon Jan 8 11:59:39 UTC 2024 I: Deleting $TMPDIR on codethink04-arm64.debian.net. I: pbuilder: network access will be disabled during build I: Current time: Sun Jan 7 23:51:15 -12 2024 I: pbuilder-time-stamp: 1704714675 I: Building the build Environment I: extracting base tarball [/var/cache/pbuilder/bookworm-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.9-1.dsc] I: copying [./pgloader_3.6.9.orig.tar.gz] I: copying [./pgloader_3.6.9-1.debian.tar.xz] I: Extracting source gpgv: Signature made Mon Oct 24 13:20:51 2022 gpgv: using RSA key 5C48FE6157F49179597087C64C5A6BAB12D2A7AE gpgv: Can't check signature: No public key dpkg-source: warning: cannot verify inline signature for ./pgloader_3.6.9-1.dsc: no acceptable signature found dpkg-source: info: extracting pgloader in pgloader-3.6.9 dpkg-source: info: unpacking pgloader_3.6.9.orig.tar.gz dpkg-source: info: unpacking pgloader_3.6.9-1.debian.tar.xz I: using fakeroot in build. I: Installing the build-deps I: user script /srv/workspace/pbuilder/2293027/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='arm64' DEBIAN_FRONTEND='noninteractive' DEB_BUILD_OPTIONS='buildinfo=+all reproducible=+all parallel=12 ' DISTRIBUTION='bookworm' HOME='/root' HOST_ARCH='arm64' IFS=' ' INVOCATION_ID='46ff7653742c4c419c2439a048d01a28' 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='2293027' 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.I6MWnjUg/pbuilderrc_Ehsp --distribution bookworm --hookdir /etc/pbuilder/first-build-hooks --debbuildopts -b --basetgz /var/cache/pbuilder/bookworm-reproducible-base.tgz --buildresult /srv/reproducible-results/rbuild-debian/r-b-build.I6MWnjUg/b1 --logfile b1/build.log pgloader_3.6.9-1.dsc' SUDO_GID='109' SUDO_UID='104' SUDO_USER='jenkins' TERM='unknown' TZ='/usr/share/zoneinfo/Etc/GMT+12' USER='root' _='/usr/bin/systemd-run' http_proxy='http://192.168.101.104:3128' I: uname -a Linux codethink04-arm64 6.1.0-17-cloud-arm64 #1 SMP Debian 6.1.69-1 (2023-12-30) aarch64 GNU/Linux I: ls -l /bin total 7104 -rwxr-xr-x 1 root root 1346480 Apr 23 2023 bash -rwxr-xr-x 3 root root 67728 Sep 19 2022 bunzip2 -rwxr-xr-x 3 root root 67728 Sep 19 2022 bzcat lrwxrwxrwx 1 root root 6 Sep 19 2022 bzcmp -> bzdiff -rwxr-xr-x 1 root root 2225 Sep 19 2022 bzdiff lrwxrwxrwx 1 root root 6 Sep 19 2022 bzegrep -> bzgrep -rwxr-xr-x 1 root root 4893 Nov 27 2021 bzexe lrwxrwxrwx 1 root root 6 Sep 19 2022 bzfgrep -> bzgrep -rwxr-xr-x 1 root root 3775 Sep 19 2022 bzgrep -rwxr-xr-x 3 root root 67728 Sep 19 2022 bzip2 -rwxr-xr-x 1 root root 67664 Sep 19 2022 bzip2recover lrwxrwxrwx 1 root root 6 Sep 19 2022 bzless -> bzmore -rwxr-xr-x 1 root root 1297 Sep 19 2022 bzmore -rwxr-xr-x 1 root root 68536 Sep 20 2022 cat -rwxr-xr-x 1 root root 68616 Sep 20 2022 chgrp -rwxr-xr-x 1 root root 68552 Sep 20 2022 chmod -rwxr-xr-x 1 root root 68632 Sep 20 2022 chown -rwxr-xr-x 1 root root 200264 Sep 20 2022 cp -rwxr-xr-x 1 root root 133640 Jan 5 2023 dash -rwxr-xr-x 1 root root 134144 Sep 20 2022 date -rwxr-xr-x 1 root root 134248 Sep 20 2022 dd -rwxr-xr-x 1 root root 134888 Sep 20 2022 df -rwxr-xr-x 1 root root 200440 Sep 20 2022 dir -rwxr-xr-x 1 root root 141720 Mar 23 2023 dmesg lrwxrwxrwx 1 root root 8 Dec 19 2022 dnsdomainname -> hostname lrwxrwxrwx 1 root root 8 Dec 19 2022 domainname -> hostname -rwxr-xr-x 1 root root 68408 Sep 20 2022 echo -rwxr-xr-x 1 root root 41 Jan 24 2023 egrep -rwxr-xr-x 1 root root 68384 Sep 20 2022 false -rwxr-xr-x 1 root root 41 Jan 24 2023 fgrep -rwxr-xr-x 1 root root 134584 Mar 23 2023 findmnt -rwsr-xr-x 1 root root 67744 Mar 23 2023 fusermount -rwxr-xr-x 1 root root 198880 Jan 24 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 93752 Apr 10 2022 gzip -rwxr-xr-x 1 root root 67592 Dec 19 2022 hostname -rwxr-xr-x 1 root root 68664 Sep 20 2022 ln -rwxr-xr-x 1 root root 69208 Mar 23 2023 login -rwxr-xr-x 1 root root 200440 Sep 20 2022 ls -rwxr-xr-x 1 root root 264360 Mar 23 2023 lsblk -rwxr-xr-x 1 root root 134384 Sep 20 2022 mkdir -rwxr-xr-x 1 root root 68768 Sep 20 2022 mknod -rwxr-xr-x 1 root root 68472 Sep 20 2022 mktemp -rwxr-xr-x 1 root root 67752 Mar 23 2023 more -rwsr-xr-x 1 root root 67744 Mar 23 2023 mount -rwxr-xr-x 1 root root 67744 Mar 23 2023 mountpoint -rwxr-xr-x 1 root root 134728 Sep 20 2022 mv lrwxrwxrwx 1 root root 8 Dec 19 2022 nisdomainname -> hostname lrwxrwxrwx 1 root root 14 Apr 3 2023 pidof -> /sbin/killall5 -rwxr-xr-x 1 root root 68496 Sep 20 2022 pwd lrwxrwxrwx 1 root root 4 Apr 23 2023 rbash -> bash -rwxr-xr-x 1 root root 68456 Sep 20 2022 readlink -rwxr-xr-x 1 root root 68592 Sep 20 2022 rm -rwxr-xr-x 1 root root 68480 Sep 20 2022 rmdir -rwxr-xr-x 1 root root 68392 Jul 28 23:46 run-parts -rwxr-xr-x 1 root root 134536 Jan 5 2023 sed lrwxrwxrwx 1 root root 4 Jan 5 2023 sh -> dash -rwxr-xr-x 1 root root 68432 Sep 20 2022 sleep -rwxr-xr-x 1 root root 134088 Sep 20 2022 stty -rwsr-xr-x 1 root root 133312 Mar 23 2023 su -rwxr-xr-x 1 root root 68448 Sep 20 2022 sync -rwxr-xr-x 1 root root 539896 Apr 6 2023 tar -rwxr-xr-x 1 root root 67904 Jul 28 23:46 tempfile -rwxr-xr-x 1 root root 134160 Sep 20 2022 touch -rwxr-xr-x 1 root root 68384 Sep 20 2022 true -rwxr-xr-x 1 root root 67664 Mar 23 2023 ulockmgr_server -rwsr-xr-x 1 root root 67744 Mar 23 2023 umount -rwxr-xr-x 1 root root 68416 Sep 20 2022 uname -rwxr-xr-x 2 root root 2346 Apr 10 2022 uncompress -rwxr-xr-x 1 root root 200440 Sep 20 2022 vdir -rwxr-xr-x 1 root root 133312 Mar 23 2023 wdctl lrwxrwxrwx 1 root root 8 Dec 19 2022 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 6460 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 8103 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/2293027/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: arm64 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, libsqlite3-dev, postgresql-15-ip4r | postgresql-ip4r, python3-sphinx, python3-sphinx-rtd-theme, 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 ... 18171 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 libsqlite3-dev; however: Package libsqlite3-dev is not installed. pbuilder-satisfydepends-dummy depends on postgresql-15-ip4r | postgresql-ip4r; however: Package postgresql-15-ip4r is not installed. Package postgresql-ip4r is not installed. pbuilder-satisfydepends-dummy depends on python3-sphinx; however: Package python3-sphinx 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 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-global-vars{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-uax-15{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} libbsd0{a} libct4{a} libdebhelper-perl{a} libedit2{a} libelf1{a} libexpat1{a} libffi-dev{a} libfile-stripnondeterminism-perl{a} libicu72{a} libjs-jquery{a} libjs-sphinxdoc{a} libjs-underscore{a} libjson-perl{a} libldap-2.5-0{a} libllvm14{a} liblocale-gettext-perl{a} libmagic-mgc{a} libmagic1{a} libpipeline1{a} libpkgconf3{a} libpq5{a} libpython3-stdlib{a} libpython3.11-minimal{a} libpython3.11-stdlib{a} libreadline8{a} libsasl2-2{a} libsasl2-modules-db{a} libsigsegv2{a} libsqlite3-dev{a} libsub-override-perl{a} libsybdb5{a} libtool{a} libuchardet0{a} libxml2{a} libxslt1.1{a} libz3-4{a} m4{a} man-db{a} media-types{a} netbase{a} openssl{a} pkg-config{a} pkgconf{a} pkgconf-bin{a} po-debconf{a} postgresql-15{a} postgresql-15-ip4r{a} postgresql-client-15{a} postgresql-client-common{a} postgresql-common{a} python-babel-localedata{a} python3{a} python3-alabaster{a} python3-babel{a} python3-certifi{a} python3-chardet{a} python3-charset-normalizer{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-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.11{a} python3.11-minimal{a} readline-common{a} sbcl{a} sensible-utils{a} sgml-base{a} sphinx-common{a} sphinx-rtd-theme-common{a} ssl-cert{a} tzdata{a} ucf{a} xml-core{a} zlib1g-dev{a} The following packages are RECOMMENDED but will NOT be installed: binfmt-support cl-fiveam cl-ptester curl e2fsprogs freetds-doc javascript-common libarchive-cpio-perl libjs-mathjax libjson-xs-perl libldap-common libltdl-dev libmail-sendmail-perl libpaper-utils libsasl2-modules logrotate lynx python3-pil sysstat systemd wget 0 packages upgraded, 181 newly installed, 0 to remove and 0 not upgraded. Need to get 113 MB of archives. After unpacking 517 MB will be used. Writing extended state information... Get: 1 http://deb.debian.org/debian bookworm/main arm64 fonts-lato all 2.0-2.1 [2696 kB] Get: 2 http://deb.debian.org/debian bookworm/main arm64 readline-common all 8.2-1.3 [69.0 kB] Get: 3 http://deb.debian.org/debian bookworm/main arm64 libreadline8 arm64 8.2-1.3 [155 kB] Get: 4 http://deb.debian.org/debian bookworm/main arm64 libsigsegv2 arm64 2.14-1 [37.0 kB] Get: 5 http://deb.debian.org/debian bookworm/main arm64 gawk arm64 1:5.2.1-2 [640 kB] Get: 6 http://deb.debian.org/debian bookworm/main arm64 liblocale-gettext-perl arm64 1.07-5 [15.1 kB] Get: 7 http://deb.debian.org/debian bookworm/main arm64 libjson-perl all 4.10000-1 [87.5 kB] Get: 8 http://deb.debian.org/debian bookworm/main arm64 netbase all 6.4 [12.8 kB] Get: 9 http://deb.debian.org/debian bookworm/main arm64 postgresql-client-common all 248 [35.1 kB] Get: 10 http://deb.debian.org/debian bookworm/main arm64 openssl arm64 3.0.11-1~deb12u2 [1385 kB] Get: 11 http://deb.debian.org/debian bookworm/main arm64 ssl-cert all 1.1.2 [21.1 kB] Get: 12 http://deb.debian.org/debian bookworm/main arm64 sensible-utils all 0.0.17+nmu1 [19.0 kB] Get: 13 http://deb.debian.org/debian bookworm/main arm64 ucf all 3.0043+nmu1 [55.2 kB] Get: 14 http://deb.debian.org/debian bookworm/main arm64 postgresql-common all 248 [179 kB] Get: 15 http://deb.debian.org/debian bookworm/main arm64 libpython3.11-minimal arm64 3.11.2-6 [806 kB] Get: 16 http://deb.debian.org/debian bookworm/main arm64 libexpat1 arm64 2.5.0-1 [84.8 kB] Get: 17 http://deb.debian.org/debian bookworm/main arm64 python3.11-minimal arm64 3.11.2-6 [1858 kB] Get: 18 http://deb.debian.org/debian bookworm/main arm64 python3-minimal arm64 3.11.2-1+b1 [26.3 kB] Get: 19 http://deb.debian.org/debian bookworm/main arm64 media-types all 10.0.0 [26.1 kB] Get: 20 http://deb.debian.org/debian bookworm/main arm64 libpython3.11-stdlib arm64 3.11.2-6 [1747 kB] Get: 21 http://deb.debian.org/debian bookworm/main arm64 python3.11 arm64 3.11.2-6 [572 kB] Get: 22 http://deb.debian.org/debian bookworm/main arm64 libpython3-stdlib arm64 3.11.2-1+b1 [9296 B] Get: 23 http://deb.debian.org/debian bookworm/main arm64 python3 arm64 3.11.2-1+b1 [26.3 kB] Get: 24 http://deb.debian.org/debian bookworm/main arm64 sgml-base all 1.31 [15.4 kB] Get: 25 http://deb.debian.org/debian bookworm/main arm64 tzdata all 2023c-5+deb12u1 [296 kB] Get: 26 http://deb.debian.org/debian bookworm/main arm64 ca-certificates all 20230311 [153 kB] Get: 27 http://deb.debian.org/debian bookworm/main arm64 libmagic-mgc arm64 1:5.44-3 [305 kB] Get: 28 http://deb.debian.org/debian bookworm/main arm64 libmagic1 arm64 1:5.44-3 [98.5 kB] Get: 29 http://deb.debian.org/debian bookworm/main arm64 file arm64 1:5.44-3 [42.5 kB] Get: 30 http://deb.debian.org/debian bookworm/main arm64 gettext-base arm64 0.21-12 [159 kB] Get: 31 http://deb.debian.org/debian bookworm/main arm64 libuchardet0 arm64 0.0.7-1 [67.9 kB] Get: 32 http://deb.debian.org/debian bookworm/main arm64 groff-base arm64 1.22.4-10 [861 kB] Get: 33 http://deb.debian.org/debian bookworm/main arm64 bsdextrautils arm64 2.38.1-5+b1 [86.9 kB] Get: 34 http://deb.debian.org/debian bookworm/main arm64 libpipeline1 arm64 1.5.7-1 [36.4 kB] Get: 35 http://deb.debian.org/debian bookworm/main arm64 man-db arm64 2.11.2-2 [1369 kB] Get: 36 http://deb.debian.org/debian bookworm/main arm64 m4 arm64 1.4.19-3 [276 kB] Get: 37 http://deb.debian.org/debian bookworm/main arm64 autoconf all 2.71-3 [332 kB] Get: 38 http://deb.debian.org/debian bookworm/main arm64 autotools-dev all 20220109.1 [51.6 kB] Get: 39 http://deb.debian.org/debian bookworm/main arm64 automake all 1:1.16.5-1.3 [823 kB] Get: 40 http://deb.debian.org/debian bookworm/main arm64 autopoint all 0.21-12 [495 kB] Get: 41 http://deb.debian.org/debian bookworm/main arm64 sbcl arm64 2:2.2.9-1 [8647 kB] Get: 42 http://deb.debian.org/debian bookworm/main arm64 buildapp arm64 1.5.6-3+b1 [7286 kB] Get: 43 http://deb.debian.org/debian bookworm/main arm64 cl-alexandria all 20211025.gita67c3a6-1 [212 kB] Get: 44 http://deb.debian.org/debian bookworm/main arm64 cl-esrap all 20211008.gitc99c33a-1 [54.0 kB] Get: 45 http://deb.debian.org/debian bookworm/main arm64 cl-ppcre all 20220126.gitb4056c5-1 [113 kB] Get: 46 http://deb.debian.org/debian bookworm/main arm64 cl-abnf all 20200229.gitba1fbb1-1 [11.4 kB] Get: 47 http://deb.debian.org/debian bookworm/main arm64 cl-anaphora all 1:0.9.8-1 [8168 B] Get: 48 http://deb.debian.org/debian bookworm/main arm64 cl-asdf all 2:3.3.6-1 [1290 kB] Get: 49 http://deb.debian.org/debian bookworm/main arm64 cl-asdf-finalizers all 20170403-1.1 [9620 B] Get: 50 http://deb.debian.org/debian bookworm/main arm64 cl-asdf-system-connections all 20170124-1.1 [5080 B] Get: 51 http://deb.debian.org/debian bookworm/main arm64 cl-trivial-features all 20210228.gitf6e8dd7-2 [10.9 kB] Get: 52 http://deb.debian.org/debian bookworm/main arm64 cl-trivial-gray-streams all 20210117.git2b3823e-1 [10.5 kB] Get: 53 http://deb.debian.org/debian bookworm/main arm64 cl-babel all 20200719.gitf892d05-2 [125 kB] Get: 54 http://deb.debian.org/debian bookworm/main arm64 cl-rt all 20090812.gita6a7503-1 [13.2 kB] Get: 55 http://deb.debian.org/debian bookworm/main arm64 cl-kmrcl all 1.111-2 [46.7 kB] Get: 56 http://deb.debian.org/debian bookworm/main arm64 cl-base64 all 3.4.0-1 [9936 B] Get: 57 http://deb.debian.org/debian bookworm/main arm64 cl-bordeaux-threads all 0.8.8-5 [23.2 kB] Get: 58 http://deb.debian.org/debian bookworm/main arm64 libpkgconf3 arm64 1.8.1-1 [35.3 kB] Get: 59 http://deb.debian.org/debian bookworm/main arm64 pkgconf-bin arm64 1.8.1-1 [28.9 kB] Get: 60 http://deb.debian.org/debian bookworm/main arm64 pkgconf arm64 1.8.1-1 [25.9 kB] Get: 61 http://deb.debian.org/debian bookworm/main arm64 pkg-config arm64 1.8.1-1 [13.7 kB] Get: 62 http://deb.debian.org/debian bookworm/main arm64 libffi-dev arm64 3.4.4-1 [56.0 kB] Get: 63 http://deb.debian.org/debian bookworm/main arm64 zlib1g-dev arm64 1:1.2.13.dfsg-1 [913 kB] Get: 64 http://deb.debian.org/debian bookworm/main arm64 cl-cffi all 1:0.24.1-3 [1682 kB] Get: 65 http://deb.debian.org/debian bookworm/main arm64 cl-chipz all 20220213.git82a17d3-1 [37.4 kB] Get: 66 http://deb.debian.org/debian bookworm/main arm64 cl-chunga all 20220222.git7836609-1 [19.6 kB] Get: 67 http://deb.debian.org/debian bookworm/main arm64 cl-closer-mop all 2:20220227.giteabdf6a-1 [25.8 kB] Get: 68 http://deb.debian.org/debian bookworm/main arm64 cl-closure-common all 20101107-1.1 [25.2 kB] Get: 69 http://deb.debian.org/debian bookworm/main arm64 cl-command-line-arguments all 20151218-1.1 [9544 B] Get: 70 http://deb.debian.org/debian bookworm/main arm64 cl-metatilities-base all 20170403-1.1 [51.9 kB] Get: 71 http://deb.debian.org/debian bookworm/main arm64 cl-containers all 20170403-1.1 [114 kB] Get: 72 http://deb.debian.org/debian bookworm/main arm64 cl-iterate all 20210519.gitb0f9a9c-1 [49.3 kB] Get: 73 http://deb.debian.org/debian bookworm/main arm64 cl-flexi-streams all 20210728.git41af5dc-1 [176 kB] Get: 74 http://deb.debian.org/debian bookworm/main arm64 cl-unicode all 20201101.git54bdf2c-1 [1316 kB] Get: 75 http://deb.debian.org/debian bookworm/main arm64 cl-named-readtables all 20201221.gitc5689a4-1 [28.0 kB] Get: 76 http://deb.debian.org/debian bookworm/main arm64 cl-interpol all 20220725.gitd4f49d4-1 [32.8 kB] Get: 77 http://deb.debian.org/debian bookworm/main arm64 cl-csv all 20200929.git68ecb5d-1 [27.7 kB] Get: 78 http://deb.debian.org/debian bookworm/main arm64 cl-cxml all 20110619-2.1 [82.5 kB] Get: 79 http://deb.debian.org/debian bookworm/main arm64 cl-db3 all 20200212-1 [8388 B] Get: 80 http://deb.debian.org/debian bookworm/main arm64 cl-puri all 1:1.5.7.2-1 [19.1 kB] Get: 81 http://deb.debian.org/debian bookworm/main arm64 cl-split-sequence all 1:2.0.1-1 [11.9 kB] Get: 82 http://deb.debian.org/debian bookworm/main arm64 cl-usocket all 0.8.3-2 [74.9 kB] Get: 83 http://deb.debian.org/debian bookworm/main arm64 cl-trivial-garbage all 20211229.gitb3af9c0-1 [9000 B] Get: 84 http://deb.debian.org/debian bookworm/main arm64 cl-plus-ssl all 20220328.git8b91648-4 [57.3 kB] Get: 85 http://deb.debian.org/debian bookworm/main arm64 cl-drakma all 2.0.8-1 [46.3 kB] Get: 86 http://deb.debian.org/debian bookworm/main arm64 cl-dynamic-classes all 20130128-2.1 [6916 B] Get: 87 http://deb.debian.org/debian bookworm/main arm64 cl-fad all 20220110.git3f4d32d-1 [24.4 kB] Get: 88 http://deb.debian.org/debian bookworm/main arm64 cl-garbage-pools all 20130720-1.1 [3144 B] Get: 89 http://deb.debian.org/debian bookworm/main arm64 cl-global-vars all 0~20141013.gitc749f32-2 [5156 B] Get: 90 http://deb.debian.org/debian bookworm/main arm64 cl-ieee-floats all 20170830-1.1 [6828 B] Get: 91 http://deb.debian.org/debian bookworm/main arm64 cl-ironclad all 0.57-3 [1170 kB] Get: 92 http://deb.debian.org/debian bookworm/main arm64 cl-ixf all 20180228-1.1 [9852 B] Get: 93 http://deb.debian.org/debian bookworm/main arm64 cl-local-time all 20180228-1.1 [26.7 kB] Get: 94 http://deb.debian.org/debian bookworm/main arm64 cl-log all 1.0.1-1.1 [20.8 kB] Get: 95 http://deb.debian.org/debian bookworm/main arm64 cl-lparallel all 20160825-1.1 [49.8 kB] Get: 96 http://deb.debian.org/debian bookworm/main arm64 cl-metabang-bind all 20200101.git9ab6e64-1 [17.6 kB] Get: 97 http://deb.debian.org/debian bookworm/main arm64 cl-markdown all 20101006-2.1 [37.4 kB] Get: 98 http://deb.debian.org/debian bookworm/main arm64 cl-md5 all 1:20210622.git906593f-1 [14.8 kB] Get: 99 http://deb.debian.org/debian bookworm/main arm64 freetds-common all 1.3.17+ds-2 [28.9 kB] Get: 100 http://deb.debian.org/debian bookworm/main arm64 libct4 arm64 1.3.17+ds-2 [147 kB] Get: 101 http://deb.debian.org/debian bookworm/main arm64 libsybdb5 arm64 1.3.17+ds-2 [171 kB] Get: 102 http://deb.debian.org/debian bookworm/main arm64 freetds-dev arm64 1.3.17+ds-2 [262 kB] Get: 103 http://deb.debian.org/debian bookworm/main arm64 cl-mssql all 20180228-1.1 [8652 B] Get: 104 http://deb.debian.org/debian bookworm/main arm64 cl-mustache all 0.12.1-9-g684f227-1.1 [9880 B] Get: 105 http://deb.debian.org/debian bookworm/main arm64 cl-parse-number all 1.7-1.1 [7368 B] Get: 106 http://deb.debian.org/debian bookworm/main arm64 cl-uax-15 all 0~20211021.git75c8a87-3 [387 kB] Get: 107 http://deb.debian.org/debian bookworm/main arm64 cl-postgres all 20211113.git9d4332f-3 [64.0 kB] Get: 108 http://deb.debian.org/debian bookworm/main arm64 cl-s-sql all 20211113.git9d4332f-3 [69.9 kB] Get: 109 http://deb.debian.org/debian bookworm/main arm64 cl-postmodern all 20211113.git9d4332f-3 [361 kB] Get: 110 http://deb.debian.org/debian bookworm/main arm64 cl-py-configparser all 20170830-1.1 [8612 B] Get: 111 http://deb.debian.org/debian bookworm/main arm64 cl-qmynd all 20180131-1.1 [37.3 kB] Get: 112 http://deb.debian.org/debian bookworm/main arm64 cl-quri all 20150804-1.1 [66.5 kB] Get: 113 http://deb.debian.org/debian bookworm/main arm64 cl-simple-date all 20211113.git9d4332f-3 [19.3 kB] Get: 114 http://deb.debian.org/debian bookworm/main arm64 cl-sqlite all 20130615-2.1 [14.7 kB] Get: 115 http://deb.debian.org/debian bookworm/main arm64 cl-trivial-backtrace all 20200511.git6eb65bd-1 [10.1 kB] Get: 116 http://deb.debian.org/debian bookworm/main arm64 cl-trivial-utf-8 all 20111001-1.1 [7760 B] Get: 117 http://deb.debian.org/debian bookworm/main arm64 cl-utilities all 1.2.4-3.2 [22.2 kB] Get: 118 http://deb.debian.org/debian bookworm/main arm64 cl-uuid all 20130813-1.1 [6876 B] Get: 119 http://deb.debian.org/debian bookworm/main arm64 cl-yason all 0.7.6-1.1 [10.0 kB] Get: 120 http://deb.debian.org/debian bookworm/main arm64 cl-zs3 all 1.3.1-1.1 [48.6 kB] Get: 121 http://deb.debian.org/debian bookworm/main arm64 libdebhelper-perl all 13.11.4 [81.2 kB] Get: 122 http://deb.debian.org/debian bookworm/main arm64 libtool all 2.4.7-5 [517 kB] Get: 123 http://deb.debian.org/debian bookworm/main arm64 dh-autoreconf all 20 [17.1 kB] Get: 124 http://deb.debian.org/debian bookworm/main arm64 libarchive-zip-perl all 1.68-1 [104 kB] Get: 125 http://deb.debian.org/debian bookworm/main arm64 libsub-override-perl all 0.09-4 [9304 B] Get: 126 http://deb.debian.org/debian bookworm/main arm64 libfile-stripnondeterminism-perl all 1.13.1-1 [19.4 kB] Get: 127 http://deb.debian.org/debian bookworm/main arm64 dh-strip-nondeterminism all 1.13.1-1 [8620 B] Get: 128 http://deb.debian.org/debian bookworm/main arm64 libelf1 arm64 0.188-2.1 [173 kB] Get: 129 http://deb.debian.org/debian bookworm/main arm64 dwz arm64 0.15-1 [101 kB] Get: 130 http://deb.debian.org/debian bookworm/main arm64 libicu72 arm64 72.1-3 [9204 kB] Get: 131 http://deb.debian.org/debian bookworm/main arm64 libxml2 arm64 2.9.14+dfsg-1.3~deb12u1 [619 kB] Get: 132 http://deb.debian.org/debian bookworm/main arm64 gettext arm64 0.21-12 [1248 kB] Get: 133 http://deb.debian.org/debian bookworm/main arm64 intltool-debian all 0.35.0+20060710.6 [22.9 kB] Get: 134 http://deb.debian.org/debian bookworm/main arm64 po-debconf all 1.0.21+nmu1 [248 kB] Get: 135 http://deb.debian.org/debian bookworm/main arm64 debhelper all 13.11.4 [942 kB] Get: 136 http://deb.debian.org/debian bookworm/main arm64 xml-core all 0.18+nmu1 [23.8 kB] Get: 137 http://deb.debian.org/debian bookworm/main arm64 docutils-common all 0.19+dfsg-6 [127 kB] Get: 138 http://deb.debian.org/debian bookworm/main arm64 fonts-font-awesome all 5.0.10+really4.7.0~dfsg-4.1 [517 kB] Get: 139 http://deb.debian.org/debian bookworm/main arm64 help2man arm64 1.49.3 [198 kB] Get: 140 http://deb.debian.org/debian bookworm/main arm64 libbsd0 arm64 0.11.7-2 [115 kB] Get: 141 http://deb.debian.org/debian bookworm/main arm64 libedit2 arm64 3.1-20221030-2 [88.1 kB] Get: 142 http://deb.debian.org/debian bookworm/main arm64 libjs-jquery all 3.6.1+dfsg+~3.5.14-1 [326 kB] Get: 143 http://deb.debian.org/debian bookworm/main arm64 libjs-underscore all 1.13.4~dfsg+~1.11.4-3 [116 kB] Get: 144 http://deb.debian.org/debian bookworm/main arm64 libjs-sphinxdoc all 5.3.0-4 [130 kB] Get: 145 http://deb.debian.org/debian bookworm/main arm64 libsasl2-modules-db arm64 2.1.28+dfsg-10 [20.8 kB] Get: 146 http://deb.debian.org/debian bookworm/main arm64 libsasl2-2 arm64 2.1.28+dfsg-10 [58.0 kB] Get: 147 http://deb.debian.org/debian bookworm/main arm64 libldap-2.5-0 arm64 2.5.13+dfsg-5 [171 kB] Get: 148 http://deb.debian.org/debian bookworm/main arm64 libz3-4 arm64 4.8.12-3.1 [6282 kB] Get: 149 http://deb.debian.org/debian bookworm/main arm64 libllvm14 arm64 1:14.0.6-12 [19.3 MB] Get: 150 http://deb.debian.org/debian bookworm/main arm64 libpq5 arm64 15.5-0+deb12u1 [178 kB] Get: 151 http://deb.debian.org/debian bookworm/main arm64 libsqlite3-dev arm64 3.40.1-2 [979 kB] Get: 152 http://deb.debian.org/debian bookworm/main arm64 libxslt1.1 arm64 1.1.35-1 [231 kB] Get: 153 http://deb.debian.org/debian bookworm/main arm64 postgresql-client-15 arm64 15.5-0+deb12u1 [1648 kB] Get: 154 http://deb.debian.org/debian bookworm/main arm64 postgresql-15 arm64 15.5-0+deb12u1 [16.3 MB] Get: 155 http://deb.debian.org/debian bookworm/main arm64 postgresql-15-ip4r arm64 2.4.1-8 [194 kB] Get: 156 http://deb.debian.org/debian bookworm/main arm64 python-babel-localedata all 2.10.3-1 [5615 kB] Get: 157 http://deb.debian.org/debian bookworm/main arm64 python3-alabaster all 0.7.12-1 [20.8 kB] Get: 158 http://deb.debian.org/debian bookworm/main arm64 python3-pkg-resources all 66.1.1-1 [296 kB] Get: 159 http://deb.debian.org/debian bookworm/main arm64 python3-tz all 2022.7.1-4 [30.1 kB] Get: 160 http://deb.debian.org/debian bookworm/main arm64 python3-babel all 2.10.3-1 [103 kB] Get: 161 http://deb.debian.org/debian bookworm/main arm64 python3-certifi all 2022.9.24-1 [153 kB] Get: 162 http://deb.debian.org/debian bookworm/main arm64 python3-chardet all 5.1.0+dfsg-2 [110 kB] Get: 163 http://deb.debian.org/debian bookworm/main arm64 python3-charset-normalizer all 3.0.1-2 [49.3 kB] Get: 164 http://deb.debian.org/debian bookworm/main arm64 python3-lib2to3 all 3.11.2-3 [76.3 kB] Get: 165 http://deb.debian.org/debian bookworm/main arm64 python3-distutils all 3.11.2-3 [131 kB] Get: 166 http://deb.debian.org/debian bookworm/main arm64 python3-roman all 3.3-3 [9880 B] Get: 167 http://deb.debian.org/debian bookworm/main arm64 python3-docutils all 0.19+dfsg-6 [382 kB] Get: 168 http://deb.debian.org/debian bookworm/main arm64 python3-idna all 3.3-1 [39.4 kB] Get: 169 http://deb.debian.org/debian bookworm/main arm64 python3-imagesize all 1.4.1-1 [6688 B] Get: 170 http://deb.debian.org/debian bookworm/main arm64 python3-markupsafe arm64 2.1.2-1+b1 [13.3 kB] Get: 171 http://deb.debian.org/debian bookworm/main arm64 python3-jinja2 all 3.1.2-1 [119 kB] Get: 172 http://deb.debian.org/debian bookworm/main arm64 python3-packaging all 23.0-1 [32.5 kB] Get: 173 http://deb.debian.org/debian bookworm/main arm64 python3-pygments all 2.14.0+dfsg-1 [783 kB] Get: 174 http://deb.debian.org/debian bookworm/main arm64 python3-six all 1.16.0-4 [17.5 kB] Get: 175 http://deb.debian.org/debian bookworm/main arm64 python3-urllib3 all 1.26.12-1 [117 kB] Get: 176 http://deb.debian.org/debian bookworm/main arm64 python3-requests all 2.28.1+dfsg-1 [67.9 kB] Get: 177 http://deb.debian.org/debian bookworm/main arm64 python3-snowballstemmer all 2.2.0-2 [57.8 kB] Get: 178 http://deb.debian.org/debian bookworm/main arm64 sphinx-common all 5.3.0-4 [653 kB] Get: 179 http://deb.debian.org/debian bookworm/main arm64 python3-sphinx all 5.3.0-4 [549 kB] Get: 180 http://deb.debian.org/debian bookworm/main arm64 sphinx-rtd-theme-common all 1.2.0+dfsg-1 [997 kB] Get: 181 http://deb.debian.org/debian bookworm/main arm64 python3-sphinx-rtd-theme all 1.2.0+dfsg-1 [27.7 kB] Fetched 113 MB in 3s (41.9 MB/s) debconf: delaying package configuration, since apt-utils is not installed Selecting previously unselected package fonts-lato. (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 ... 18171 files and directories currently installed.) Preparing to unpack .../fonts-lato_2.0-2.1_all.deb ... Unpacking fonts-lato (2.0-2.1) ... Selecting previously unselected package readline-common. Preparing to unpack .../readline-common_8.2-1.3_all.deb ... Unpacking readline-common (8.2-1.3) ... Selecting previously unselected package libreadline8:arm64. Preparing to unpack .../libreadline8_8.2-1.3_arm64.deb ... Unpacking libreadline8:arm64 (8.2-1.3) ... Selecting previously unselected package libsigsegv2:arm64. Preparing to unpack .../libsigsegv2_2.14-1_arm64.deb ... Unpacking libsigsegv2:arm64 (2.14-1) ... Setting up readline-common (8.2-1.3) ... Setting up libreadline8:arm64 (8.2-1.3) ... Setting up libsigsegv2:arm64 (2.14-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 ... 18230 files and directories currently installed.) Preparing to unpack .../00-gawk_1%3a5.2.1-2_arm64.deb ... Unpacking gawk (1:5.2.1-2) ... Selecting previously unselected package liblocale-gettext-perl. Preparing to unpack .../01-liblocale-gettext-perl_1.07-5_arm64.deb ... Unpacking liblocale-gettext-perl (1.07-5) ... Selecting previously unselected package libjson-perl. Preparing to unpack .../02-libjson-perl_4.10000-1_all.deb ... Unpacking libjson-perl (4.10000-1) ... Selecting previously unselected package netbase. Preparing to unpack .../03-netbase_6.4_all.deb ... Unpacking netbase (6.4) ... Selecting previously unselected package postgresql-client-common. Preparing to unpack .../04-postgresql-client-common_248_all.deb ... Unpacking postgresql-client-common (248) ... Selecting previously unselected package openssl. Preparing to unpack .../05-openssl_3.0.11-1~deb12u2_arm64.deb ... Unpacking openssl (3.0.11-1~deb12u2) ... Selecting previously unselected package ssl-cert. Preparing to unpack .../06-ssl-cert_1.1.2_all.deb ... Unpacking ssl-cert (1.1.2) ... Selecting previously unselected package sensible-utils. Preparing to unpack .../07-sensible-utils_0.0.17+nmu1_all.deb ... Unpacking sensible-utils (0.0.17+nmu1) ... Selecting previously unselected package ucf. Preparing to unpack .../08-ucf_3.0043+nmu1_all.deb ... Moving old data out of the way Unpacking ucf (3.0043+nmu1) ... Selecting previously unselected package postgresql-common. Preparing to unpack .../09-postgresql-common_248_all.deb ... Adding 'diversion of /usr/bin/pg_config to /usr/bin/pg_config.libpq-dev by postgresql-common' Unpacking postgresql-common (248) ... Selecting previously unselected package libpython3.11-minimal:arm64. Preparing to unpack .../10-libpython3.11-minimal_3.11.2-6_arm64.deb ... Unpacking libpython3.11-minimal:arm64 (3.11.2-6) ... Selecting previously unselected package libexpat1:arm64. Preparing to unpack .../11-libexpat1_2.5.0-1_arm64.deb ... Unpacking libexpat1:arm64 (2.5.0-1) ... Selecting previously unselected package python3.11-minimal. Preparing to unpack .../12-python3.11-minimal_3.11.2-6_arm64.deb ... Unpacking python3.11-minimal (3.11.2-6) ... Setting up libpython3.11-minimal:arm64 (3.11.2-6) ... Setting up libexpat1:arm64 (2.5.0-1) ... Setting up python3.11-minimal (3.11.2-6) ... 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 ... 19336 files and directories currently installed.) Preparing to unpack .../python3-minimal_3.11.2-1+b1_arm64.deb ... Unpacking python3-minimal (3.11.2-1+b1) ... Selecting previously unselected package media-types. Preparing to unpack .../media-types_10.0.0_all.deb ... Unpacking media-types (10.0.0) ... Selecting previously unselected package libpython3.11-stdlib:arm64. Preparing to unpack .../libpython3.11-stdlib_3.11.2-6_arm64.deb ... Unpacking libpython3.11-stdlib:arm64 (3.11.2-6) ... Selecting previously unselected package python3.11. Preparing to unpack .../python3.11_3.11.2-6_arm64.deb ... Unpacking python3.11 (3.11.2-6) ... Selecting previously unselected package libpython3-stdlib:arm64. Preparing to unpack .../libpython3-stdlib_3.11.2-1+b1_arm64.deb ... Unpacking libpython3-stdlib:arm64 (3.11.2-1+b1) ... Setting up python3-minimal (3.11.2-1+b1) ... 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 ... 19746 files and directories currently installed.) Preparing to unpack .../000-python3_3.11.2-1+b1_arm64.deb ... Unpacking python3 (3.11.2-1+b1) ... Selecting previously unselected package sgml-base. Preparing to unpack .../001-sgml-base_1.31_all.deb ... Unpacking sgml-base (1.31) ... Selecting previously unselected package tzdata. Preparing to unpack .../002-tzdata_2023c-5+deb12u1_all.deb ... Unpacking tzdata (2023c-5+deb12u1) ... Selecting previously unselected package ca-certificates. Preparing to unpack .../003-ca-certificates_20230311_all.deb ... Unpacking ca-certificates (20230311) ... Selecting previously unselected package libmagic-mgc. Preparing to unpack .../004-libmagic-mgc_1%3a5.44-3_arm64.deb ... Unpacking libmagic-mgc (1:5.44-3) ... Selecting previously unselected package libmagic1:arm64. Preparing to unpack .../005-libmagic1_1%3a5.44-3_arm64.deb ... Unpacking libmagic1:arm64 (1:5.44-3) ... Selecting previously unselected package file. Preparing to unpack .../006-file_1%3a5.44-3_arm64.deb ... Unpacking file (1:5.44-3) ... Selecting previously unselected package gettext-base. Preparing to unpack .../007-gettext-base_0.21-12_arm64.deb ... Unpacking gettext-base (0.21-12) ... Selecting previously unselected package libuchardet0:arm64. Preparing to unpack .../008-libuchardet0_0.0.7-1_arm64.deb ... Unpacking libuchardet0:arm64 (0.0.7-1) ... Selecting previously unselected package groff-base. Preparing to unpack .../009-groff-base_1.22.4-10_arm64.deb ... Unpacking groff-base (1.22.4-10) ... Selecting previously unselected package bsdextrautils. Preparing to unpack .../010-bsdextrautils_2.38.1-5+b1_arm64.deb ... Unpacking bsdextrautils (2.38.1-5+b1) ... Selecting previously unselected package libpipeline1:arm64. Preparing to unpack .../011-libpipeline1_1.5.7-1_arm64.deb ... Unpacking libpipeline1:arm64 (1.5.7-1) ... Selecting previously unselected package man-db. Preparing to unpack .../012-man-db_2.11.2-2_arm64.deb ... Unpacking man-db (2.11.2-2) ... Selecting previously unselected package m4. Preparing to unpack .../013-m4_1.4.19-3_arm64.deb ... Unpacking m4 (1.4.19-3) ... Selecting previously unselected package autoconf. Preparing to unpack .../014-autoconf_2.71-3_all.deb ... Unpacking autoconf (2.71-3) ... Selecting previously unselected package autotools-dev. Preparing to unpack .../015-autotools-dev_20220109.1_all.deb ... Unpacking autotools-dev (20220109.1) ... Selecting previously unselected package automake. Preparing to unpack .../016-automake_1%3a1.16.5-1.3_all.deb ... Unpacking automake (1:1.16.5-1.3) ... Selecting previously unselected package autopoint. Preparing to unpack .../017-autopoint_0.21-12_all.deb ... Unpacking autopoint (0.21-12) ... Selecting previously unselected package sbcl. Preparing to unpack .../018-sbcl_2%3a2.2.9-1_arm64.deb ... Unpacking sbcl (2:2.2.9-1) ... Selecting previously unselected package buildapp. Preparing to unpack .../019-buildapp_1.5.6-3+b1_arm64.deb ... Unpacking buildapp (1.5.6-3+b1) ... Selecting previously unselected package cl-alexandria. Preparing to unpack .../020-cl-alexandria_20211025.gita67c3a6-1_all.deb ... Unpacking cl-alexandria (20211025.gita67c3a6-1) ... Selecting previously unselected package cl-esrap. Preparing to unpack .../021-cl-esrap_20211008.gitc99c33a-1_all.deb ... Unpacking cl-esrap (20211008.gitc99c33a-1) ... Selecting previously unselected package cl-ppcre. Preparing to unpack .../022-cl-ppcre_20220126.gitb4056c5-1_all.deb ... Unpacking cl-ppcre (20220126.gitb4056c5-1) ... Selecting previously unselected package cl-abnf. Preparing to unpack .../023-cl-abnf_20200229.gitba1fbb1-1_all.deb ... Unpacking cl-abnf (20200229.gitba1fbb1-1) ... Selecting previously unselected package cl-anaphora. Preparing to unpack .../024-cl-anaphora_1%3a0.9.8-1_all.deb ... Unpacking cl-anaphora (1:0.9.8-1) ... Selecting previously unselected package cl-asdf. Preparing to unpack .../025-cl-asdf_2%3a3.3.6-1_all.deb ... Unpacking cl-asdf (2:3.3.6-1) ... Selecting previously unselected package cl-asdf-finalizers. Preparing to unpack .../026-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 .../027-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 .../028-cl-trivial-features_20210228.gitf6e8dd7-2_all.deb ... Unpacking cl-trivial-features (20210228.gitf6e8dd7-2) ... Selecting previously unselected package cl-trivial-gray-streams. Preparing to unpack .../029-cl-trivial-gray-streams_20210117.git2b3823e-1_all.deb ... Unpacking cl-trivial-gray-streams (20210117.git2b3823e-1) ... Selecting previously unselected package cl-babel. Preparing to unpack .../030-cl-babel_20200719.gitf892d05-2_all.deb ... Unpacking cl-babel (20200719.gitf892d05-2) ... Selecting previously unselected package cl-rt. Preparing to unpack .../031-cl-rt_20090812.gita6a7503-1_all.deb ... Unpacking cl-rt (20090812.gita6a7503-1) ... Selecting previously unselected package cl-kmrcl. Preparing to unpack .../032-cl-kmrcl_1.111-2_all.deb ... Unpacking cl-kmrcl (1.111-2) ... Selecting previously unselected package cl-base64. Preparing to unpack .../033-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 .../034-cl-bordeaux-threads_0.8.8-5_all.deb ... Unpacking cl-bordeaux-threads (0.8.8-5) ... Selecting previously unselected package libpkgconf3:arm64. Preparing to unpack .../035-libpkgconf3_1.8.1-1_arm64.deb ... Unpacking libpkgconf3:arm64 (1.8.1-1) ... Selecting previously unselected package pkgconf-bin. Preparing to unpack .../036-pkgconf-bin_1.8.1-1_arm64.deb ... Unpacking pkgconf-bin (1.8.1-1) ... Selecting previously unselected package pkgconf:arm64. Preparing to unpack .../037-pkgconf_1.8.1-1_arm64.deb ... Unpacking pkgconf:arm64 (1.8.1-1) ... Selecting previously unselected package pkg-config:arm64. Preparing to unpack .../038-pkg-config_1.8.1-1_arm64.deb ... Unpacking pkg-config:arm64 (1.8.1-1) ... Selecting previously unselected package libffi-dev:arm64. Preparing to unpack .../039-libffi-dev_3.4.4-1_arm64.deb ... Unpacking libffi-dev:arm64 (3.4.4-1) ... Selecting previously unselected package zlib1g-dev:arm64. Preparing to unpack .../040-zlib1g-dev_1%3a1.2.13.dfsg-1_arm64.deb ... Unpacking zlib1g-dev:arm64 (1:1.2.13.dfsg-1) ... Selecting previously unselected package cl-cffi. Preparing to unpack .../041-cl-cffi_1%3a0.24.1-3_all.deb ... Unpacking cl-cffi (1:0.24.1-3) ... Selecting previously unselected package cl-chipz. Preparing to unpack .../042-cl-chipz_20220213.git82a17d3-1_all.deb ... Unpacking cl-chipz (20220213.git82a17d3-1) ... Selecting previously unselected package cl-chunga. Preparing to unpack .../043-cl-chunga_20220222.git7836609-1_all.deb ... Unpacking cl-chunga (20220222.git7836609-1) ... Selecting previously unselected package cl-closer-mop. Preparing to unpack .../044-cl-closer-mop_2%3a20220227.giteabdf6a-1_all.deb ... Unpacking cl-closer-mop (2:20220227.giteabdf6a-1) ... Selecting previously unselected package cl-closure-common. Preparing to unpack .../045-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 .../046-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 .../047-cl-metatilities-base_20170403-1.1_all.deb ... Unpacking cl-metatilities-base (20170403-1.1) ... Selecting previously unselected package cl-containers. Preparing to unpack .../048-cl-containers_20170403-1.1_all.deb ... Unpacking cl-containers (20170403-1.1) ... Selecting previously unselected package cl-iterate. Preparing to unpack .../049-cl-iterate_20210519.gitb0f9a9c-1_all.deb ... Unpacking cl-iterate (20210519.gitb0f9a9c-1) ... Selecting previously unselected package cl-flexi-streams. Preparing to unpack .../050-cl-flexi-streams_20210728.git41af5dc-1_all.deb ... Unpacking cl-flexi-streams (20210728.git41af5dc-1) ... Selecting previously unselected package cl-unicode. Preparing to unpack .../051-cl-unicode_20201101.git54bdf2c-1_all.deb ... Unpacking cl-unicode (20201101.git54bdf2c-1) ... Selecting previously unselected package cl-named-readtables. Preparing to unpack .../052-cl-named-readtables_20201221.gitc5689a4-1_all.deb ... Unpacking cl-named-readtables (20201221.gitc5689a4-1) ... Selecting previously unselected package cl-interpol. Preparing to unpack .../053-cl-interpol_20220725.gitd4f49d4-1_all.deb ... Unpacking cl-interpol (20220725.gitd4f49d4-1) ... Selecting previously unselected package cl-csv. Preparing to unpack .../054-cl-csv_20200929.git68ecb5d-1_all.deb ... Unpacking cl-csv (20200929.git68ecb5d-1) ... Selecting previously unselected package cl-cxml. Preparing to unpack .../055-cl-cxml_20110619-2.1_all.deb ... Unpacking cl-cxml (20110619-2.1) ... Selecting previously unselected package cl-db3. Preparing to unpack .../056-cl-db3_20200212-1_all.deb ... Unpacking cl-db3 (20200212-1) ... Selecting previously unselected package cl-puri. Preparing to unpack .../057-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 .../058-cl-split-sequence_1%3a2.0.1-1_all.deb ... Unpacking cl-split-sequence (1:2.0.1-1) ... Selecting previously unselected package cl-usocket. Preparing to unpack .../059-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 .../060-cl-trivial-garbage_20211229.gitb3af9c0-1_all.deb ... Unpacking cl-trivial-garbage (20211229.gitb3af9c0-1) ... Selecting previously unselected package cl-plus-ssl. Preparing to unpack .../061-cl-plus-ssl_20220328.git8b91648-4_all.deb ... Unpacking cl-plus-ssl (20220328.git8b91648-4) ... Selecting previously unselected package cl-drakma. Preparing to unpack .../062-cl-drakma_2.0.8-1_all.deb ... Unpacking cl-drakma (2.0.8-1) ... Selecting previously unselected package cl-dynamic-classes. Preparing to unpack .../063-cl-dynamic-classes_20130128-2.1_all.deb ... Unpacking cl-dynamic-classes (20130128-2.1) ... Selecting previously unselected package cl-fad. Preparing to unpack .../064-cl-fad_20220110.git3f4d32d-1_all.deb ... Unpacking cl-fad (20220110.git3f4d32d-1) ... Selecting previously unselected package cl-garbage-pools. Preparing to unpack .../065-cl-garbage-pools_20130720-1.1_all.deb ... Unpacking cl-garbage-pools (20130720-1.1) ... Selecting previously unselected package cl-global-vars. Preparing to unpack .../066-cl-global-vars_0~20141013.gitc749f32-2_all.deb ... Unpacking cl-global-vars (0~20141013.gitc749f32-2) ... Selecting previously unselected package cl-ieee-floats. Preparing to unpack .../067-cl-ieee-floats_20170830-1.1_all.deb ... Unpacking cl-ieee-floats (20170830-1.1) ... Selecting previously unselected package cl-ironclad. Preparing to unpack .../068-cl-ironclad_0.57-3_all.deb ... Unpacking cl-ironclad (0.57-3) ... Selecting previously unselected package cl-ixf. Preparing to unpack .../069-cl-ixf_20180228-1.1_all.deb ... Unpacking cl-ixf (20180228-1.1) ... Selecting previously unselected package cl-local-time. Preparing to unpack .../070-cl-local-time_20180228-1.1_all.deb ... Unpacking cl-local-time (20180228-1.1) ... Selecting previously unselected package cl-log. Preparing to unpack .../071-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 .../072-cl-lparallel_20160825-1.1_all.deb ... Unpacking cl-lparallel (20160825-1.1) ... Selecting previously unselected package cl-metabang-bind. Preparing to unpack .../073-cl-metabang-bind_20200101.git9ab6e64-1_all.deb ... Unpacking cl-metabang-bind (20200101.git9ab6e64-1) ... Selecting previously unselected package cl-markdown. Preparing to unpack .../074-cl-markdown_20101006-2.1_all.deb ... Unpacking cl-markdown (20101006-2.1) ... Selecting previously unselected package cl-md5. Preparing to unpack .../075-cl-md5_1%3a20210622.git906593f-1_all.deb ... Unpacking cl-md5 (1:20210622.git906593f-1) ... Selecting previously unselected package freetds-common. Preparing to unpack .../076-freetds-common_1.3.17+ds-2_all.deb ... Unpacking freetds-common (1.3.17+ds-2) ... Selecting previously unselected package libct4:arm64. Preparing to unpack .../077-libct4_1.3.17+ds-2_arm64.deb ... Unpacking libct4:arm64 (1.3.17+ds-2) ... Selecting previously unselected package libsybdb5:arm64. Preparing to unpack .../078-libsybdb5_1.3.17+ds-2_arm64.deb ... Unpacking libsybdb5:arm64 (1.3.17+ds-2) ... Selecting previously unselected package freetds-dev. Preparing to unpack .../079-freetds-dev_1.3.17+ds-2_arm64.deb ... Unpacking freetds-dev (1.3.17+ds-2) ... Selecting previously unselected package cl-mssql. Preparing to unpack .../080-cl-mssql_20180228-1.1_all.deb ... Unpacking cl-mssql (20180228-1.1) ... Selecting previously unselected package cl-mustache. Preparing to unpack .../081-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 .../082-cl-parse-number_1.7-1.1_all.deb ... Unpacking cl-parse-number (1.7-1.1) ... Selecting previously unselected package cl-uax-15. Preparing to unpack .../083-cl-uax-15_0~20211021.git75c8a87-3_all.deb ... Unpacking cl-uax-15 (0~20211021.git75c8a87-3) ... Selecting previously unselected package cl-postgres. Preparing to unpack .../084-cl-postgres_20211113.git9d4332f-3_all.deb ... Unpacking cl-postgres (20211113.git9d4332f-3) ... Selecting previously unselected package cl-s-sql. Preparing to unpack .../085-cl-s-sql_20211113.git9d4332f-3_all.deb ... Unpacking cl-s-sql (20211113.git9d4332f-3) ... Selecting previously unselected package cl-postmodern. Preparing to unpack .../086-cl-postmodern_20211113.git9d4332f-3_all.deb ... Unpacking cl-postmodern (20211113.git9d4332f-3) ... Selecting previously unselected package cl-py-configparser. Preparing to unpack .../087-cl-py-configparser_20170830-1.1_all.deb ... Unpacking cl-py-configparser (20170830-1.1) ... Selecting previously unselected package cl-qmynd. Preparing to unpack .../088-cl-qmynd_20180131-1.1_all.deb ... Unpacking cl-qmynd (20180131-1.1) ... Selecting previously unselected package cl-quri. Preparing to unpack .../089-cl-quri_20150804-1.1_all.deb ... Unpacking cl-quri (20150804-1.1) ... Selecting previously unselected package cl-simple-date. Preparing to unpack .../090-cl-simple-date_20211113.git9d4332f-3_all.deb ... Unpacking cl-simple-date (20211113.git9d4332f-3) ... Selecting previously unselected package cl-sqlite. Preparing to unpack .../091-cl-sqlite_20130615-2.1_all.deb ... Unpacking cl-sqlite (20130615-2.1) ... Selecting previously unselected package cl-trivial-backtrace. Preparing to unpack .../092-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 .../093-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 .../094-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 .../095-cl-uuid_20130813-1.1_all.deb ... Unpacking cl-uuid (20130813-1.1) ... Selecting previously unselected package cl-yason. Preparing to unpack .../096-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 .../097-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 .../098-libdebhelper-perl_13.11.4_all.deb ... Unpacking libdebhelper-perl (13.11.4) ... Selecting previously unselected package libtool. Preparing to unpack .../099-libtool_2.4.7-5_all.deb ... Unpacking libtool (2.4.7-5) ... Selecting previously unselected package dh-autoreconf. Preparing to unpack .../100-dh-autoreconf_20_all.deb ... Unpacking dh-autoreconf (20) ... Selecting previously unselected package libarchive-zip-perl. Preparing to unpack .../101-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 .../102-libsub-override-perl_0.09-4_all.deb ... Unpacking libsub-override-perl (0.09-4) ... Selecting previously unselected package libfile-stripnondeterminism-perl. Preparing to unpack .../103-libfile-stripnondeterminism-perl_1.13.1-1_all.deb ... Unpacking libfile-stripnondeterminism-perl (1.13.1-1) ... Selecting previously unselected package dh-strip-nondeterminism. Preparing to unpack .../104-dh-strip-nondeterminism_1.13.1-1_all.deb ... Unpacking dh-strip-nondeterminism (1.13.1-1) ... Selecting previously unselected package libelf1:arm64. Preparing to unpack .../105-libelf1_0.188-2.1_arm64.deb ... Unpacking libelf1:arm64 (0.188-2.1) ... Selecting previously unselected package dwz. Preparing to unpack .../106-dwz_0.15-1_arm64.deb ... Unpacking dwz (0.15-1) ... Selecting previously unselected package libicu72:arm64. Preparing to unpack .../107-libicu72_72.1-3_arm64.deb ... Unpacking libicu72:arm64 (72.1-3) ... Selecting previously unselected package libxml2:arm64. Preparing to unpack .../108-libxml2_2.9.14+dfsg-1.3~deb12u1_arm64.deb ... Unpacking libxml2:arm64 (2.9.14+dfsg-1.3~deb12u1) ... Selecting previously unselected package gettext. Preparing to unpack .../109-gettext_0.21-12_arm64.deb ... Unpacking gettext (0.21-12) ... Selecting previously unselected package intltool-debian. Preparing to unpack .../110-intltool-debian_0.35.0+20060710.6_all.deb ... Unpacking intltool-debian (0.35.0+20060710.6) ... Selecting previously unselected package po-debconf. Preparing to unpack .../111-po-debconf_1.0.21+nmu1_all.deb ... Unpacking po-debconf (1.0.21+nmu1) ... Selecting previously unselected package debhelper. Preparing to unpack .../112-debhelper_13.11.4_all.deb ... Unpacking debhelper (13.11.4) ... Selecting previously unselected package xml-core. Preparing to unpack .../113-xml-core_0.18+nmu1_all.deb ... Unpacking xml-core (0.18+nmu1) ... Selecting previously unselected package docutils-common. Preparing to unpack .../114-docutils-common_0.19+dfsg-6_all.deb ... Unpacking docutils-common (0.19+dfsg-6) ... Selecting previously unselected package fonts-font-awesome. Preparing to unpack .../115-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 .../116-help2man_1.49.3_arm64.deb ... Unpacking help2man (1.49.3) ... Selecting previously unselected package libbsd0:arm64. Preparing to unpack .../117-libbsd0_0.11.7-2_arm64.deb ... Unpacking libbsd0:arm64 (0.11.7-2) ... Selecting previously unselected package libedit2:arm64. Preparing to unpack .../118-libedit2_3.1-20221030-2_arm64.deb ... Unpacking libedit2:arm64 (3.1-20221030-2) ... Selecting previously unselected package libjs-jquery. Preparing to unpack .../119-libjs-jquery_3.6.1+dfsg+~3.5.14-1_all.deb ... Unpacking libjs-jquery (3.6.1+dfsg+~3.5.14-1) ... Selecting previously unselected package libjs-underscore. Preparing to unpack .../120-libjs-underscore_1.13.4~dfsg+~1.11.4-3_all.deb ... Unpacking libjs-underscore (1.13.4~dfsg+~1.11.4-3) ... Selecting previously unselected package libjs-sphinxdoc. Preparing to unpack .../121-libjs-sphinxdoc_5.3.0-4_all.deb ... Unpacking libjs-sphinxdoc (5.3.0-4) ... Selecting previously unselected package libsasl2-modules-db:arm64. Preparing to unpack .../122-libsasl2-modules-db_2.1.28+dfsg-10_arm64.deb ... Unpacking libsasl2-modules-db:arm64 (2.1.28+dfsg-10) ... Selecting previously unselected package libsasl2-2:arm64. Preparing to unpack .../123-libsasl2-2_2.1.28+dfsg-10_arm64.deb ... Unpacking libsasl2-2:arm64 (2.1.28+dfsg-10) ... Selecting previously unselected package libldap-2.5-0:arm64. Preparing to unpack .../124-libldap-2.5-0_2.5.13+dfsg-5_arm64.deb ... Unpacking libldap-2.5-0:arm64 (2.5.13+dfsg-5) ... Selecting previously unselected package libz3-4:arm64. Preparing to unpack .../125-libz3-4_4.8.12-3.1_arm64.deb ... Unpacking libz3-4:arm64 (4.8.12-3.1) ... Selecting previously unselected package libllvm14:arm64. Preparing to unpack .../126-libllvm14_1%3a14.0.6-12_arm64.deb ... Unpacking libllvm14:arm64 (1:14.0.6-12) ... Selecting previously unselected package libpq5:arm64. Preparing to unpack .../127-libpq5_15.5-0+deb12u1_arm64.deb ... Unpacking libpq5:arm64 (15.5-0+deb12u1) ... Selecting previously unselected package libsqlite3-dev:arm64. Preparing to unpack .../128-libsqlite3-dev_3.40.1-2_arm64.deb ... Unpacking libsqlite3-dev:arm64 (3.40.1-2) ... Selecting previously unselected package libxslt1.1:arm64. Preparing to unpack .../129-libxslt1.1_1.1.35-1_arm64.deb ... Unpacking libxslt1.1:arm64 (1.1.35-1) ... Selecting previously unselected package postgresql-client-15. Preparing to unpack .../130-postgresql-client-15_15.5-0+deb12u1_arm64.deb ... Unpacking postgresql-client-15 (15.5-0+deb12u1) ... Selecting previously unselected package postgresql-15. Preparing to unpack .../131-postgresql-15_15.5-0+deb12u1_arm64.deb ... Unpacking postgresql-15 (15.5-0+deb12u1) ... Selecting previously unselected package postgresql-15-ip4r. Preparing to unpack .../132-postgresql-15-ip4r_2.4.1-8_arm64.deb ... Unpacking postgresql-15-ip4r (2.4.1-8) ... Selecting previously unselected package python-babel-localedata. Preparing to unpack .../133-python-babel-localedata_2.10.3-1_all.deb ... Unpacking python-babel-localedata (2.10.3-1) ... Selecting previously unselected package python3-alabaster. Preparing to unpack .../134-python3-alabaster_0.7.12-1_all.deb ... Unpacking python3-alabaster (0.7.12-1) ... Selecting previously unselected package python3-pkg-resources. Preparing to unpack .../135-python3-pkg-resources_66.1.1-1_all.deb ... Unpacking python3-pkg-resources (66.1.1-1) ... Selecting previously unselected package python3-tz. Preparing to unpack .../136-python3-tz_2022.7.1-4_all.deb ... Unpacking python3-tz (2022.7.1-4) ... Selecting previously unselected package python3-babel. Preparing to unpack .../137-python3-babel_2.10.3-1_all.deb ... Unpacking python3-babel (2.10.3-1) ... Selecting previously unselected package python3-certifi. Preparing to unpack .../138-python3-certifi_2022.9.24-1_all.deb ... Unpacking python3-certifi (2022.9.24-1) ... Selecting previously unselected package python3-chardet. Preparing to unpack .../139-python3-chardet_5.1.0+dfsg-2_all.deb ... Unpacking python3-chardet (5.1.0+dfsg-2) ... Selecting previously unselected package python3-charset-normalizer. Preparing to unpack .../140-python3-charset-normalizer_3.0.1-2_all.deb ... Unpacking python3-charset-normalizer (3.0.1-2) ... Selecting previously unselected package python3-lib2to3. Preparing to unpack .../141-python3-lib2to3_3.11.2-3_all.deb ... Unpacking python3-lib2to3 (3.11.2-3) ... Selecting previously unselected package python3-distutils. Preparing to unpack .../142-python3-distutils_3.11.2-3_all.deb ... Unpacking python3-distutils (3.11.2-3) ... Selecting previously unselected package python3-roman. Preparing to unpack .../143-python3-roman_3.3-3_all.deb ... Unpacking python3-roman (3.3-3) ... Selecting previously unselected package python3-docutils. Preparing to unpack .../144-python3-docutils_0.19+dfsg-6_all.deb ... Unpacking python3-docutils (0.19+dfsg-6) ... Selecting previously unselected package python3-idna. Preparing to unpack .../145-python3-idna_3.3-1_all.deb ... Unpacking python3-idna (3.3-1) ... Selecting previously unselected package python3-imagesize. Preparing to unpack .../146-python3-imagesize_1.4.1-1_all.deb ... Unpacking python3-imagesize (1.4.1-1) ... Selecting previously unselected package python3-markupsafe. Preparing to unpack .../147-python3-markupsafe_2.1.2-1+b1_arm64.deb ... Unpacking python3-markupsafe (2.1.2-1+b1) ... Selecting previously unselected package python3-jinja2. Preparing to unpack .../148-python3-jinja2_3.1.2-1_all.deb ... Unpacking python3-jinja2 (3.1.2-1) ... Selecting previously unselected package python3-packaging. Preparing to unpack .../149-python3-packaging_23.0-1_all.deb ... Unpacking python3-packaging (23.0-1) ... Selecting previously unselected package python3-pygments. Preparing to unpack .../150-python3-pygments_2.14.0+dfsg-1_all.deb ... Unpacking python3-pygments (2.14.0+dfsg-1) ... Selecting previously unselected package python3-six. Preparing to unpack .../151-python3-six_1.16.0-4_all.deb ... Unpacking python3-six (1.16.0-4) ... Selecting previously unselected package python3-urllib3. Preparing to unpack .../152-python3-urllib3_1.26.12-1_all.deb ... Unpacking python3-urllib3 (1.26.12-1) ... Selecting previously unselected package python3-requests. Preparing to unpack .../153-python3-requests_2.28.1+dfsg-1_all.deb ... Unpacking python3-requests (2.28.1+dfsg-1) ... Selecting previously unselected package python3-snowballstemmer. Preparing to unpack .../154-python3-snowballstemmer_2.2.0-2_all.deb ... Unpacking python3-snowballstemmer (2.2.0-2) ... Selecting previously unselected package sphinx-common. Preparing to unpack .../155-sphinx-common_5.3.0-4_all.deb ... Unpacking sphinx-common (5.3.0-4) ... Selecting previously unselected package python3-sphinx. Preparing to unpack .../156-python3-sphinx_5.3.0-4_all.deb ... Unpacking python3-sphinx (5.3.0-4) ... Selecting previously unselected package sphinx-rtd-theme-common. Preparing to unpack .../157-sphinx-rtd-theme-common_1.2.0+dfsg-1_all.deb ... Unpacking sphinx-rtd-theme-common (1.2.0+dfsg-1) ... Selecting previously unselected package python3-sphinx-rtd-theme. Preparing to unpack .../158-python3-sphinx-rtd-theme_1.2.0+dfsg-1_all.deb ... Unpacking python3-sphinx-rtd-theme (1.2.0+dfsg-1) ... Setting up media-types (10.0.0) ... Setting up libpipeline1:arm64 (1.5.7-1) ... Setting up cl-trivial-utf-8 (20111001-1.1) ... Setting up fonts-lato (2.0-2.1) ... Setting up cl-trivial-garbage (20211229.gitb3af9c0-1) ... Setting up libicu72:arm64 (72.1-3) ... Setting up cl-garbage-pools (20130720-1.1) ... Setting up bsdextrautils (2.38.1-5+b1) ... Setting up cl-closer-mop (2:20220227.giteabdf6a-1) ... Setting up libmagic-mgc (1:5.44-3) ... Setting up cl-metabang-bind (20200101.git9ab6e64-1) ... Setting up gawk (1:5.2.1-2) ... Setting up cl-asdf (2:3.3.6-1) ... Setting up libarchive-zip-perl (1.68-1) ... Setting up cl-closure-common (20101107-1.1) ... Setting up cl-parse-number (1.7-1.1) ... Setting up libpython3.11-stdlib:arm64 (3.11.2-6) ... Setting up libdebhelper-perl (13.11.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 (20211113.git9d4332f-3) ... Setting up cl-quri (20150804-1.1) ... Setting up libmagic1:arm64 (1:5.44-3) ... Setting up gettext-base (0.21-12) ... Setting up cl-named-readtables (20201221.gitc5689a4-1) ... Setting up m4 (1.4.19-3) ... Setting up cl-trivial-features (20210228.gitf6e8dd7-2) ... Setting up cl-trivial-backtrace (20200511.git6eb65bd-1) ... Setting up file (1:5.44-3) ... Setting up libffi-dev:arm64 (3.4.4-1) ... Setting up python-babel-localedata (2.10.3-1) ... Setting up cl-split-sequence (1:2.0.1-1) ... Setting up cl-metatilities-base (20170403-1.1) ... Setting up cl-trivial-gray-streams (20210117.git2b3823e-1) ... Setting up libsasl2-modules-db:arm64 (2.1.28+dfsg-10) ... Setting up tzdata (2023c-5+deb12u1) ... Current default time zone: 'Etc/UTC' Local time is now: Mon Jan 8 11:51:44 UTC 2024. Universal Time is now: Mon Jan 8 11:51:44 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 (20220109.1) ... Setting up cl-yason (0.7.6-1.1) ... Setting up libz3-4:arm64 (4.8.12-3.1) ... Setting up libpkgconf3:arm64 (1.8.1-1) ... Setting up libsqlite3-dev:arm64 (3.40.1-2) ... 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-12) ... Setting up pkgconf-bin (1.8.1-1) ... Setting up libsasl2-2:arm64 (2.1.28+dfsg-10) ... Setting up cl-global-vars (0~20141013.gitc749f32-2) ... Setting up autoconf (2.71-3) ... Setting up cl-chipz (20220213.git82a17d3-1) ... Setting up sbcl (2:2.2.9-1) ... Setting up zlib1g-dev:arm64 (1:1.2.13.dfsg-1) ... Setting up cl-chunga (20220222.git7836609-1) ... Setting up sensible-utils (0.0.17+nmu1) ... Setting up libuchardet0:arm64 (0.0.7-1) ... Setting up libjson-perl (4.10000-1) ... Setting up cl-alexandria (20211025.gita67c3a6-1) ... Setting up libsub-override-perl (0.09-4) ... Setting up netbase (6.4) ... Setting up sgml-base (1.31) ... Setting up cl-iterate (20210519.gitb0f9a9c-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.3.17+ds-2) ... Setting up libjs-jquery (3.6.1+dfsg+~3.5.14-1) ... Setting up cl-py-configparser (20170830-1.1) ... Setting up cl-ppcre (20220126.gitb4056c5-1) ... Setting up cl-anaphora (1:0.9.8-1) ... Setting up openssl (3.0.11-1~deb12u2) ... Setting up libbsd0:arm64 (0.11.7-2) ... Setting up cl-ieee-floats (20170830-1.1) ... Setting up libelf1:arm64 (0.188-2.1) ... Setting up libxml2:arm64 (2.9.14+dfsg-1.3~deb12u1) ... Setting up fonts-font-awesome (5.0.10+really4.7.0~dfsg-4.1) ... Setting up sphinx-rtd-theme-common (1.2.0+dfsg-1) ... Setting up liblocale-gettext-perl (1.07-5) ... Setting up libpython3-stdlib:arm64 (3.11.2-1+b1) ... Setting up libjs-underscore (1.13.4~dfsg+~1.11.4-3) ... Setting up buildapp (1.5.6-3+b1) ... Setting up automake (1:1.16.5-1.3) ... update-alternatives: using /usr/bin/automake-1.16 to provide /usr/bin/automake (automake) in auto mode Setting up postgresql-client-common (248) ... Setting up libfile-stripnondeterminism-perl (1.13.1-1) ... Setting up cl-containers (20170403-1.1) ... Setting up python3.11 (3.11.2-6) ... Setting up gettext (0.21-12) ... Setting up cl-flexi-streams (20210728.git41af5dc-1) ... Setting up cl-uax-15 (0~20211021.git75c8a87-3) ... Setting up libtool (2.4.7-5) ... Setting up cl-ixf (20180228-1.1) ... Setting up libedit2:arm64 (3.1-20221030-2) ... Setting up libsybdb5:arm64 (1.3.17+ds-2) ... Setting up python3 (3.11.2-1+b1) ... Setting up python3-markupsafe (2.1.2-1+b1) ... Setting up cl-babel (20200719.gitf892d05-2) ... Setting up cl-bordeaux-threads (0.8.8-5) ... Setting up libldap-2.5-0:arm64 (2.5.13+dfsg-5) ... Setting up python3-tz (2022.7.1-4) ... Setting up pkgconf:arm64 (1.8.1-1) ... Setting up intltool-debian (0.35.0+20060710.6) ... Setting up help2man (1.49.3) ... Setting up python3-six (1.16.0-4) ... Setting up dh-autoreconf (20) ... Setting up ca-certificates (20230311) ... Updating certificates in /etc/ssl/certs... 140 added, 0 removed; done. Setting up python3-roman (3.3-3) ... Setting up python3-jinja2 (3.1.2-1) ... Setting up python3-packaging (23.0-1) ... Setting up libct4:arm64 (1.3.17+ds-2) ... Setting up python3-certifi (2022.9.24-1) ... Setting up ssl-cert (1.1.2) ... hostname: Name or service not known make-ssl-cert: Could not get FQDN, using 'codethink04-arm64'. make-ssl-cert: You may want to fix your /etc/hosts and/or DNS setup and run make-ssl-cert: 'make-ssl-cert generate-default-snakeoil --force-overwrite' make-ssl-cert: again. Setting up cl-kmrcl (1.111-2) ... Setting up python3-snowballstemmer (2.2.0-2) ... Setting up cl-lparallel (20160825-1.1) ... Setting up python3-idna (3.3-1) ... Setting up pkg-config:arm64 (1.8.1-1) ... Setting up cl-usocket (0.8.3-2) ... Setting up ucf (3.0043+nmu1) ... Setting up libjs-sphinxdoc (5.3.0-4) ... Setting up cl-md5 (1:20210622.git906593f-1) ... Setting up python3-urllib3 (1.26.12-1) ... Setting up dh-strip-nondeterminism (1.13.1-1) ... Setting up libllvm14:arm64 (1:14.0.6-12) ... Setting up dwz (0.15-1) ... Setting up cl-esrap (20211008.gitc99c33a-1) ... Setting up groff-base (1.22.4-10) ... Setting up xml-core (0.18+nmu1) ... Setting up libxslt1.1:arm64 (1.1.35-1) ... Setting up cl-markdown (20101006-2.1) ... Setting up cl-cffi (1:0.24.1-3) ... Setting up cl-unicode (20201101.git54bdf2c-1) ... Setting up cl-abnf (20200229.gitba1fbb1-1) ... Setting up python3-lib2to3 (3.11.2-3) ... Setting up python3-imagesize (1.4.1-1) ... Setting up cl-base64 (3.4.0-1) ... Setting up python3-pkg-resources (66.1.1-1) ... Setting up python3-distutils (3.11.2-3) ... Setting up cl-ironclad (0.57-3) ... Setting up cl-interpol (20220725.gitd4f49d4-1) ... Setting up freetds-dev (1.3.17+ds-2) ... Setting up python3-babel (2.10.3-1) ... update-alternatives: using /usr/bin/pybabel-python3 to provide /usr/bin/pybabel (pybabel) in auto mode Setting up cl-fad (20220110.git3f4d32d-1) ... Setting up python3-charset-normalizer (3.0.1-2) ... Setting up python3-alabaster (0.7.12-1) ... Setting up po-debconf (1.0.21+nmu1) ... Setting up cl-csv (20200929.git68ecb5d-1) ... Setting up libpq5:arm64 (15.5-0+deb12u1) ... Setting up postgresql-client-15 (15.5-0+deb12u1) ... update-alternatives: using /usr/share/postgresql/15/man/man1/psql.1.gz to provide /usr/share/man/man1/psql.1.gz (psql.1.gz) in auto mode Setting up man-db (2.11.2-2) ... Not building database; man-db/auto-update is not 'true'. Setting up cl-mssql (20180228-1.1) ... Setting up python3-pygments (2.14.0+dfsg-1) ... Setting up cl-qmynd (20180131-1.1) ... Setting up cl-plus-ssl (20220328.git8b91648-4) ... Setting up python3-chardet (5.1.0+dfsg-2) ... Setting up cl-sqlite (20130615-2.1) ... Setting up sphinx-common (5.3.0-4) ... Setting up python3-requests (2.28.1+dfsg-1) ... Setting up postgresql-common (248) ... Creating config file /etc/postgresql-common/createcluster.conf with new version Building PostgreSQL dictionaries from installed myspell/hunspell packages... Removing obsolete dictionary files: invoke-rc.d: could not determine current runlevel invoke-rc.d: policy-rc.d denied execution of start. Setting up cl-postgres (20211113.git9d4332f-3) ... Setting up cl-drakma (2.0.8-1) ... Setting up cl-uuid (20130813-1.1) ... Setting up postgresql-15 (15.5-0+deb12u1) ... Creating new PostgreSQL cluster 15/main ... /usr/lib/postgresql/15/bin/initdb -D /var/lib/postgresql/15/main --auth-local peer --auth-host scram-sha-256 --no-instructions The files belonging to this database system will be owned by user "postgres". This user must also own the server process. The database cluster will be initialized with locale "C.UTF-8". The default database encoding has accordingly been set to "UTF8". The default text search configuration will be set to "english". Data page checksums are disabled. fixing permissions on existing directory /var/lib/postgresql/15/main ... ok creating subdirectories ... ok selecting dynamic shared memory implementation ... posix selecting default max_connections ... 100 selecting default shared_buffers ... 128MB selecting default time zone ... /usr/share/zoneinfo/Etc/GMT+12 creating configuration files ... ok running bootstrap script ... ok performing post-bootstrap initialization ... ok syncing data to disk ... ok update-alternatives: using /usr/share/postgresql/15/man/man1/postmaster.1.gz to provide /usr/share/man/man1/postmaster.1.gz (postmaster.1.gz) in auto mode invoke-rc.d: could not determine current runlevel invoke-rc.d: policy-rc.d denied execution of start. Setting up cl-local-time (20180228-1.1) ... Setting up debhelper (13.11.4) ... Setting up postgresql-15-ip4r (2.4.1-8) ... Setting up cl-zs3 (1.3.1-1.1) ... Setting up cl-s-sql (20211113.git9d4332f-3) ... Setting up cl-postmodern (20211113.git9d4332f-3) ... Processing triggers for libc-bin (2.36-9+deb12u3) ... Processing triggers for sgml-base (1.31) ... Setting up docutils-common (0.19+dfsg-6) ... Processing triggers for sgml-base (1.31) ... Setting up python3-docutils (0.19+dfsg-6) ... Setting up python3-sphinx (5.3.0-4) ... Setting up python3-sphinx-rtd-theme (1.2.0+dfsg-1) ... Processing triggers for ca-certificates (20230311) ... 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.31-1.2). 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.9/ && 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.9-1_source.changes dpkg-buildpackage: info: source package pgloader dpkg-buildpackage: info: source version 3.6.9-1 dpkg-buildpackage: info: source distribution unstable dpkg-buildpackage: info: source changed by Christoph Berg dpkg-source --before-build . dpkg-buildpackage: info: host architecture arm64 dpkg-source: info: using options from pgloader-3.6.9/debian/source/options: --extend-diff-ignore=src/params.lisp fakeroot debian/rules clean dh clean debian/rules override_dh_auto_clean make[1]: Entering directory '/build/reproducible-path/pgloader-3.6.9' dh_auto_clean make -j12 clean make[2]: Entering directory '/build/reproducible-path/pgloader-3.6.9' rm -rf build/libs.stamp build/quicklisp build/manifest.ql build/bin/buildapp.sbcl build/bin/pgloader \ buildapp.log build/bundle/* build/pgloader-bundle* build/quicklisp.lisp docs/_build make -C test clean make[3]: Entering directory '/build/reproducible-path/pgloader-3.6.9/test' rm -f regress/out/* make[3]: Leaving directory '/build/reproducible-path/pgloader-3.6.9/test' make[2]: Leaving directory '/build/reproducible-path/pgloader-3.6.9' rm -rf debian/home # sanity checks on version number [ "3.6.9" = "3.6.9" ] # Makefile = docs/conf.py version [ "3.6.9" = "3.6.9" ] # Makefile = pgloader.spec version [ "3.6.9" = "3.6.9" ] # Makefile = debian/changelog version make[1]: Leaving directory '/build/reproducible-path/pgloader-3.6.9' 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.9' mkdir -p build/bin mkdir -p /build/reproducible-path/pgloader-3.6.9/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 16384 \ --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 23 SEP 2022 09:05:35 PM): ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-asdf/build/asdf-tmpGHU3ALSV.fasl ; compilation finished in 0:00:10.168 ;; 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.9/src/hooks.lisp" ;; loading system "pgloader" compressed 65536 bytes into 1730 at level 9 compressed 121700352 bytes into 19096340 at level 9 compressed 23396352 bytes into 4020842 at level 9 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" ;; # ;; # ;; (:ASDF3.3 :ASDF3.2 :ASDF3.1 :ASDF3 :ASDF2 :ASDF :OS-UNIX :NON-BASE-CHARS-EXIST-P :ASDF-UNICODE :ARM64 :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) ;; # ;; 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 :ARM64 :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 ;; 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 :ARM64 :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<= ;; 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 ;; CALL-WITH-OUTPUT ;; WITH-OUTPUT ;; 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 ;; NIL ;; # ;; NORMALIZE-VERSION ;; %REFRESH-COMPONENT-INLINE-METHODS ;; DEFSYSTEM ;; # ;; # ;; # ;; NIL ;; USER-SYSTEM-P ;; USER-SYSTEM ;; SELECT-BUNDLE-OPERATION ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; # ;; SYSDEF-PACKAGE-INFERRED-SYSTEM-SEARCH ;; (DUMPER138::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 ;; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/asdf-finalizers/pkgdcl-tmpAAURSO1.fasl ; compilation finished in 0:00:00.008 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/asdf-finalizers/finalizers-tmp5GEXGEG5.fasl ; compilation finished in 0:00:00.048 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/asdf-finalizers/asdf-support-tmpAR3FSGEY.fasl ; compilation finished in 0:00:00.012 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/asdf-finalizers/initialization-tmpJAIDFZTC.fasl ; compilation finished in 0:00:00.000 ;; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/asdf-system-connections/dev/asdf-system-connections-tmp8V3J6PE9.fasl ; compilation finished in 0:00:00.028 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 24 OCT 2021 08:11:41 PM): ; processing (DEFPACKAGE :ALEXANDRIA ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/alexandria/alexandria-1/package-tmp9V47YWQF.fasl ; compilation finished in 0:00:00.000 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/definitions.lisp" (written 24 OCT 2021 08:11:41 PM): ; processing (IN-PACKAGE :ALEXANDRIA) ; processing (DEFUN %REEVALUATE-CONSTANT ...) ; processing (DEFMACRO DEFINE-CONSTANT ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/alexandria/alexandria-1/definitions-tmp9BN22RMA.fasl ; compilation finished in 0:00:00.016 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/binding.lisp" (written 24 OCT 2021 08:11:41 PM): ; processing (IN-PACKAGE :ALEXANDRIA) ; processing (DEFMACRO IF-LET ...) ; processing (DEFMACRO WHEN-LET ...) ; processing (DEFMACRO WHEN-LET* ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/alexandria/alexandria-1/binding-tmp1CXFJSK9.fasl ; compilation finished in 0:00:00.016 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/strings.lisp" (written 24 OCT 2021 08:11:41 PM): ; processing (IN-PACKAGE :ALEXANDRIA) ; processing (DEFTYPE STRING-DESIGNATOR ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/alexandria/alexandria-1/strings-tmpX4BRKI0R.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/conditions.lisp" (written 24 OCT 2021 08:11:41 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/alexandria/alexandria-1/conditions-tmpQ371UGST.fasl ; compilation finished in 0:00:00.028 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/symbols.lisp" (written 24 OCT 2021 08:11:41 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/alexandria/alexandria-1/symbols-tmp2OWI3Q7U.fasl ; compilation finished in 0:00:00.020 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/macros.lisp" (written 24 OCT 2021 08:11:41 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/alexandria/alexandria-1/macros-tmp9KKTJMYV.fasl ; compilation finished in 0:00:00.104 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/functions.lisp" (written 24 OCT 2021 08:11:41 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/alexandria/alexandria-1/functions-tmpJU0JWO19.fasl ; compilation finished in 0:00:00.036 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/lists.lisp" (written 24 OCT 2021 08:11:41 PM): ; 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 (MACROLET (#) ...) ; 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 (MACROLET (#) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/alexandria/alexandria-1/lists-tmpZX2WN8N4.fasl ; compilation finished in 0:00:00.164 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/types.lisp" (written 24 OCT 2021 08:11:41 PM): ; processing (IN-PACKAGE :ALEXANDRIA) ; processing (DEFTYPE ARRAY-INDEX ...) ; processing (DEFTYPE ARRAY-LENGTH ...) ; processing (MACROLET (#) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/alexandria/alexandria-1/types-tmpOU81XRV0.fasl ; compilation finished in 0:00:00.084 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/io.lisp" (written 24 OCT 2021 08:11:41 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/alexandria/alexandria-1/io-tmpY2ML9CFA.fasl ; compilation finished in 0:00:00.164 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/hash-tables.lisp" (written 24 OCT 2021 08:11:41 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/alexandria/alexandria-1/hash-tables-tmpX2JYJDQE.fasl ; compilation finished in 0:00:00.084 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/control-flow.lisp" (written 24 OCT 2021 08:11:41 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/alexandria/alexandria-1/control-flow-tmpOPCILR65.fasl ; compilation finished in 0:00:00.036 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/arrays.lisp" (written 24 OCT 2021 08:11:41 PM): ; processing (IN-PACKAGE :ALEXANDRIA) ; processing (DEFUN COPY-ARRAY ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/alexandria/alexandria-1/arrays-tmpRV9F8A9A.fasl ; compilation finished in 0:00:00.016 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/sequences.lisp" (written 24 OCT 2021 08:11:41 PM): ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/alexandria/alexandria-1/sequences-tmpK2ZAJT4I.fasl ; compilation finished in 0:00:00.216 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/numbers.lisp" (written 24 OCT 2021 08:11:41 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/alexandria/alexandria-1/numbers-tmpUX5S4ADN.fasl ; compilation finished in 0:00:00.136 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-1/features.lisp" (written 24 OCT 2021 08:11:41 PM): ; processing (IN-PACKAGE :ALEXANDRIA) ; processing (DEFUN FEATUREP ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/alexandria/alexandria-1/features-tmp10401X32.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-2/package.lisp" (written 24 OCT 2021 08:11:41 PM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE :ALEXANDRIA-2 ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/alexandria/alexandria-2/package-tmpZ7CBRM0G.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-2/arrays.lisp" (written 24 OCT 2021 08:11:41 PM): ; processing (IN-PACKAGE :ALEXANDRIA-2) ; processing (DEFUN DIM-IN-BOUNDS-P ...) ; processing (DEFUN ROW-MAJOR-INDEX ...) ; processing (DEFUN RMAJOR-TO-INDICES ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/alexandria/alexandria-2/arrays-tmp9OZEQ0G2.fasl ; compilation finished in 0:00:00.016 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-2/control-flow.lisp" (written 24 OCT 2021 08:11:41 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/alexandria/alexandria-2/control-flow-tmpB2JTL1W9.fasl ; compilation finished in 0:00:00.008 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-2/sequences.lisp" (written 24 OCT 2021 08:11:41 PM): ; processing (IN-PACKAGE :ALEXANDRIA-2) ; processing (DEFUN SUBSEQ* ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/alexandria/alexandria-2/sequences-tmpP3BI68WQ.fasl ; compilation finished in 0:00:00.008 ; compiling file "/usr/share/common-lisp/source/alexandria/alexandria-2/lists.lisp" (written 24 OCT 2021 08:11:41 PM): ; processing (IN-PACKAGE :ALEXANDRIA-2) ; processing (DEFUN DELETE-FROM-PLIST* ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/alexandria/alexandria-2/lists-tmpQDARA81Z.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/trivial-features/src/tf-sbcl.lisp" (written 28 FEB 2021 08:31:40 AM): ; processing (IN-PACKAGE :CL-USER) ; processing (PUSHNEW (WITH-ALIEN # ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/trivial-features/src/tf-sbcl-tmpYEMMM7SE.fasl ; compilation finished in 0:00:00.004 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/babel/src/packages-tmp73HU0RPK.fasl ; compilation finished in 0:00:00.000 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/babel/src/encodings-tmpIO5N7K88.fasl ; compilation finished in 0:00:00.124 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/babel/src/enc-ascii-tmpCM21U60Z.fasl ; compilation finished in 0:00:00.004 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/babel/src/enc-ebcdic-tmp9DT7SEFG.fasl ; compilation finished in 0:00:00.012 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/babel/src/enc-ebcdic-int-tmp8065ESJT.fasl ; compilation finished in 0:00:00.008 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/babel/src/enc-iso-8859-tmp7S8Z6FGF.fasl ; compilation finished in 0:00:00.068 ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/babel/src/enc-unicode-tmpSIT3QPKP.fasl ; compilation finished in 0:00:00.208 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/babel/src/enc-cp437-tmpE0PA0714.fasl ; compilation finished in 0:00:00.008 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/babel/src/enc-cp1251-tmpJRWHHVG0.fasl ; compilation finished in 0:00:00.012 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/babel/src/enc-cp1252-tmp4WZVROCX.fasl ; compilation finished in 0:00:00.008 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/babel/src/jpn-table-tmpA0I3UKX8.fasl ; compilation finished in 0:00:00.116 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/babel/src/enc-jpn-tmp267Y2N80.fasl ; compilation finished in 0:00:00.036 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/babel/src/enc-gbk-tmpOUPE5FSJ.fasl ; compilation finished in 0:00:00.012 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/babel/src/enc-koi8-tmpIGHCU6ZA.fasl ; compilation finished in 0:00:00.020 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/babel/src/external-format-tmpBO0TUGLK.fasl ; compilation finished in 0:00:00.028 ; compiling file "/usr/share/common-lisp/source/babel/src/strings.lisp" (written 18 JUL 2020 06:57:54 PM): ; processing (IN-PACKAGE #:BABEL) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/babel/src/strings-tmpIIXPIQNW.fasl ; compilation finished in 0:00:02.828 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/babel/src/gbk-map-tmpOHM494YR.fasl ; compilation finished in 0:00:00.068 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/babel/src/sharp-backslash-tmpOVFB07XF.fasl ; compilation finished in 0:00:00.008 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/cffi-sbcl.lisp" (written 03 APR 2021 02:35:42 AM): ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DEFUN %CLOSE-FOREIGN-LIBRARY ...) ; processing (DEFUN NATIVE-NAMESTRING ...) ; processing (DEFUN %FOREIGN-SYMBOL-POINTER ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-cffi/src/cffi-sbcl-tmpG6VFGMYP.fasl ; compilation finished in 0:00:00.368 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/package.lisp" (written 03 APR 2021 02:35:42 AM): ; processing (IN-PACKAGE #:CL-USER) ; processing (DEFPACKAGE #:CFFI ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-cffi/src/package-tmp4QIPRMOF.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/utils.lisp" (written 03 APR 2021 02:35:42 AM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-cffi/src/utils-tmpGW0QV22K.fasl ; compilation finished in 0:00:00.024 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/libraries.lisp" (written 03 APR 2021 02:35:42 AM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-cffi/src/libraries-tmp2K9J0HSR.fasl ; compilation finished in 0:00:00.176 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/early-types.lisp" (written 03 APR 2021 02:35:42 AM): ; processing (IN-PACKAGE #:CFFI) ; processing (DEFVAR *DEFAULT-TYPE-PARSERS* ...) ; processing (DEFVAR *STRUCT-TYPE-PARSERS* ...) ; processing (DEFVAR *UNION-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 NAMESPACE-TABLE ...) ; processing (DEFUN FIND-TYPE-PARSER ...) ; processing (DEFUN FIND-DEFAULT-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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-cffi/src/early-types-tmpP44I4E0Y.fasl ; compilation finished in 0:00:00.200 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/types.lisp" (written 03 APR 2021 02:35:42 AM): ; 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 (PROGN (DEFINE-BUILT-IN-FOREIGN-TYPE :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 (DEFMACRO DEFCTYPE-MATCHING ...) ; processing (MACROLET (#) ...) ; processing (DEFCTYPE :SIZE ...) ; processing (DEFCTYPE :SSIZE ...) ; processing (DEFCTYPE :PTRDIFF ...) ; processing (DEFCTYPE :OFFSET ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-cffi/src/types-tmp63LQ7EX6.fasl ; compilation finished in 0:00:00.388 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/enum.lisp" (written 03 APR 2021 02:35:42 AM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-cffi/src/enum-tmp86F1A8FB.fasl ; compilation finished in 0:00:00.364 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/strings.lisp" (written 03 APR 2021 02:35:42 AM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-cffi/src/strings-tmpH7D4HL98.fasl ; compilation finished in 0:00:02.384 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/structures.lisp" (written 03 APR 2021 02:35:42 AM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-cffi/src/structures-tmpCDM7YXYI.fasl ; compilation finished in 0:00:00.024 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/functions.lisp" (written 03 APR 2021 02:35:42 AM): ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DEFUN FOREIGN-FUNCALL-VARARGS-FORM ...) ; processing (DEFMACRO FOREIGN-FUNCALL-VARARGS ...) ; processing (DEFMACRO FOREIGN-FUNCALL-POINTER-VARARGS ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-cffi/src/functions-tmpLM57P5P.fasl ; compilation finished in 0:00:00.192 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/foreign-vars.lisp" (written 03 APR 2021 02:35:42 AM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-cffi/src/foreign-vars-tmpZE69DN33.fasl ; compilation finished in 0:00:00.020 ; compiling file "/usr/share/common-lisp/source/cl-cffi/src/features.lisp" (written 03 APR 2021 02:35:42 AM): ; processing (IN-PACKAGE #:CL-USER) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DEFPACKAGE #:CFFI-FEATURES ...) ; processing (IN-PACKAGE #:CFFI-FEATURES) ; processing (DEFUN CFFI-FEATURE-P ...) ; processing (MAPC (LAMBDA # ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-cffi/src/features-tmpG8099TO3.fasl ; compilation finished in 0:00:00.008 ; ; 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+ssl/src/config.lisp" (written 27 MAR 2022 12:23:33 PM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE :CL+SSL/CONFIG ...) ; processing (IN-PACKAGE :CL+SSL/CONFIG) ; processing (DEFVAR *LIBSSL-OVERRIDE* ...) ; processing (DEFVAR *LIBCRYPTO-OVERRIDE* ...) ; processing (DEFMACRO DEFINE-LIBSSL-PATH ...) ; processing (DEFMACRO DEFINE-LIBCRYPTO-PATH ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl+ssl/src/config-tmpTASQCYAW.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/cl-trivial-gray-streams/package.lisp" (written 17 JAN 2021 08:01:37 AM): ; processing (IN-PACKAGE :CL-USER) ; processing (MACROLET (#) ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-trivial-gray-streams/package-tmp35U57IV6.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/cl-trivial-gray-streams/streams.lisp" (written 17 JAN 2021 08:01:37 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 (PROGN (DEFMETHOD SB-GRAY:STREAM-READ-SEQUENCE ...) ...) ; processing (DEFCLASS TRIVIAL-GRAY-STREAM-MIXIN ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-trivial-gray-streams/streams-tmpTZOONXRW.fasl ; compilation finished in 0:00:00.076 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/packages.lisp" (written 28 JUL 2021 07:07:50 AM): ; processing (IN-PACKAGE :CL-USER) ; processing (UNLESS (FIND-SYMBOL # ...) ...) ; processing (DEFPACKAGE :FLEXI-STREAMS ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-flexi-streams/packages-tmpWN0UKDSV.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/mapping.lisp" (written 28 JUL 2021 07:07:50 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-flexi-streams/mapping-tmpBF3HHBTQ.fasl ; compilation finished in 0:00:00.008 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/ascii.lisp" (written 28 JUL 2021 07:07:50 AM): ; processing (IN-PACKAGE :FLEXI-STREAMS) ; processing (DEFCONSTANT +ASCII-TABLE+ ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-flexi-streams/ascii-tmpGYUNPZCY.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/koi8-r.lisp" (written 28 JUL 2021 07:07:50 AM): ; processing (IN-PACKAGE :FLEXI-STREAMS) ; processing (DEFCONSTANT +KOI8-R-TABLE+ ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-flexi-streams/koi8-r-tmpD68Q8WCA.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/mac.lisp" (written 28 JUL 2021 07:07:50 AM): ; processing (IN-PACKAGE :FLEXI-STREAMS) ; processing (DEFCONSTANT +MAC-ROMAN-TABLE+ ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-flexi-streams/mac-tmp7MK9KM9C.fasl ; compilation finished in 0:00:00.000 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/iso-8859.lisp" (written 28 JUL 2021 07:07:50 AM): ; processing (IN-PACKAGE :FLEXI-STREAMS) ; processing (DEFCONSTANT +ISO-8859-TABLES+ ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-flexi-streams/iso-8859-tmpJJ71X849.fasl ; compilation finished in 0:00:00.016 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/enc-cn-tbl.lisp" (written 28 JUL 2021 07:07:50 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-flexi-streams/enc-cn-tbl-tmp1VUK6SR2.fasl ; compilation finished in 0:00:00.436 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/code-pages.lisp" (written 28 JUL 2021 07:07:50 AM): ; processing (IN-PACKAGE :FLEXI-STREAMS) ; processing (DEFCONSTANT +CODE-PAGE-TABLES+ ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-flexi-streams/code-pages-tmpR2FIHSUG.fasl ; compilation finished in 0:00:00.016 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/specials.lisp" (written 28 JUL 2021 07:07:50 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 +MAC-ROMAN-HASH+ ...) ; processing (DEFCONSTANT +BUFFER-SIZE+ ...) ; processing (PUSHNEW :FLEXI-STREAMS ...) ; processing (DEFVAR *HYPERDOC-BASE-URI* ...) ; processing (LET (#) ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-flexi-streams/specials-tmp8PYELRKX.fasl ; compilation finished in 0:00:00.024 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/util.lisp" (written 28 JUL 2021 07:07:50 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 MAC-ROMAN-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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-flexi-streams/util-tmpEHTOKYT0.fasl ; compilation finished in 0:00:00.060 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/conditions.lisp" (written 28 JUL 2021 07:07:50 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-flexi-streams/conditions-tmpS6U1VHI9.fasl ; compilation finished in 0:00:00.016 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/external-format.lisp" (written 28 JUL 2021 07:07:50 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: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a T, not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a T, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFUN NORMALIZE-EXTERNAL-FORMAT ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-flexi-streams/external-format-tmpVTFK6ZJW.fasl ; compilation finished in 0:00:00.132 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/length.lisp" (written 28 JUL 2021 07:07:50 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do full call ; unable to do inline float arithmetic (cost 5) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The result is a (VALUES (OR (COMPLEX DOUBLE-FLOAT) DOUBLE-FLOAT) ; &OPTIONAL), not a (VALUES DOUBLE-FLOAT &OPTIONAL). ; processing (DEFGENERIC CHECK-END ...) ; file: /usr/share/common-lisp/source/cl-flexi-streams/length.lisp ; in: DEFGENERIC CHECK-END ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT "This sequence can't be decoded ~ ; using ~A as it is too short. ~A octet~:P missing at the end." ; (FLEXI-STREAMS:EXTERNAL-FORMAT-NAME ; FORMAT) ; (- FLEXI-STREAMS::I FLEXI-STREAMS::END)) ; ; note: doing signed word to integer coercion (cost 20) ; 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) ; (DEFMETHOD FLEXI-STREAMS::COMPUTE-NUMBER-OF-CHARS ; ((FORMAT FLEXI-STREAMS::FLEXI-8-BIT-FORMAT) SEQUENCE ; FLEXI-STREAMS::START FLEXI-STREAMS::END) ; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; (DECLARE (FIXNUM FLEXI-STREAMS::START FLEXI-STREAMS::END)) ; (DECLARE (IGNORE SEQUENCE)) ; (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA (SB-PCL::FAST-METHOD ; FLEXI-STREAMS::COMPUTE-NUMBER-OF-CHARS ; (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT T T T)) ; (SB-PCL::.PV. SB-PCL::.NEXT-METHOD-CALL. FORMAT SEQUENCE ; FLEXI-STREAMS::START FLEXI-STREAMS::END) ; (DECLARE (IGNORABLE SB-PCL::.PV. SB-PCL::.NEXT-METHOD-CALL.) ; (DISABLE-PACKAGE-LOCKS SB-PCL::PV-ENV-ENVIRONMENT)) ; (DECLARE (IGNORE SEQUENCE)) ; (DECLARE (FIXNUM FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; (DECLARE ; (SB-C::CURRENT-DEFMETHOD FLEXI-STREAMS::COMPUTE-NUMBER-OF-CHARS NIL ; (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT T T T) ; (FORMAT SEQUENCE FLEXI-STREAMS::START FLEXI-STREAMS::END))) ; (DECLARE ; (SB-C::SOURCE-FORM ; (LAMBDA (FORMAT SEQUENCE FLEXI-STREAMS::START FLEXI-STREAMS::END) ; (DECLARE #) ; (DECLARE #) ; (DECLARE #) ; (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; (DECLARE (SB-PCL::%PARAMETER FLEXI-STREAMS::END)) ; (DECLARE (SB-PCL::%PARAMETER FLEXI-STREAMS::START)) ; (DECLARE (SB-PCL::%PARAMETER SEQUENCE)) ; ...) ; ; note: doing signed word to integer coercion (cost 20) to "" ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; 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 full call ; 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. ; 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::SIGNAL-ENCODING-ERROR FORMAT "~A octet~:P cannot be decoded ~ ; using UTF-16 as ~:*~A is not even." ; (- FLEXI-STREAMS::END ; FLEXI-STREAMS::START)) ; ; 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-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 +/SIGNED=>INTEGER (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 -9223372036854775804 9223372036854775810) ; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER -9223372036854775804 9223372036854775810) ; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline ASH (cost 1) 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) &OPTIONAL). ; 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-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; ; note: forced to do full call ; 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. ; (DECF LENGTH) ; --> THE SB-IMPL::XSUBTRACT BLOCK ; ==> ; (- SB-IMPL::B SB-IMPL::A) ; ; note: forced to do full call ; 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 ; &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER * 2305843009213693952), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES (INTEGER * 2305843009213693951) &OPTIONAL), not a (VALUES ; (SIGNED-BYTE ; 64) ; &OPTIONAL). ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; ; note: forced to do full call ; 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. ; (DECF LENGTH) ; --> THE SB-IMPL::XSUBTRACT BLOCK ; ==> ; (- SB-IMPL::B SB-IMPL::A) ; ; note: forced to do full call ; 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 ; &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER * 2305843009213693952), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES (INTEGER * 2305843009213693951) &OPTIONAL), not a (VALUES ; (SIGNED-BYTE ; 64) ; &OPTIONAL). ; etc. ; processing (DEFGENERIC COMPUTE-NUMBER-OF-OCTETS ...) ; processing (DEFMETHOD 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 (FLEXI-8-BIT-FORMAT T T T) ; (DEFMETHOD FLEXI-STREAMS::COMPUTE-NUMBER-OF-OCTETS ; ((FORMAT FLEXI-STREAMS::FLEXI-8-BIT-FORMAT) STRING ; FLEXI-STREAMS::START FLEXI-STREAMS::END) ; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; (DECLARE (FIXNUM FLEXI-STREAMS::START FLEXI-STREAMS::END)) ; (DECLARE (IGNORE STRING)) ; (- FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA (SB-PCL::FAST-METHOD ; FLEXI-STREAMS::COMPUTE-NUMBER-OF-OCTETS ; (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT T T T)) ; (SB-PCL::.PV. SB-PCL::.NEXT-METHOD-CALL. FORMAT STRING ; FLEXI-STREAMS::START FLEXI-STREAMS::END) ; (DECLARE (IGNORABLE SB-PCL::.PV. SB-PCL::.NEXT-METHOD-CALL.) ; (DISABLE-PACKAGE-LOCKS SB-PCL::PV-ENV-ENVIRONMENT)) ; (DECLARE (IGNORE STRING)) ; (DECLARE (FIXNUM FLEXI-STREAMS::END FLEXI-STREAMS::START)) ; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; (DECLARE ; (SB-C::CURRENT-DEFMETHOD FLEXI-STREAMS::COMPUTE-NUMBER-OF-OCTETS NIL ; (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT T T T) ; (FORMAT STRING FLEXI-STREAMS::START FLEXI-STREAMS::END))) ; (DECLARE ; (SB-C::SOURCE-FORM ; (LAMBDA (FORMAT STRING FLEXI-STREAMS::START FLEXI-STREAMS::END) ; (DECLARE #) ; (DECLARE #) ; (DECLARE #) ; (- FLEXI-STREAMS::END FLEXI-STREAMS::START)))) ; (DECLARE (SB-PCL::%PARAMETER FLEXI-STREAMS::END)) ; (DECLARE (SB-PCL::%PARAMETER FLEXI-STREAMS::START)) ; (DECLARE (SB-PCL::%PARAMETER STRING)) ; ...) ; ; note: doing signed word to integer coercion (cost 20) to "" ; 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 */SIGNED=>INTEGER (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 -36893488147419103228 36893488147419103228) ; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The result is a (VALUES ; (INTEGER -36893488147419103228 36893488147419103228) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &OPTIONAL). ; etc. ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: doing unsigned word to integer coercion (cost 20) ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; processing (DEFMETHOD CHARACTER-LENGTH ...) ; processing (DEFMETHOD CHARACTER-LENGTH ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-flexi-streams/length-tmp75WVSJEW.fasl ; compilation finished in 0:00:00.244 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/encode.lisp" (written 28 JUL 2021 07:07:50 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* ...) ; 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) ; --> CHAR ; ==> ; 1 ; ; 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) ; --> CHAR ; ==> ; 1 ; ; 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))) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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) ; --> CHAR ; ==> ; 1 ; ; 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) ; --> CHAR ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER) ; --> AREF ; ==> ; 1 ; ; 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) ; --> AREF ; ==> ; 1 ; ; 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))) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; 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) ; --> CHAR ; ==> ; 1 ; ; 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) ; --> CHAR ; ==> ; 1 ; ; 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))) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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) ; --> CHAR ; ==> ; 1 ; ; 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) ; --> CHAR ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER) ; --> AREF ; ==> ; 1 ; ; 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) ; --> AREF ; ==> ; 1 ; ; 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))) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; 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) ; --> CHAR ; ==> ; 1 ; ; 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)))) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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) ; --> CHAR ; ==> ; 1 ; ; 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) ; --> AREF ; ==> ; 1 ; ; 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)))) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; 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) ; --> CHAR ; ==> ; 1 ; ; 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))) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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) ; --> CHAR ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> AREF ; ==> ; 1 ; ; 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))) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; 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) ; --> CHAR ; ==> ; 1 ; ; 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 # # #))))) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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) ; --> CHAR ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> AREF ; ==> ; 1 ; ; 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 # # #))))) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; 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) ; --> CHAR ; ==> ; 1 ; ; 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 # # #))))) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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) ; --> CHAR ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> AREF ; ==> ; 1 ; ; 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 # # #))))) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; 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) ; --> CHAR ; ==> ; 1 ; ; 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) ; --> CHAR ; ==> ; 1 ; ; 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 # # #))))) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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) ; --> CHAR ; ==> ; 1 ; ; 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) ; --> CHAR ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER) ; --> AREF ; ==> ; 1 ; ; 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) ; --> AREF ; ==> ; 1 ; ; 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 # # #))))) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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: ; * ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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: ; * ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; 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) ; --> CHAR ; ==> ; 1 ; ; 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))))) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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) ; --> CHAR ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> AREF ; ==> ; 1 ; ; 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))))) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; 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) ; --> CHAR ; ==> ; 1 ; ; 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)))) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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) ; --> CHAR ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> AREF ; ==> ; 1 ; ; 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)))) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; 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-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST VECTOR), not a STRING. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387900 ; 4611686018427387900), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20) ; processing (DEFMETHOD CHAR-TO-OCTETS ...) ; processing (DEFMETHOD CHAR-TO-OCTETS ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-flexi-streams/encode-tmpBU5UM3S4.fasl ; compilation finished in 0:00:01.772 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/decode.lisp" (written 28 JUL 2021 07:07:50 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) ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; --> <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 ; ==> ; 1 ; ; 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-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 ; ==> ; 1 ; ; 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-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 ; ==> ; 1 ; ; 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-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> 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 ; ==> ; 1 ; ; 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-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 ; ==> ; 1 ; ; 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-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 ; ==> ; 1 ; ; 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-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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> 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 ; ==> ; 1 ; ; 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-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 ; ==> ; 1 ; ; 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-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 ; ==> ; 1 ; ; 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-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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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))) ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; --> <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (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)) ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (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))) ; --> 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 ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (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)) ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (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))) ; --> 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 ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (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)) ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (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))) ; --> 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 ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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))))) ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; --> <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (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))) ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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))))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (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))))) ; --> 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 ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (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))) ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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))))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (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))))) ; --> 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 ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (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))) ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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))))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (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))))) ; --> 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 ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 # ; # ; #))))) ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; --> <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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 # ; # ; #))))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (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 # ; # ; #))))) ; --> 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 ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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 # ; # ; #))))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (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 # ; # ; #))))) ; --> 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 ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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 # ; # ; #))))) ; --> 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. ; --> 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. ; --> 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. ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (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 # ; # ; #))))) ; --> 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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (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. ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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-WORD) ; ; note: implementation limitation: couldn't inline expand because expansion refers to the optimized away object #. ; ; note: deleting unused function ; (SB-C::LOCAL-INLINE READ-NEXT-WORD) ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> LET OR ; ==> ; (LET ((#:G37 FLEXI-STREAMS::OCTET-GETTER)) ; (IF #:G37 ; #:G37 ; (COND ; (FLEXI-STREAMS::FIRST-OCTET-SEEN ; (RETURN-FROM FLEXI-STREAMS::OCTETS-TO-CHAR-CODE #)) ; (T (RETURN-FROM FLEXI-STREAMS::OCTETS-TO-CHAR-CODE NIL))))) ; ; note: deleting unused function ; (LET ((#:G37 OCTET-GETTER))) ; (FLEXI-STREAMS::READ-NEXT-WORD) ; ; note: implementation limitation: couldn't inline expand because expansion refers to the optimized away object #. ; ; note: deleting unused function ; (SB-C::LOCAL-INLINE READ-NEXT-WORD) ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> LET OR ; ==> ; (LET ((#:G39 FLEXI-STREAMS::OCTET-GETTER)) ; (IF #:G39 ; #:G39 ; (COND ; (FLEXI-STREAMS::FIRST-OCTET-SEEN ; (RETURN-FROM FLEXI-STREAMS::OCTETS-TO-CHAR-CODE #)) ; (T (RETURN-FROM FLEXI-STREAMS::OCTETS-TO-CHAR-CODE NIL))))) ; ; note: deleting unused function ; (LET ((#:G39 OCTET-GETTER))) ; (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 # ; # ; #))))) ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET ; ==> ; (BLOCK FLEXI-STREAMS::OCTETS-TO-CHAR-CODE ; (SYMBOL-MACROLET ((FLEXI-STREAMS::OCTET-GETTER ; (FUNCALL FLEXI-STREAMS::READER))) ; (LET ((#:CHAR-CODE0 #)) ; (WHEN (AND #:CHAR-CODE0 #) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "Illegal code point ~A (#x~:*~X)." #:CHAR-CODE0)) ; #:CHAR-CODE0))) ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM OCTETS-TO-CHAR-CODE NIL). Use GO/RETURN-FROM with SAFETY 0, or ; declare the exit function DYNAMIC-EXTENT to avoid. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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. ; --> 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. ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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. ; --> 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. ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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 # ; # ; #))))) ; --> 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. ; --> 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. ; --> 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) ; --> LET OR LET IF COND IF THE ; ==> ; (RETURN-FROM FLEXI-STREAMS::CHAR-DECODER NIL) ; ; caught STYLE-WARNING: ; Result is a (VALUES &OPTIONAL NULL &REST T), 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 # ; # ; #))))) ; --> 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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (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 # ; # ; #))))) ; --> 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 ; ==> ; 1 ; ; 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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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-WORD) ; ; note: implementation limitation: couldn't inline expand because expansion refers to the optimized away object #. ; ; note: deleting unused function ; (SB-C::LOCAL-INLINE READ-NEXT-WORD) ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> LET OR ; ==> ; (LET ((#:G37 FLEXI-STREAMS::OCTET-GETTER)) ; (IF #:G37 ; #:G37 ; (COND ; (FLEXI-STREAMS::FIRST-OCTET-SEEN ; (RETURN-FROM FLEXI-STREAMS::OCTETS-TO-CHAR-CODE #)) ; (T (RETURN-FROM FLEXI-STREAMS::OCTETS-TO-CHAR-CODE NIL))))) ; ; note: deleting unused function ; (LET ((#:G37 OCTET-GETTER))) ; (FLEXI-STREAMS::READ-NEXT-WORD) ; ; note: implementation limitation: couldn't inline expand because expansion refers to the optimized away object #. ; ; note: deleting unused function ; (SB-C::LOCAL-INLINE READ-NEXT-WORD) ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> LET OR ; ==> ; (LET ((#:G39 FLEXI-STREAMS::OCTET-GETTER)) ; (IF #:G39 ; #:G39 ; (COND ; (FLEXI-STREAMS::FIRST-OCTET-SEEN ; (RETURN-FROM FLEXI-STREAMS::OCTETS-TO-CHAR-CODE #)) ; (T (RETURN-FROM FLEXI-STREAMS::OCTETS-TO-CHAR-CODE NIL))))) ; ; note: deleting unused function ; (LET ((#:G39 OCTET-GETTER))) ; (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 # ; # ; #))))) ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET ; ==> ; (BLOCK FLEXI-STREAMS::OCTETS-TO-CHAR-CODE ; (SYMBOL-MACROLET ((FLEXI-STREAMS::OCTET-GETTER ; (FUNCALL FLEXI-STREAMS::READER))) ; (LET ((#:CHAR-CODE0 #)) ; (WHEN (AND #:CHAR-CODE0 #) ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT ; "Illegal code point ~A (#x~:*~X)." #:CHAR-CODE0)) ; #:CHAR-CODE0))) ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM OCTETS-TO-CHAR-CODE NIL). Use GO/RETURN-FROM with SAFETY 0, or ; declare the exit function DYNAMIC-EXTENT to avoid. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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. ; --> 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. ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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. ; --> 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. ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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 # ; # ; #))))) ; --> 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. ; --> 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. ; --> 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) ; --> LET OR LET IF COND IF THE ; ==> ; (RETURN-FROM FLEXI-STREAMS::CHAR-DECODER NIL) ; ; caught STYLE-WARNING: ; Result is a (VALUES &OPTIONAL NULL &REST T), 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. ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (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 # ; # ; #))))) ; --> 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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 # ; #))))) ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; --> <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (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 # ; # ; #))))) ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER) ; --> BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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 # ; # ; #))))) ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER) ; --> BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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 # ; # ; #))))) ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER) ; --> BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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 # ; #))))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (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. ; (FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER) ; ; 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 # ; #))))) ; --> 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 ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (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 # ; # ; #))))) ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER) ; --> BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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 # ; # ; #))))) ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER) ; --> BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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 # ; # ; #))))) ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER) ; --> BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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 # ; #))))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (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. ; (FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER) ; ; 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 # ; #))))) ; --> 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 ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (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 # ; # ; #))))) ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER) ; --> BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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 # ; # ; #))))) ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER) ; --> BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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 # ; # ; #))))) ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER) ; --> BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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 # ; #))))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> 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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (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. ; (FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER) ; ; 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 # ; #))))) ; --> 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 ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-20 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; 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 &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...)))) ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; --> <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline 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) ; &OPTIONAL). ; etc. ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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. ; (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 ...) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-109 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; 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 &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...)))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline 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) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (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 ...) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-126 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; 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 &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...)))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline 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) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (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 ...) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-141 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; 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 &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...)))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline 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) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; ; 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 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 &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...)))) ; --> 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 ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline 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) ; &OPTIONAL). ; etc. ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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. ; (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 ...) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-436 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; 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 &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...)))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline 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) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (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 ...) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-454 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; 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 &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...)))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline 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) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (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 ...) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-470 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; 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 &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...)))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline 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) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; ; 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 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 &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...)))) ; --> 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 ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline 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) ; &OPTIONAL). ; etc. ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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 ...)))) ; --> 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. ; --> 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. ; --> 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. ; (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 ...) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-767 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; 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 &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...)))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline 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) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (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 ...) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-786 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; 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 &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...)))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline 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) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (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 ...) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-803 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; 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 &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...)))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline 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) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; ; 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 ...)))) ; --> 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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (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 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 &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...)))) ; --> 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 ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline 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) ; &OPTIONAL). ; etc. ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-20 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; 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 &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...)))) ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; --> <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline 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) ; &OPTIONAL). ; etc. ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET* ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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. ; (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 ...) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-109 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; 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 &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...)))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline 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) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (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 ...) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-126 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; 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 &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...)))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline 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) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (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 ...) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-141 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; 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 &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...)))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline 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) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; ; 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 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 &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...)))) ; --> 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 ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline 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) ; &OPTIONAL). ; etc. ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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. ; (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 ...) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-436 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; 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 &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...)))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline 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) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (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 ...) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-454 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; 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 &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...)))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline 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) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (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 ...) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-470 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; 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 &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...)))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline 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) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; ; 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 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 &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...)))) ; --> 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 ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline 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) ; &OPTIONAL). ; etc. ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF ; ==> ; 1 ; ; 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 ...)))) ; --> 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. ; --> 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. ; --> 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. ; (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 ...) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-803 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; 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 &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...)))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline 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) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (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 ...) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-767 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; 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 &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...)))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline 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) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (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 ...) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-786 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)) ; ; 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 &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...)))) ; --> 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 <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline 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) ; &OPTIONAL). ; etc. ; --> 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 ; ==> ; (> #:CHAR-CODE0 1114111) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (FLEXI-STREAMS::READ-NEXT-BYTE) ; ; 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 ...)))) ; --> 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 ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (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 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 &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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 ...)))) ; --> 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 ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline 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) ; &OPTIONAL). ; etc. ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; etc. ; processing (DEFMETHOD OCTETS-TO-CHAR-CODE ...) ; processing (DEFMETHOD OCTETS-TO-CHAR-CODE ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-flexi-streams/decode-tmpOBHVA3CD.fasl ; compilation finished in 0:00:05.260 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/in-memory.lisp" (written 28 JUL 2021 07:07:50 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 ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; 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 ...) ; --> LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE 1+ ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) 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 ...) ; --> LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE 1+ ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; 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 ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (PLUSP BYTE) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) 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)) ; ; 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)) ; ; 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 <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; ; note: forced to do full call ; 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. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The second argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; 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 <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-flexi-streams/in-memory-tmpJ6ELVFLF.fasl ; compilation finished in 0:00:00.180 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/stream.lisp" (written 28 JUL 2021 07:07:50 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-flexi-streams/stream-tmpULDB0RG.fasl ; compilation finished in 0:00:00.040 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/output.lisp" (written 28 JUL 2021 07:07:50 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)) ; ==> ; (+ 1 (THE INTEGER (FLEXI-STREAMS:FLEXI-STREAM-COLUMN #:G68))) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-flexi-streams/output-tmpUTZ0UUTE.fasl ; compilation finished in 0:00:00.132 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/input.lisp" (written 28 JUL 2021 07:07:50 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) ; (>= POSITION FLEXI-STREAMS::BOUND) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (OR NULL INTEGER), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a (OR NULL INTEGER), not a (UNSIGNED-BYTE 64). ; etc. ; (INCF POSITION) ; ==> ; (+ 1 (THE INTEGER (FLEXI-STREAMS:FLEXI-STREAM-POSITION #:G08))) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; (DECF POSITION) ; --> SB-IMPL::XSUBTRACT BLOCK ; ==> ; (- SB-IMPL::B SB-IMPL::A) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &OPTIONAL). ; 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) ; (>= POSITION FLEXI-STREAMS::BOUND) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (OR NULL INTEGER), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a (OR NULL INTEGER), not a (UNSIGNED-BYTE 64). ; etc. ; 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) ; --> SB-IMPL::XSUBTRACT BLOCK ; ==> ; (- SB-IMPL::B SB-IMPL::A) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; 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) ; --> 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (+ FLEXI-STREAMS::START (- FLEXI-STREAMS::BOUND POSITION)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (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 (OR LIST ; (AND (NOT (VECTOR CHARACTER)) (NOT BASE-STRING) ; VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY * (*)) ; &REST T). ; (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 (OR LIST ; (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER)) ; VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR LIST ; (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER)) ; VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a LIST. ; (INCF POSITION (- FLEXI-STREAMS::INDEX FLEXI-STREAMS::START)) ; ==> ; (+ (- FLEXI-STREAMS::INDEX FLEXI-STREAMS::START) ; (FLEXI-STREAMS:FLEXI-STREAM-POSITION #:G2342)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (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 full call ; 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 ; &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; (+ FLEXI-STREAMS::START (- FLEXI-STREAMS::BOUND POSITION)) ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -4611686018427387904 4611686018427387902), not a (UNSIGNED-BYTE ; 64). ; The second argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; (MIN FLEXI-STREAMS::END ; (+ FLEXI-STREAMS::START (- FLEXI-STREAMS::BOUND POSITION))) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (INTEGER -4611686018427387903 4611686018427387903), not a (UNSIGNED-BYTE ; 64). ; The second argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (INCF POSITION (- FLEXI-STREAMS::INDEX FLEXI-STREAMS::START)) ; ==> ; (+ (- FLEXI-STREAMS::INDEX FLEXI-STREAMS::START) ; (FLEXI-STREAMS:FLEXI-STREAM-POSITION #:G2342)) ; ; note: forced to do full call ; 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 &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -4611686018427387902 9223372036854775804), not a (UNSIGNED-BYTE ; 64). ; The second argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; ; note: doing signed word to integer coercion (cost 20) ; 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 ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; ; note: forced to do full call ; 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. ; (DECF (THE INTEGER POSITION)) ; --> SB-IMPL::XSUBTRACT BLOCK ; ==> ; (- SB-IMPL::B SB-IMPL::A) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 64) ; &OPTIONAL). ; 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 ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (PLUSP FLEXI-STREAMS:OCTET) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-flexi-streams/input-tmpOOSRA8PZ.fasl ; compilation finished in 0:00:00.116 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/io.lisp" (written 28 JUL 2021 07:07:50 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) ; ==> ; (+ 1 (FLEXI-STREAMS:FLEXI-STREAM-POSITION #:G56)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-flexi-streams/io-tmpDMIL0RVK.fasl ; compilation finished in 0:00:00.052 ; compiling file "/usr/share/common-lisp/source/cl-flexi-streams/strings.lisp" (written 28 JUL 2021 07:07:50 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-flexi-streams/strings-tmp8MR9IMIO.fasl ; compilation finished in 0:00:00.068 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/bordeaux-threads/src/pkgdcl-tmpJQDKAVAY.fasl ; compilation finished in 0:00:00.000 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/bordeaux-threads/src/bordeaux-threads-tmp3I8CEEQY.fasl ; compilation finished in 0:00:00.052 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/bordeaux-threads/src/impl-sbcl-tmpA3RHFLWZ.fasl ; compilation finished in 0:00:00.084 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/bordeaux-threads/src/default-implementations-tmpYZIB7VXO.fasl ; compilation finished in 0:00:00.120 ; compiling file "/usr/share/common-lisp/source/trivial-garbage/trivial-garbage.lisp" (written 29 DEC 2021 06:00:51 AM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/trivial-garbage/trivial-garbage-tmpR8PK79V8.fasl ; compilation finished in 0:00:00.060 ; compiling file "/usr/share/common-lisp/source/cl-split-sequence/package.lisp" (written 27 MAY 2021 03:05:40 PM): ; processing (DEFPACKAGE #:SPLIT-SEQUENCE ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-split-sequence/package-tmpN1ZVB1HZ.fasl ; compilation finished in 0:00:00.000 ; compiling file "/usr/share/common-lisp/source/cl-split-sequence/vector.lisp" (written 27 MAY 2021 03:05:40 PM): ; processing (IN-PACKAGE :SPLIT-SEQUENCE) ; processing (DECLAIM (INLINE SPLIT-VECTOR ...)) ; processing (DEFTYPE ARRAY-INDEX ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN SPLIT-VECTOR-FROM-END ...) ; processing (DEFUN SPLIT-VECTOR-FROM-START ...) ; processing (DEFUN SPLIT-VECTOR-IF ...) ; processing (DEFUN SPLIT-VECTOR-IF-NOT ...) ; processing (DEFUN SPLIT-VECTOR ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-split-sequence/vector-tmpZGRRPISB.fasl ; compilation finished in 0:00:00.204 ; compiling file "/usr/share/common-lisp/source/cl-split-sequence/list.lisp" (written 27 MAY 2021 03:05:40 PM): ; 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 ...) ; processing (DEFUN SPLIT-LIST-FROM-START ...) ; processing (DEFUN SPLIT-LIST-IF ...) ; processing (DEFUN SPLIT-LIST-IF-NOT ...) ; processing (DEFUN SPLIT-LIST ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-split-sequence/list-tmpFNKDE5XP.fasl ; compilation finished in 0:00:00.208 ; compiling file "/usr/share/common-lisp/source/cl-split-sequence/extended-sequence.lisp" (written 27 MAY 2021 03:05:40 PM): ; 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-FROM-END ...) ; processing (DEFUN SPLIT-EXTENDED-SEQUENCE-FROM-START ...) ; processing (DEFUN SPLIT-EXTENDED-SEQUENCE-IF ...) ; processing (DEFUN SPLIT-EXTENDED-SEQUENCE-IF-NOT ...) ; processing (DEFUN SPLIT-EXTENDED-SEQUENCE ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-split-sequence/extended-sequence-tmpRJTU435C.fasl ; compilation finished in 0:00:00.336 ; compiling file "/usr/share/common-lisp/source/cl-split-sequence/api.lisp" (written 27 MAY 2021 03:05:40 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-split-sequence/api-tmpI9WG87JK.fasl ; compilation finished in 0:00:01.024 ; compiling file "/usr/share/common-lisp/source/cl-split-sequence/documentation.lisp" (written 27 MAY 2021 03:05:40 PM): ; processing (IN-PACKAGE :SPLIT-SEQUENCE) ; processing (SETF (DOCUMENTATION # ...) ...) ; processing (SETF (DOCUMENTATION # ...) ...) ; processing (SETF (DOCUMENTATION # ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-split-sequence/documentation-tmpYDE6I9E6.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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/usocket/package-tmp319UV2V8.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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/usocket/usocket-tmpLYQINFYS.fasl ; compilation finished in 0:00:00.220 ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/usocket/condition-tmpGA31XWNO.fasl ; compilation finished in 0:00:00.036 ; compiling file "/usr/share/common-lisp/source/usocket/backend/sbcl.lisp" (written 23 DEC 2019 01:05:56 AM): ; processing (IN-PACKAGE :USOCKET) ; processing (PROGN (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)) ; --> 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)))) ; --> 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) (*)) UNSIGNED-BYTE ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) (UNSIGNED-BYTE 16) &REST T). ; It allows an unknown number of values, consider using ; (VALUES (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) UNSIGNED-BYTE ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) (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 (PROGN (DEFUN %SETUP-WAIT-LIST ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/usocket/backend/sbcl-tmp5HT23M6C.fasl ; compilation finished in 0:00:00.304 ; 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 (EVAL-WHEN (:LOAD-TOPLEVEL :EXECUTE) ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/usocket/option-tmpA60KLDKY.fasl ; compilation finished in 0:00:00.200 ; compiling file "/usr/share/common-lisp/source/cl+ssl/src/package.lisp" (written 27 MAR 2022 12:23:33 PM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE :CL+SSL ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl+ssl/src/package-tmpD801X3GJ.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/cl+ssl/src/reload.lisp" (written 18 MAY 2022 11:37:23 AM): ; processing (IN-PACKAGE :CL+SSL) ; processing (DEFUN DETECT-MACOS-CUSTOM-OPENSSL-INSTALLATIONS ...) ; processing (DEFUN DETECT-CUSTOM-OPENSSL-INSTALLATIONS-IF-MACOS ...) ; processing (DETECT-CUSTOM-OPENSSL-INSTALLATIONS-IF-MACOS) ; processing (UNLESS CL+SSL/CONFIG::*LIBCRYPTO-OVERRIDE* ...) ; processing (UNLESS CL+SSL/CONFIG::*LIBSSL-OVERRIDE* ...) ; processing (UNLESS (MEMBER :CL+SSL-FOREIGN-LIBS-ALREADY-LOADED ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl+ssl/src/reload-tmpGOW1GC70.fasl ; compilation finished in 0:00:00.008 ; compiling file "/usr/share/common-lisp/source/cl+ssl/src/conditions.lisp" (written 27 MAR 2022 12:23:33 PM): ; processing (IN-PACKAGE :CL+SSL) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DEFUN READ-SSL-ERROR-QUEUE ...) ; processing (DEFUN FORMAT-SSL-ERROR-QUEUE ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/conditions.lisp ; in: DEFUN FORMAT-SSL-ERROR-QUEUE ; 'CL+SSL::SSL-ERROR ; ; note: can't open-code test of unknown type SSL-ERROR ; (ETYPECASE CL+SSL::QUEUE-DESIGNATOR ; (CL+SSL::SSL-ERROR (CL+SSL::SSL-ERROR-QUEUE CL+SSL::QUEUE-DESIGNATOR)) ; (LIST CL+SSL::QUEUE-DESIGNATOR)) ; --> COND IF ; ==> ; (TYPEP #:G2 'CL+SSL::SSL-ERROR) ; ; note: can't open-code test of unknown type SSL-ERROR ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl+ssl/src/conditions-tmpPQ1X28TL.fasl ; compilation finished in 0:00:00.044 ; compiling file "/usr/share/common-lisp/source/cl+ssl/src/ffi.lisp" (written 18 MAY 2022 11:37:23 AM): ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL) ...) ; 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-IS-OPAQUE* ...) ; processing (DEFVAR *LISP-BIO-TYPE*) ; 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 (DEFCONSTANT +SSL-CTRL-SET-MIN-PROTO-VERSION+ ...) ; processing (DEFCONSTANT +SSL-CTRL-SET-MAX-PROTO-VERSION+ ...) ; processing (DEFCONSTANT +SSL3-VERSION+ ...) ; processing (DEFCONSTANT +TLS1-VERSION+ ...) ; processing (DEFCONSTANT +TLS1-1-VERSION+ ...) ; processing (DEFCONSTANT +TLS1-2-VERSION+ ...) ; processing (DEFCONSTANT +TLS1-3-VERSION+ ...) ; processing (DEFCONSTANT +DTLS1-VERSION+ ...) ; processing (DEFCONSTANT +DTLS1-2-VERSION+ ...) ; 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) ; --> 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 ; (BLOCK CL+SSL::SSL-EAY ; (CFFI-SYS:%FOREIGN-FUNCALL "SSLeay" (:LONG) :CONVENTION :CDECL :LIBRARY ; CL+SSL/CONFIG::LIBCRYPTO))) ; ; note: doing signed word to integer coercion (cost 20) to "" ; 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) ; --> 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 ; (BLOCK CL+SSL::OPENSSL-VERSION-NUM ; (CFFI-SYS:%FOREIGN-FUNCALL "OpenSSL_version_num" (:LONG) :CONVENTION ; :CDECL :LIBRARY CL+SSL/CONFIG::LIBCRYPTO))) ; ; note: doing signed word to integer coercion (cost 20) to "" ; 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 (RATIONAL * 815792463) ; (SINGLE-FLOAT * 8.1579245e8) ; (DOUBLE-FLOAT * 8.15792463d8)), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; 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 full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; 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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; 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)) ; --> 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/CONFIG::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") ...) ; 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) ; --> 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 ; (BLOCK CL+SSL::SSL-V23-CLIENT-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "SSLv23_client_method" (:POINTER) ; :CONVENTION :CDECL :LIBRARY ; CL+SSL/CONFIG::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; 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) ; --> 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 ; (BLOCK CL+SSL::SSL-V23-SERVER-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "SSLv23_server_method" (:POINTER) ; :CONVENTION :CDECL :LIBRARY ; CL+SSL/CONFIG::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; 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) ; --> 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 ; (BLOCK CL+SSL::SSL-V23-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "SSLv23_method" (:POINTER) :CONVENTION ; :CDECL :LIBRARY CL+SSL/CONFIG::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; 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) ; --> 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 ; (BLOCK CL+SSL::SSL-V3-CLIENT-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "SSLv3_client_method" (:POINTER) :CONVENTION ; :CDECL :LIBRARY CL+SSL/CONFIG::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; 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) ; --> 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 ; (BLOCK CL+SSL::SSL-V3-SERVER-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "SSLv3_server_method" (:POINTER) :CONVENTION ; :CDECL :LIBRARY CL+SSL/CONFIG::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; 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) ; --> 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 ; (BLOCK CL+SSL::SSL-V3-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "SSLv3_method" (:POINTER) :CONVENTION :CDECL ; :LIBRARY CL+SSL/CONFIG::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; 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) ; --> 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 ; (BLOCK CL+SSL::SSL-TLSV1-CLIENT-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_client_method" (:POINTER) :CONVENTION ; :CDECL :LIBRARY CL+SSL/CONFIG::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; 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) ; --> 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 ; (BLOCK CL+SSL::SSL-TLSV1-SERVER-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_server_method" (:POINTER) :CONVENTION ; :CDECL :LIBRARY CL+SSL/CONFIG::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; 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) ; --> 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 ; (BLOCK CL+SSL::SSL-TLSV1-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_method" (:POINTER) :CONVENTION :CDECL ; :LIBRARY CL+SSL/CONFIG::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; 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) ; --> 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 ; (BLOCK CL+SSL::SSL-TLSV1-1-CLIENT-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_1_client_method" (:POINTER) ; :CONVENTION :CDECL :LIBRARY ; CL+SSL/CONFIG::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; 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) ; --> 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 ; (BLOCK CL+SSL::SSL-TLSV1-1-SERVER-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_1_server_method" (:POINTER) ; :CONVENTION :CDECL :LIBRARY ; CL+SSL/CONFIG::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; 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) ; --> 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 ; (BLOCK CL+SSL::SSL-TLSV1-1-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_1_method" (:POINTER) :CONVENTION ; :CDECL :LIBRARY CL+SSL/CONFIG::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; 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) ; --> 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 ; (BLOCK CL+SSL::SSL-TLSV1-2-CLIENT-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_2_client_method" (:POINTER) ; :CONVENTION :CDECL :LIBRARY ; CL+SSL/CONFIG::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; 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) ; --> 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 ; (BLOCK CL+SSL::SSL-TLSV1-2-SERVER-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_2_server_method" (:POINTER) ; :CONVENTION :CDECL :LIBRARY ; CL+SSL/CONFIG::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; 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) ; --> 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 ; (BLOCK CL+SSL::SSL-TLSV1-2-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_2_method" (:POINTER) :CONVENTION ; :CDECL :LIBRARY CL+SSL/CONFIG::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; 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) ; --> 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 ; (BLOCK CL+SSL::TLS-METHOD ; (CFFI-SYS:%FOREIGN-FUNCALL "TLS_method" (:POINTER) :CONVENTION :CDECL ; :LIBRARY CL+SSL/CONFIG::LIBSSL))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; 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)) ; --> 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) ; (BLOCK CL+SSL::SSL-CTX-NEW ; (LET ((#:G0 METHOD)) ; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_CTX_new" (:POINTER #:G0 :POINTER) ; :CONVENTION :CDECL :LIBRARY ; CL+SSL/CONFIG::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)) ; --> 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) ; (BLOCK CL+SSL::SSL-NEW ; (LET ((#:G0 CL+SSL::CTX)) ; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_new" (:POINTER #:G0 :POINTER) ; :CONVENTION :CDECL :LIBRARY ; CL+SSL/CONFIG::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-SSL-FUNCTION-EX (:SINCE "1.0") ...) ; processing (DEFINE-SSL-FUNCTION-EX (:SINCE "1.0") ...) ; 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)) ; --> 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) ; (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)) ; --> 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) ; (BLOCK CL+SSL::BIO-NEW-SOCKET ; (LET ((#:G0 CL+SSL::FD)) ; (LET (#) ; (CFFI-SYS:%FOREIGN-FUNCALL "BIO_new_socket" # :CONVENTION :CDECL ; :LIBRARY CL+SSL/CONFIG::LIBCRYPTO))))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; 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)) ; --> 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) ; (BLOCK CL+SSL::BIO-NEW ; (LET ((#:G0 METHOD)) ; (CFFI-SYS:%FOREIGN-FUNCALL "BIO_new" (:POINTER #:G0 :POINTER) ; :CONVENTION :CDECL :LIBRARY ; CL+SSL/CONFIG::LIBCRYPTO)))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-CRYPTO-FUNCTION ("BIO_free" BIO-FREE) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-CRYPTO-FUNCTION ("BIO_free" BIO-FREE) ; (CL+SSL::DEFINE-CRYPTO-FUNCTION ; ("BIO_free" CL+SSL::BIO-FREE) ; :POINTER ; (METHOD :POINTER)) ; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::BIO-FREE ; (METHOD) ; (BLOCK CL+SSL::BIO-FREE ; (LET ((#:G0 METHOD)) ; (CFFI-SYS:%FOREIGN-FUNCALL "BIO_free" (:POINTER #:G0 :POINTER) ; :CONVENTION :CDECL :LIBRARY ; CL+SSL/CONFIG::LIBCRYPTO)))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-CRYPTO-FUNCTION-EX (:SINCE "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") ; ("BIO_meth_new" CL+SSL::BIO-METH-NEW) ; :POINTER ; (TYPE :INT) ; (CL+SSL::NAME :STRING)) ; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN ; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::BIO-METH-NEW ; (TYPE CL+SSL::NAME) ; (BLOCK CL+SSL::BIO-METH-NEW ; (LET ((#:G0 TYPE)) ; (MULTIPLE-VALUE-BIND (#:G1 #:PARAM2) ; (CFFI:TRANSLATE-TO-FOREIGN CL+SSL::NAME #) ; (UNWIND-PROTECT # #))))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0") ...) ; processing (DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0") ...) ; processing (DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0") ...) ; processing (DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0") ...) ; processing (DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0") ...) ; processing (DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0") ...) ; processing (DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0") ...) ; processing (DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0") ...) ; processing (DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0") ...) ; processing (DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0") ...) ; 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) ; --> 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 ; (BLOCK CL+SSL::ERR-GET-ERROR ; (CFFI-SYS:%FOREIGN-FUNCALL "ERR_get_error" (:UNSIGNED-LONG) :CONVENTION ; :CDECL :LIBRARY CL+SSL/CONFIG::LIBCRYPTO))) ; ; note: doing unsigned word to integer coercion (cost 20) to "" ; 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)) ; --> 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 ; CL+SSL/CONFIG::LIBCRYPTO) ; #) ; ; note: doing SAP to pointer coercion (cost 20) ; processing (DEFINE-CRYPTO-FUNCTION-EX (:VANISHED "3.0.0") ...) ; processing (DEFCONSTANT +ERR_LIB_NONE+ ...) ; processing (DEFCONSTANT +ERR_R_FATAL+ ...) ; processing (DEFCONSTANT +ERR_R_INTERNAL_ERROR+ ...) ; processing (DEFINE-CRYPTO-FUNCTION ("ERR_add_error_data" ERR-ADD-ERROR-DATA) ...) ; processing (DEFINE-CRYPTO-FUNCTION ("ERR_print_errors" ERR-PRINT-ERRORS) ...) ; 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 (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)) ; --> 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) ; (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)) ; --> 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) ; (BLOCK CL+SSL::SSL-CTRL ; (LET ((#:G0 CL+SSL::SSL)) ; (LET (#) ; (LET # ; #))))) ; ; note: doing signed word to integer coercion (cost 20) to "" ; 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 (DEFUN SSL-CTX-SET-MIN-PROTO-VERSION ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFUN SSL-CTX-SET-MIN-PROTO-VERSION ; (CL+SSL::SSL-CTX-CTRL CL+SSL::CTX CL+SSL::+SSL-CTRL-SET-MIN-PROTO-VERSION+ ; CL+SSL::VERSION (CFFI-SYS:NULL-POINTER)) ; ; note: doing SAP to pointer coercion (cost 20) ; processing (DEFUN SSL-CTX-SET-MAX-PROTO-VERSION ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFUN SSL-CTX-SET-MAX-PROTO-VERSION ; (CL+SSL::SSL-CTX-CTRL CL+SSL::CTX CL+SSL::+SSL-CTRL-SET-MAX-PROTO-VERSION+ ; CL+SSL::VERSION (CFFI-SYS:NULL-POINTER)) ; ; note: doing SAP to pointer coercion (cost 20) ; 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)) ; --> 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) ; (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_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)) ; --> 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) ; (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/CONFIG::LIBSSL)))) ; ; note: doing signed word to integer coercion (cost 20) to "" ; processing (DEFINE-SSL-FUNCTION-EX (:VANISHED "3.0.0") ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-SSL-FUNCTION-EX (:VANISHED "3.0.0") ; (CL+SSL::DEFINE-SSL-FUNCTION-EX ; (:VANISHED "3.0.0") ; ("SSL_get_peer_certificate" CL+SSL::SSL-GET-PEER-CERTIFICATE) ; :POINTER ; (CL+SSL::SSL CL+SSL::SSL-POINTER)) ; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN ; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-GET-PEER-CERTIFICATE ; (CL+SSL::SSL) ; (BLOCK CL+SSL::SSL-GET-PEER-CERTIFICATE ; (LET ((#:G0 CL+SSL::SSL)) ; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_get_peer_certificate" ; (:POINTER #:G0 :POINTER) :CONVENTION ; :CDECL :LIBRARY CL+SSL/CONFIG::LIBSSL)))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-SSL-FUNCTION-EX (:SINCE "3.0.0") ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-SSL-FUNCTION-EX (:SINCE "3.0.0") ; (CL+SSL::DEFINE-SSL-FUNCTION-EX ; (:SINCE "3.0.0") ; ("SSL_get1_peer_certificate" CL+SSL::SSL-GET1-PEER-CERTIFICATE) ; :POINTER ; (CL+SSL::SSL CL+SSL::SSL-POINTER)) ; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN ; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-GET1-PEER-CERTIFICATE ; (CL+SSL::SSL) ; (BLOCK CL+SSL::SSL-GET1-PEER-CERTIFICATE ; (LET ((#:G0 CL+SSL::SSL)) ; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_get1_peer_certificate" ; (:POINTER #:G0 :POINTER) :CONVENTION ; :CDECL :LIBRARY CL+SSL/CONFIG::LIBSSL)))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; 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)) ; --> 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) ; (BLOCK CL+SSL::X509-NAME-ONELINE ; (LET ((#:G152 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)) ; --> 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) ; (BLOCK CL+SSL::X509-NAME-GET-ENTRY ; (LET ((#:G0 CL+SSL::NAME)) ; (LET (#) ; (CFFI-SYS:%FOREIGN-FUNCALL "X509_NAME_get_entry" # :CONVENTION ; :CDECL :LIBRARY ; CL+SSL/CONFIG::LIBCRYPTO))))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; 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)) ; --> 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) ; (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 ; CL+SSL/CONFIG::LIBCRYPTO)))) ; ; 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)) ; --> 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) ; (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 ; CL+SSL/CONFIG::LIBCRYPTO)))) ; ; 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)) ; --> 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) ; (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 ; CL+SSL/CONFIG::LIBCRYPTO)))) ; ; note: doing SAP to pointer 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") ; ("X509_get0_notBefore" CL+SSL::X509-GET0-NOT-BEFORE) ; :POINTER ; (CL+SSL::X509 :POINTER)) ; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN ; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::X509-GET0-NOT-BEFORE ; (CL+SSL::X509) ; (BLOCK CL+SSL::X509-GET0-NOT-BEFORE ; (LET ((#:G0 CL+SSL::X509)) ; (CFFI-SYS:%FOREIGN-FUNCALL "X509_get0_notBefore" ; (:POINTER #:G0 :POINTER) :CONVENTION ; :CDECL :LIBRARY ; CL+SSL/CONFIG::LIBCRYPTO)))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; 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") ; ("X509_get0_notAfter" CL+SSL::X509-GET0-NOT-AFTER) ; :POINTER ; (CL+SSL::X509 :POINTER)) ; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN ; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::X509-GET0-NOT-AFTER ; (CL+SSL::X509) ; (BLOCK CL+SSL::X509-GET0-NOT-AFTER ; (LET ((#:G0 CL+SSL::X509)) ; (CFFI-SYS:%FOREIGN-FUNCALL "X509_get0_notAfter" ; (:POINTER #:G0 :POINTER) :CONVENTION ; :CDECL :LIBRARY ; CL+SSL/CONFIG::LIBCRYPTO)))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; 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)) ; --> 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) ; (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)) ; --> 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) ; (BLOCK CL+SSL::D2I-X509 ; (LET ((#:G0 CL+SSL::*PX)) ; (LET (#) ; (LET # ; #))))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-CRYPTO-FUNCTION ("X509_digest" X509-DIGEST) ...) ; processing (DEFINE-CRYPTO-FUNCTION ("PEM_write_bio_X509" PEM-WRITE-X509) ...) ; processing (DEFINE-CRYPTO-FUNCTION ("PEM_read_bio_X509" PEM-READ-X509) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFINE-CRYPTO-FUNCTION ("PEM_read_bio_X509" PEM-READ-X509) ; (CL+SSL::DEFINE-CRYPTO-FUNCTION ; ("PEM_read_bio_X509" CL+SSL::PEM-READ-X509) ; :POINTER ; (CL+SSL::BIO :POINTER) ; (CL+SSL::X509 :INT) ; (CL+SSL::CALLBACK :INT) ; (CL+SSL::PASSPHRASE :INT)) ; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::PEM-READ-X509 ; (CL+SSL::BIO CL+SSL::X509 CL+SSL::CALLBACK CL+SSL::PASSPHRASE) ; (BLOCK CL+SSL::PEM-READ-X509 ; (LET ((#:G0 CL+SSL::BIO)) ; (LET (#) ; (LET # ; #))))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-CRYPTO-FUNCTION ("EVP_get_digestbyname" EVP-GET-DIGEST-BY-NAME) ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: ; DEFINE-CRYPTO-FUNCTION ("EVP_get_digestbyname" EVP-GET-DIGEST-BY-NAME) ; (CL+SSL::DEFINE-CRYPTO-FUNCTION ; ("EVP_get_digestbyname" CL+SSL::EVP-GET-DIGEST-BY-NAME) ; :POINTER ; (CL+SSL::NAME :STRING)) ; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::EVP-GET-DIGEST-BY-NAME ; (CL+SSL::NAME) ; (BLOCK CL+SSL::EVP-GET-DIGEST-BY-NAME ; (MULTIPLE-VALUE-BIND (#:G0 #:PARAM1) ; (CFFI:TRANSLATE-TO-FOREIGN CL+SSL::NAME ; #) ; (UNWIND-PROTECT (PROGN #) ; (CFFI:FREE-TRANSLATED-OBJECT #:G0 # #:PARAM1))))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; processing (DEFINE-CRYPTO-FUNCTION-EX (:VANISHED "3.0.0") ...) ; processing (DEFINE-CRYPTO-FUNCTION-EX (:SINCE "3.0.0") ...) ; 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)) ; --> 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) ; (BLOCK CL+SSL::SK-VALUE ; (LET ((#:G0 CL+SSL::STACK)) ; (LET (#) ; (CFFI-SYS:%FOREIGN-FUNCALL "sk_value" # :CONVENTION :CDECL :LIBRARY ; CL+SSL/CONFIG::LIBCRYPTO))))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; 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)) ; --> 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) ; (BLOCK CL+SSL::OPENSSL-SK-VALUE ; (LET ((#:G0 CL+SSL::STACK)) ; (LET (#) ; (CFFI-SYS:%FOREIGN-FUNCALL "OPENSSL_sk_value" # :CONVENTION :CDECL ; :LIBRARY CL+SSL/CONFIG::LIBCRYPTO))))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; 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))) ; --> 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) ; (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))) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL+SSL::SK-GENERAL-NAME-NUM ; (CL+SSL::NAMES) ; (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)) ; --> 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) ; (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 ; CL+SSL/CONFIG::LIBCRYPTO)))) ; ; 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-CRYPTO-FUNCTION ("ASN1_TIME_check" ASN1-TIME-CHECK) ...) ; processing (DEFINE-CRYPTO-FUNCTION ("ASN1_UTCTIME_check" ASN1-UTCTIME-CHECK) ...) ; 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)) ; --> 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) ; (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)) ; --> 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) ; (BLOCK CL+SSL::SSL-CTX-SET-TMP-RSA-CALLBACK ; (LET ((#:G0 CL+SSL::CTX)) ; (LET (#) ; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_CTX_set_tmp_rsa_callback" # ; :CONVENTION :CDECL :LIBRARY ; CL+SSL/CONFIG::LIBSSL))))) ; ; note: doing SAP to pointer coercion (cost 20) to "" ; 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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (= CL+SSL::KEY-LENGTH 1024) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a 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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (CL+SSL::RSA-GENERATE-KEY LENGTH CL+SSL::+RSA_F4+ (CFFI-SYS:NULL-POINTER) ; (CFFI-SYS:NULL-POINTER)) ; ; note: doing SAP to pointer coercion (cost 20) ; ; note: doing SAP to pointer coercion (cost 20) ; 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 full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a T, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; 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 full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a T, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFUN SECONDS-UNTIL-DEADLINE ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp ; in: DEFUN SECONDS-UNTIL-DEADLINE ; (- CL+SSL::DEADLINE (GET-INTERNAL-REAL-TIME)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (/ (- CL+SSL::DEADLINE (GET-INTERNAL-REAL-TIME)) ; INTERNAL-TIME-UNITS-PER-SECOND) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; etc. ; processing (DEFUN OUTPUT-WAIT ...) ; processing (DEFUN INPUT-WAIT ...) ; 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 LIST (AND (NOT BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST (AND (NOT BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST (AND (NOT BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; CHARACTER ; (*)). ; 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*) ; --> THE ; ==> ; (+ 1 CL+SSL::*THREAD-COUNTER*) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl+ssl/src/ffi-tmpE92ECU7O.fasl ; compilation finished in 0:00:00.448 ; compiling file "/usr/share/common-lisp/source/cl+ssl/src/ffi-buffer-all.lisp" (written 27 MAR 2022 12:23:33 PM): ; processing (IN-PACKAGE :CL+SSL) ; processing (DECLAIM (INLINE MAKE-BUFFER ...)) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl+ssl/src/ffi-buffer-all-tmp8S0II570.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/cl+ssl/src/ffi-buffer.lisp" (written 27 MAR 2022 12:23:33 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl+ssl/src/ffi-buffer-tmpJE88A12F.fasl ; compilation finished in 0:00:00.028 ; compiling file "/usr/share/common-lisp/source/cl+ssl/src/streams.lisp" (written 27 MAR 2022 12:23:33 PM): ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL) ...) ; processing (IN-PACKAGE :CL+SSL) ; processing (DEFVAR *DEFAULT-CIPHER-LIST* ...) ; processing (DEFPARAMETER *DEFAULT-BUFFER-SIZE* ...) ; processing (DEFCLASS SSL-STREAM ...) ; processing (DEFMETHOD INITIALIZE-INSTANCE ...) ; 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 STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; 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 ; ==> ; 1 ; ; 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 ; ==> ; 1 ; ; 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 in mixed 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; (PLUSP LENGTH) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL * 4611686018427387900) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427388d18)), not a FLOAT. ; (< CL+SSL::START CL+SSL::END) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; (SETF (ELT CL+SSL::SEQ CL+SSL::START) (CL+SSL::SSL-STREAM-PEEKED-BYTE STREAM)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; (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. ; (+ CL+SSL::START CL+SSL::READ-BYTES) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (CL+SSL::BUFFER-LENGTH CL+SSL::BUF) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (CL+SSL::S/B-REPLACE CL+SSL::SEQ CL+SSL::BUF :START1 CL+SSL::START :END1 ; (+ CL+SSL::START CL+SSL::READ-BYTES)) ; --> BLOCK ; ==> ; (REPLACE CL+SSL::SEQ CL+SSL::BUF :START1 CL+SSL::START1 :END1 CL+SSL::END1 ; :START2 CL+SSL::START2 :END2 CL+SSL::END2) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY * (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; The second argument is a (OR SIMPLE-BASE-STRING (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a (SIMPLE-ARRAY CHARACTER (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-BASE-STRING ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; The second argument is a (OR SIMPLE-BASE-STRING (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY SINGLE-FLOAT (*)) ; (SIMPLE-ARRAY DOUBLE-FLOAT (*)) ; SIMPLE-BIT-VECTOR ; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*)) ; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) ; (SIMPLE-ARRAY FIXNUM (*)) ; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*)) ; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) ; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*))), not a SIMPLE-BASE-STRING. ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY CHARACTER ; (*)) ; &REST T). ; (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 (OR (RATIONAL 0) (SINGLE-FLOAT 0.0) ; (DOUBLE-FLOAT 0.0d0)), 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 full call ; 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 full call ; unable to do 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 &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; (MIN (- CL+SSL::END CL+SSL::START) (CL+SSL::BUFFER-LENGTH CL+SSL::BUF)) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (PLUSP LENGTH) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (OR (RATIONAL * 4611686018427387900) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * 4.611686018427388d18)), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (OR (RATIONAL * 4611686018427387900) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * 4.611686018427388d18)), not a (UNSIGNED-BYTE ; 64). ; etc. ; (+ CL+SSL::START CL+SSL::READ-BYTES) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; (INCF CL+SSL::START CL+SSL::READ-BYTES) ; ; 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)) ; ==> ; (+ 1 (CL+SSL::SSL-STREAM-OUTPUT-POINTER #:STREAM4)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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) ; --> BLOCK SETF ; ==> ; (SB-KERNEL:%SETELT CL+SSL::BUF CL+SSL::INDEX CL+SSL::VAL) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; (CL+SSL::BUFFER-LENGTH CL+SSL::BUF) ; --> BLOCK ; ==> ; (LENGTH CL+SSL::BUF) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (INCF (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM)) ; ==> ; (+ 1 (CL+SSL::SSL-STREAM-OUTPUT-POINTER #:STREAM4)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (+ (- CL+SSL::END CL+SSL::START) (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (CL+SSL::BUFFER-LENGTH CL+SSL::BUF) ; ==> ; (LENGTH CL+SSL::BUF) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (> (- CL+SSL::END CL+SSL::START) (CL+SSL::BUFFER-LENGTH CL+SSL::BUF)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (CL+SSL::BUFFER-LENGTH CL+SSL::BUF) ; ==> ; (LENGTH CL+SSL::BUF) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (CL+SSL::B/S-REPLACE CL+SSL::BUF CL+SSL::SEQ :START1 ; (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM) :START2 ; CL+SSL::START :END2 CL+SSL::END) ; ==> ; (REPLACE CL+SSL::BUF CL+SSL::SEQ :START1 CL+SSL::START1 :END1 CL+SSL::END1 ; :START2 CL+SSL::START2 :END2 CL+SSL::END2) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY * (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-BASE-STRING ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY CHARACTER ; (*)) ; &REST T). ; (INCF (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM) ; (- CL+SSL::END CL+SSL::START)) ; ==> ; (+ (- CL+SSL::END CL+SSL::START) ; (CL+SSL::SSL-STREAM-OUTPUT-POINTER #:STREAM28)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (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-ARRAY * (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY * (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-BASE-STRING ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY CHARACTER ; (*)) ; &REST T). ; (- CL+SSL::END CL+SSL::START) ; ; note: forced to do full call ; 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 ; &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; (+ (- CL+SSL::END CL+SSL::START) (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; (> ; (+ (- CL+SSL::END CL+SSL::START) (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM)) ; (CL+SSL::BUFFER-LENGTH CL+SSL::BUF)) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; etc. ; (- CL+SSL::END CL+SSL::START) ; ; note: forced to do full call ; 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 ; &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; (> (- CL+SSL::END CL+SSL::START) (CL+SSL::BUFFER-LENGTH CL+SSL::BUF)) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; etc. ; (INCF (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM) ; (- CL+SSL::END CL+SSL::START)) ; ==> ; (+ (- CL+SSL::END CL+SSL::START) ; (CL+SSL::SSL-STREAM-OUTPUT-POINTER #:STREAM28)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -4611686018427387900 4611686018427387900), not a (UNSIGNED-BYTE ; 64). ; The second argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 64) ; &OPTIONAL). ; etc. ; (INCF CL+SSL::START (CL+SSL::BUFFER-LENGTH CL+SSL::BUF)) ; ; 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 full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a T, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFUN INSTALL-NONBLOCK-FLAG ...) ; processing (DEFVAR *DEFAULT-UNWRAP-STREAM-P* ...) ; 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))))) ; --> SYMBOL-MACROLET SYMBOL-MACROLET LET LET SB-C::RESTORING-NSP LET ; --> SB-ALIEN-INTERNALS:MAKE-LOCAL-ALIEN ; ==> ; 1 ; ; note: doing SAP to pointer coercion (cost 20), for: ; the first result of ALLOC-NUMBER-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 ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp ; in: DEFUN MAYBE-VERIFY-CLIENT-STREAM ; (FUNCALL ; (IF (CL+SSL::OPENSSL-IS-AT-LEAST 3 0 0) ; 'CL+SSL::SSL-GET1-PEER-CERTIFICATE ; 'CL+SSL::SSL-GET-PEER-CERTIFICATE) ; CL+SSL::HANDLE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; processing (DEFUN HANDLE-EXTERNAL-FORMAT ...) ; processing (DEFMACRO WITH-NEW-SSL ...) ; processing (DEFVAR *MAKE-SSL-CLIENT-STREAM-VERIFY-DEFAULT* ...) ; processing (DEFUN MAKE-ALPN-PROTO-STRING ...) ; processing (DEFUN MAKE-SSL-CLIENT-STREAM ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp ; in: DEFUN MAKE-SSL-CLIENT-STREAM ; (1- CL+SSL::LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (1- CL+SSL::LEN) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; &OPTIONAL). ; etc. ; 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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; processing (DEFUN GET-SELECTED-ALPN-PROTOCOL ...) ; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp ; in: DEFUN GET-SELECTED-ALPN-PROTOCOL ; (CL+SSL::SSL-GET0-ALPN-SELECTED (CL+SSL::SSL-STREAM-HANDLE CL+SSL::SSL) ; CL+SSL::PTR CL+SSL::LEN) ; ; note: doing SAP to pointer coercion (cost 20) ; ; note: doing SAP to pointer coercion (cost 20) ; (CFFI:FOREIGN-STRING-TO-LISP (CFFI:MEM-REF CL+SSL::PTR :POINTER) :COUNT ; (CFFI:MEM-REF CL+SSL::LEN :INT)) ; ; note: doing SAP to pointer coercion (cost 20) ; processing (DEFGENERIC STREAM-FD ...) ; processing (DEFMETHOD STREAM-FD ...) ; processing (DEFMETHOD STREAM-FD ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl+ssl/src/streams-tmpA5FNLPLT.fasl ; compilation finished in 0:00:00.428 ; compiling file "/usr/share/common-lisp/source/cl+ssl/src/bio.lisp" (written 27 MAR 2022 12:23:33 PM): ; processing (IN-PACKAGE CL+SSL) ; processing (DEFCONSTANT +BIO_TYPE_SOURCE_SINK+ ...) ; processing (DEFCONSTANT +BIO_TYPE_DESCRIPTOR+ ...) ; processing (DEFCONSTANT +BIO-TYPE-SOCKET+ ...) ; processing (DEFCONSTANT +BIO_FLAGS_READ+ ...) ; processing (DEFCONSTANT +BIO_FLAGS_WRITE+ ...) ; processing (DEFCONSTANT +BIO_FLAGS_IO_SPECIAL+ ...) ; processing (DEFCONSTANT +BIO_FLAGS_RWS+ ...) ; processing (DEFCONSTANT +BIO_FLAGS_SHOULD_RETRY+ ...) ; processing (DEFCONSTANT +BIO_CTRL_FLUSH+ ...) ; processing (CFFI:DEFCSTRUCT BIO-METHOD ...) ; processing (CFFI:DEFCSTRUCT BIO ...) ; processing (DEFUN LISP-BIO-TYPE ...) ; processing (DEFUN MAKE-BIO-LISP-METHOD-SLOTS ...) ; processing (DEFUN MAKE-BIO-LISP-METHOD-OPAQUE ...) ; processing (DEFUN MAKE-BIO-LISP-METHOD ...) ; processing (DEFUN BIO-NEW-LISP ...) ; processing (DEFUN CLEAR-RETRY-FLAGS-SLOTS ...) ; processing (DEFUN CLEAR-RETRY-FLAGS-OPAQUE ...) ; processing (DEFUN CLEAR-RETRY-FLAGS ...) ; processing (DEFUN SET-RETRY-READ-OPAQUE ...) ; processing (DEFUN SET-RETRY-READ-SLOTS ...) ; processing (DEFUN SET-RETRY-READ ...) ; processing (DEFPARAMETER *FILE-NAME* ...) ; processing (DEFUN PUT-TO-OPENSSL-ERROR-QUEUE ...) ; processing (CFFI:DEFCALLBACK LISP-WRITE ...) ; processing (CFFI:DEFCALLBACK LISP-READ ...) ; processing (CFFI:DEFCALLBACK LISP-GETS ...) ; processing (CFFI:DEFCALLBACK LISP-PUTS ...) ; processing (CFFI:DEFCALLBACK LISP-CTRL ...) ; processing (CFFI:DEFCALLBACK LISP-CREATE-SLOTS ...) ; processing (CFFI:DEFCALLBACK LISP-CREATE-OPAQUE ...) ; processing (CFFI:DEFCALLBACK LISP-DESTROY-SLOTS ...) ; processing (CFFI:DEFCALLBACK LISP-DESTROY-OPAQUE ...) ; processing (DEFMACRO WITH-BIO-OUTPUT-TO-STRING ...) ; processing (DEFMACRO WITH-BIO-INPUT-FROM-STRING ...) ; processing (DEFUN ERR-PRINT-ERRORS-TO-STRING ...) ; processing (SETF *BIO-LISP-METHOD* ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl+ssl/src/bio-tmpHKCV9TP8.fasl ; compilation finished in 0:00:00.208 ; compiling file "/usr/share/common-lisp/source/cl+ssl/src/x509.lisp" (written 18 MAY 2022 11:37:23 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 DECODE-ASN1-TIME ...) ; 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 ...) ; processing (DEFUN CERTIFICATE-NOT-AFTER-TIME ...) ; processing (DEFUN CERTIFICATE-NOT-BEFORE-TIME ...) ; processing (DEFUN CERTIFICATE-FINGERPRINT ...) ; processing (DEFUN X509-CERT-FROM-PEM ...) ; processing (DEFUN CERTIFICATE-PEM ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl+ssl/src/x509-tmpZ18MA7XE.fasl ; compilation finished in 0:00:00.088 ; compiling file "/usr/share/common-lisp/source/cl+ssl/src/random.lisp" (written 27 MAR 2022 12:23:33 PM): ; processing (IN-PACKAGE :CL+SSL) ; processing (DEFUN RANDOM-BYTES ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl+ssl/src/random-tmp6LQJ9T0C.fasl ; compilation finished in 0:00:00.012 ; compiling file "/usr/share/common-lisp/source/cl+ssl/src/context.lisp" (written 27 MAR 2022 12:23:33 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl+ssl/src/context-tmpTX7OA81T.fasl ; compilation finished in 0:00:00.040 ; compiling file "/usr/share/common-lisp/source/cl+ssl/src/verify-hostname.lisp" (written 27 MAR 2022 12:23:33 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl+ssl/src/verify-hostname-tmpWOTC3PB7.fasl ; compilation finished in 0:00:00.020 ; ; compilation unit finished ; caught 6 STYLE-WARNING conditions ; printed 1906 notes ;; loading system "mssql" ; compiling file "/usr/share/common-lisp/source/iterate/package.lisp" (written 04 NOV 2021 03:10:48 AM): ; processing (DEFPACKAGE #:ITERATE ...) ; processing (IN-PACKAGE #:ITERATE) ; processing (DEFMACRO DEFCONST ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/iterate/package-tmpHQE95SAC.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/iterate/iterate.lisp" (written 04 NOV 2021 03:10:56 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 *LOOP-NAME*) ; processing (DEFVAR *CLAUSE-INFO-INDEX* ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL) ...) ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :EXECUTE) ...) ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DEFUN DISPLAY-INDEX ...) ; processing (DEFUN REMOVE-CLAUSE ...) ; processing (DEFMACRO DEFCLAUSE ...) ; processing (DEFMACRO DEFCLAUSE-DRIVER ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/iterate/iterate-tmpO87FP9NR.fasl ; compilation finished in 0:00:02.036 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/garbage-pools/garbage-pools-tmpP6A3E92I.fasl ; compilation finished in 0:00:00.020 ; 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 LIST ; 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::RIGHT :RADIX ; ORG.MAPCAR.PARSE-NUMBER::RADIX) ; ; 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::END :RADIX ; ORG.MAPCAR.PARSE-NUMBER::RADIX) ; --> BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION LET - ; ==> ; 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) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of LIST ; (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 ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of LIST ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/parse-number/parse-number-tmpUSHT8RIL.fasl ; compilation finished in 0:00:00.352 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/mssql/src/packages-tmp7YCPD44Y.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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/mssql/src/mssql-tmpQXR7SNXD.fasl ; compilation finished in 0:00:00.064 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/mssql/src/connection-tmp6FLI1OC3.fasl ; compilation finished in 0:00:00.112 ; 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)) ; --> 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 ; (BLOCK #:ITERATE3 ; (TAGBODY ; (PROGN # #) ; MSSQL::LOOP-TOP-NIL ; (PROGN # # # # # #) ; (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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/mssql/src/query-tmpWBK8JTS9.fasl ; compilation finished in 0:00:00.075 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/mssql/src/execute-tmpUVEUD2ZN.fasl ; compilation finished in 0:00:00.020 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/mssql/src/remote-tmpOWNJOEU.fasl ; compilation finished in 0:00:00.016 ; ; compilation unit finished ; caught 1 STYLE-WARNING condition ; printed 6 notes ;; loading file #P"/build/reproducible-path/pgloader-3.6.9/src/hooks.lisp" ;; loading #P"/build/reproducible-path/pgloader-3.6.9/src/hooks.lisp" ;; # ;; (:PGLOADER-IMAGE :SPLIT-SEQUENCE :BORDEAUX-THREADS :FLEXI-STREAMS :THREAD-SUPPORT CFFI-FEATURES:FLAT-NAMESPACE 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 :ARM64 :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/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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-log/pkg-tmpVT5BMTA5.fasl ; compilation finished in 0:00:00.004 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-log/cl-log-tmpN3CFVWZF.fasl ; compilation finished in 0:00:00.252 ; compiling file "/usr/share/common-lisp/source/md5/md5.lisp" (written 22 JUN 2021 07:57:26 AM): ; processing (DEFPACKAGE #:MD5 ...) ; processing (IN-PACKAGE #:MD5) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :EXECUTE) ...) ; processing (DEFTYPE UB32 ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 ...) ; file: /usr/share/common-lisp/source/md5/md5.lisp ; in: DEFUN FILL-BLOCK-UB8 ; (SB-KERNEL:%BYTE-BLT MD5::BUFFER MD5::OFFSET BLOCK 0 64) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SB-ALIEN-INTERNALS:ALIEN-VALUE, not a (SB-ALIEN:ALIEN ; (* T)). ; ; note: unable to optimize because: can't tell function type at compile time ; ; note: doing SAP to pointer coercion (cost 20), for: ; the second argument of SET-SLOT ; ; note: doing SAP to pointer coercion (cost 20) ; ; note: doing SAP to pointer coercion (cost 20) ; processing (DEFUN FILL-BLOCK-CHAR ...) ; file: /usr/share/common-lisp/source/md5/md5.lisp ; in: DEFUN FILL-BLOCK-CHAR ; (DEFUN MD5:FILL-BLOCK-CHAR (BLOCK MD5::BUFFER MD5::OFFSET) ; "DEPRECATED: Convert a complete 64 character input string segment ; starting from `offset' into the given 16 word MD5 block." ; (DECLARE (TYPE (INTEGER 0 4611686018427387839) MD5::OFFSET) ; (TYPE MD5::MD5-BLOCK BLOCK) ; (TYPE SIMPLE-STRING MD5::BUFFER) ; (OPTIMIZE (SPEED 3) (SAFETY 0) (SPACE 0) (DEBUG 0)))) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA MD5:FILL-BLOCK-CHAR ; (BLOCK MD5::BUFFER MD5::OFFSET) ; "DEPRECATED: Convert a complete 64 character input string segment ; starting from `offset' into the given 16 word MD5 block." ; (DECLARE (TYPE (INTEGER 0 4611686018427387839) MD5::OFFSET) ; (TYPE MD5::MD5-BLOCK BLOCK) ; (TYPE SIMPLE-STRING MD5::BUFFER) ; (OPTIMIZE (SPEED 3) (SAFETY 0) (SPACE 0) (DEBUG 0))) ; (BLOCK MD5:FILL-BLOCK-CHAR)) ; ; caught STYLE-WARNING: ; The variable BLOCK is defined but never used. ; ; caught STYLE-WARNING: ; The variable BUFFER is defined but never used. ; ; caught STYLE-WARNING: ; The variable OFFSET is defined but never used. ; processing (DEFUN FILL-BLOCK ...) ; file: /usr/share/common-lisp/source/md5/md5.lisp ; in: DEFUN FILL-BLOCK ; (MD5:FILL-BLOCK-CHAR BLOCK MD5::BUFFER MD5::OFFSET) ; ; caught STYLE-WARNING: ; The variable BLOCK is defined but never used. ; ; caught STYLE-WARNING: ; The variable BUFFER is defined but never used. ; ; caught STYLE-WARNING: ; The variable OFFSET is defined but never used. ; (MD5:FILL-BLOCK-UB8 BLOCK MD5::BUFFER MD5::OFFSET) ; --> BLOCK SB-KERNEL:%BYTE-BLT ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SB-ALIEN-INTERNALS:ALIEN-VALUE, not a (SB-ALIEN:ALIEN ; (* T)). ; ; note: unable to optimize because: can't tell function type at compile time ; ; note: doing SAP to pointer coercion (cost 20), for: ; the second argument of SET-SLOT ; ; note: doing SAP to pointer coercion (cost 20) ; ; note: doing SAP to pointer coercion (cost 20) ; processing (DECLAIM (INLINE MD5REGS-DIGEST)) ; processing (DEFUN MD5REGS-DIGEST ...) ; file: /usr/share/common-lisp/source/md5/md5.lisp ; in: DEFUN MD5REGS-DIGEST ; (+ MD5::OFFSET 1) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (+ MD5::OFFSET 2) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (+ MD5::OFFSET 3) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (+ MD5::OFFSET 1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (+ MD5::OFFSET 2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (+ MD5::OFFSET 3) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; processing (LOCALLY (DECLARE #) ...) ; file: /usr/share/common-lisp/source/md5/md5.lisp ; in: DEFSTRUCT MD5-STATE ; (MD5::AMOUNT 0 :TYPE (INTEGER 0 *)) ; --> SB-INT:NAMED-LAMBDA FUNCTION BLOCK LET SB-KERNEL:THE* MULTIPLE-VALUE-BIND ; --> LET PROGN UNLESS IF AND IF LOCALLY AND THE >= ; ==> ; 1 ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (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)) ; --> SB-KERNEL::%TARGET-DEFSTRUCT SB-KERNEL::%TARGET-DEFSTRUCT ; --> SB-INT:NAMED-LAMBDA FUNCTION AND IF IF = ; ==> ; 1 ; ; note: forced to do full call ; 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. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; etc. ; 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:FILL-BLOCK-CHAR BLOCK SEQUENCE MD5::OFFSET) ; ; caught STYLE-WARNING: ; The variable BLOCK is defined but never used. ; ; caught STYLE-WARNING: ; The variable BUFFER is defined but never used. ; ; caught STYLE-WARNING: ; The variable OFFSET is defined but never used. ; (MD5:FILL-BLOCK-UB8 BLOCK SEQUENCE MD5::OFFSET) ; --> BLOCK SB-KERNEL:%BYTE-BLT ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SB-ALIEN-INTERNALS:ALIEN-VALUE, not a (SB-ALIEN:ALIEN ; (* T)). ; ; note: unable to optimize because: can't tell function type at compile time ; (MD5:FILL-BLOCK-UB8 BLOCK MD5::BUFFER 0) ; --> BLOCK SB-KERNEL:%BYTE-BLT ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SB-ALIEN-INTERNALS:ALIEN-VALUE, not a (SB-ALIEN:ALIEN ; (* T)). ; ; note: unable to optimize because: can't tell function type at compile time ; (+ (MD5::MD5-STATE-AMOUNT MD5::STATE) LENGTH) ; ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MD5:FILL-BLOCK-UB8 BLOCK MD5::BUFFER 0) ; --> BLOCK SB-KERNEL:%BYTE-BLT ; ==> ; 1 ; ; note: doing SAP to pointer coercion (cost 20), for: ; the second argument of SET-SLOT ; ; note: doing SAP to pointer coercion (cost 20) ; ; note: doing SAP to pointer coercion (cost 20) ; (MD5:FILL-BLOCK-UB8 BLOCK SEQUENCE MD5::OFFSET) ; --> BLOCK SB-KERNEL:%BYTE-BLT ; ==> ; 1 ; ; note: doing SAP to pointer coercion (cost 20), for: ; the second argument of SET-SLOT ; ; note: doing SAP to pointer coercion (cost 20) ; ; note: doing SAP to pointer coercion (cost 20) ; processing (DEFUN FINALIZE-MD5-STATE ...) ; file: /usr/share/common-lisp/source/md5/md5.lisp ; in: DEFUN FINALIZE-MD5-STATE ; (DEFUN MD5:FINALIZE-MD5-STATE (MD5::STATE) ; #<(SIMPLE-ARRAY CHARACTER ; (391)) If the given md5-state has not already been finalized, finalize it, ; by processing any remaining input in its buffer, with suitable padding ; and appended bit-length, as specified by the MD5 standard. ; ; T... {1007A57AAF}> ; (DECLARE (TYPE MD5:MD5-STATE MD5::STATE) ; (OPTIMIZE (SPEED 3) (SAFETY 1) (SPACE 0) (DEBUG 1))) ; (LOCALLY ; (DECLARE (OPTIMIZE (SAFETY 0) (DEBUG 0))) ; (OR (MD5::MD5-STATE-FINALIZED-P MD5::STATE) ; (LET (# # # # #) ; (DECLARE # ; # ; # ; #) ; (SETF #) ; (LOOP MD5::FOR MD5::INDEX MD5::OF-TYPE # MD5::FROM # MD5::BELOW 64 ; DO #) ; (MD5:FILL-BLOCK-UB8 BLOCK MD5::BUFFER 0) ; (WHEN # # #) ; (SETF #) ; (SETF #) ; (MD5:UPDATE-MD5-BLOCK MD5::REGS BLOCK) ; (SETF #))))) ; --> SB-INT:NAMED-DS-BIND SB-INT:BINDING* LET* BLOCK LET SB-INT:QUASIQUOTE ; --> SB-IMPL::|List| SB-IMPL::|List| SB-IMPL::|List| ; ==> ; (+ MD5::OFFSET 1) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ==> ; (+ MD5::OFFSET 2) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ==> ; (+ MD5::OFFSET 3) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ==> ; (+ MD5::OFFSET 1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; ==> ; (+ MD5::OFFSET 2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; ==> ; (+ MD5::OFFSET 3) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; file: /usr/share/common-lisp/source/md5/md5.lisp ; in: DEFUN FINALIZE-MD5-STATE ; (MD5:FILL-BLOCK-UB8 BLOCK MD5::BUFFER 0) ; --> BLOCK SB-KERNEL:%BYTE-BLT ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SB-ALIEN-INTERNALS:ALIEN-VALUE, not a (SB-ALIEN:ALIEN ; (* T)). ; ; note: unable to optimize because: can't tell function type at compile time ; (* 8 (MD5::MD5-STATE-AMOUNT MD5::STATE)) ; ; note: forced to do full call ; unable to do #1=inline ASH (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 ; . #2#). ; 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 . #2#). ; etc. ; (LDB (BYTE 32 32) MD5::TOTAL-LENGTH) ; ; note: forced to do full call ; unable to do #1=inline ASH (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 ; . #2#). ; 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) ; . #2#). ; etc. ; (MD5:FILL-BLOCK-UB8 BLOCK MD5::BUFFER 0) ; --> BLOCK SB-KERNEL:%BYTE-BLT ; ==> ; 1 ; ; note: doing SAP to pointer coercion (cost 20), for: ; the second argument of SET-SLOT ; ; note: doing SAP to pointer coercion (cost 20) ; ; note: doing SAP to pointer coercion (cost 20) ; processing (DEFUN MD5SUM-SEQUENCE ...) ; file: /usr/share/common-lisp/source/md5/md5.lisp ; in: DEFUN MD5SUM-SEQUENCE ; (MD5:UPDATE-MD5-STATE MD5::STATE MD5::DATA :START MD5::REAL-START :END ; (+ MD5::REAL-START (- MD5::END MD5::START))) ; ; note: doing signed word to integer coercion (cost 20) ; processing (DEFUN MD5SUM-STRING ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DEFTYPE BUFFER-INDEX ...) ; processing (DEFUN MD5SUM-STREAM ...) ; processing (DEFUN MD5SUM-FILE ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :EXECUTE) ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/md5/md5-tmpNK27C0R1.fasl ; compilation finished in 0:00:00.316 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/ironclad/src/package.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/package-tmp3BPE71HR.fasl ; compilation finished in 0:00:00.008 ; compiling file "/usr/share/common-lisp/source/ironclad/src/conditions.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/conditions-tmp758YUXMV.fasl ; compilation finished in 0:00:00.060 ; compiling file "/usr/share/common-lisp/source/ironclad/src/generic.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/generic-tmpGMQXK1HK.fasl ; compilation finished in 0:00:00.012 WARNING: redefining IRONCLAD:BLOCK-LENGTH in DEFGENERIC ; compiling file "/usr/share/common-lisp/source/ironclad/src/macro-utils.lisp" (written 18 FEB 2022 01:39:10 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DEFMACRO DOTIMES-UNROLLED ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/macro-utils-tmp49Q238TW.fasl ; compilation finished in 0:00:00.020 ; compiling file "/usr/share/common-lisp/source/ironclad/src/util.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DECLAIM (INLINE BYTE-ARRAY-TO-HEX-STRING ...)) ; processing (DEFUN BYTE-ARRAY-TO-HEX-STRING ...) ; file: /usr/share/common-lisp/source/ironclad/src/util.lisp ; in: DEFUN BYTE-ARRAY-TO-HEX-STRING ; (AREF VECTOR IRONCLAD::I) ; ; 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. ; (* LENGTH 2) ; ; note: forced to do */SIGNED=>INTEGER (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 -18446744073709551614 18446744073709551614) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The result is a (VALUES ; (INTEGER -18446744073709551614 18446744073709551614) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (LOOP IRONCLAD::WITH STRING = (ECASE IRONCLAD::ELEMENT-TYPE ; (BASE-CHAR ; (MAKE-STRING (* LENGTH 2) :ELEMENT-TYPE ; 'BASE-CHAR)) ; (CHARACTER ; (MAKE-STRING (* LENGTH 2) :ELEMENT-TYPE ; 'CHARACTER))) ; IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM IRONCLAD::START IRONCLAD::BELOW ; IRONCLAD::END ; IRONCLAD::FOR ...) ; --> LET LET LET TAGBODY WHEN IF >= ; ==> ; 1 ; ; note: forced to do <-FIXNUM-INTEGER (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a (INTEGER -18446744073709551614 ; 18446744073709551614), not a FIXNUM. ; processing (DEFUN HEX-STRING-TO-BYTE-ARRAY ...) ; processing (DEFUN ASCII-STRING-TO-BYTE-ARRAY ...) ; file: /usr/share/common-lisp/source/ironclad/src/util.lisp ; in: DEFUN ASCII-STRING-TO-BYTE-ARRAY ; (CHAR STRING IRONCLAD::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 (DECLAIM (NOTINLINE BYTE-ARRAY-TO-HEX-STRING ...)) ; processing (DEFUN CONSTANT-TIME-EQUAL ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/util-tmpMXPMJ5KG.fasl ; compilation finished in 0:00:00.072 ; compiling file "/usr/share/common-lisp/source/ironclad/src/opt/sbcl/fndb.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :SB-C) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/opt/sbcl/fndb-tmpB69313KI.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/ironclad/src/opt/sbcl/x86oid-vm.lisp" (written 18 FEB 2022 01:39:10 AM): ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/opt/sbcl/x86oid-vm-tmp9ZT99EEA.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/ironclad/src/opt/sbcl/cpu-features.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/opt/sbcl/cpu-features-tmpW045U8V2.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/ironclad/src/common.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFMACRO DEFCONST ...) ; processing (DEFTYPE INDEX ...) ; processing (DEFTYPE INDEX+1 ...) ; processing (DEFTYPE SIMPLE-OCTET-VECTOR ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (PROGN (PROGN # ...) ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 (FTYPE # ...)) ; 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 (FTYPE # ...)) ; processing (DEFUN MOD64ASH ...) ; processing (DEFINE-COMPILER-MACRO MOD64ASH ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN MOD64LOGNOT ...) ; processing (DEFINE-COMPILER-MACRO MOD64LOGNOT ...) ; processing (DECLAIM (FTYPE # ...)) ; 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/common.lisp ; in: DEFINE-COMPILER-MACRO XOR-BLOCK ; (DEFINE-COMPILER-MACRO IRONCLAD::XOR-BLOCK ; (&WHOLE IRONCLAD::FORM &ENVIRONMENT IRONCLAD::ENV IRONCLAD:BLOCK-LENGTH ; IRONCLAD::INPUT-BLOCK1 IRONCLAD::INPUT-BLOCK1-START ; IRONCLAD::INPUT-BLOCK2 IRONCLAD::INPUT-BLOCK2-START ; IRONCLAD::OUTPUT-BLOCK IRONCLAD::OUTPUT-BLOCK-START) ; (COND (T IRONCLAD::FORM))) ; --> SB-INT:BINDING* ; ==> ; (LET* ((#:G0 ; (SB-C::CHECK-DS-LIST (SB-C::COMPILER-MACRO-ARGS #:EXPR) 7 7 ; '(# IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK1 ; IRONCLAD::INPUT-BLOCK1-START ; IRONCLAD::INPUT-BLOCK2 ; IRONCLAD::INPUT-BLOCK2-START ; IRONCLAD::OUTPUT-BLOCK ; IRONCLAD::OUTPUT-BLOCK-START))) ; (IRONCLAD:BLOCK-LENGTH (POP #:G0)) ; (IRONCLAD::INPUT-BLOCK1 (POP #:G0)) ; (IRONCLAD::INPUT-BLOCK1-START (POP #:G0)) ; (IRONCLAD::INPUT-BLOCK2 (POP #:G0)) ; (IRONCLAD::INPUT-BLOCK2-START (POP #:G0)) ; (IRONCLAD::OUTPUT-BLOCK (POP #:G0)) ; (IRONCLAD::OUTPUT-BLOCK-START (POP #:G0))) ; (DECLARE ; (SB-C::CONSTANT-VALUE IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK1 ; IRONCLAD::INPUT-BLOCK1-START IRONCLAD::INPUT-BLOCK2 ; IRONCLAD::INPUT-BLOCK2-START IRONCLAD::OUTPUT-BLOCK ; IRONCLAD::OUTPUT-BLOCK-START)) ; (BLOCK IRONCLAD::XOR-BLOCK (COND (T IRONCLAD::FORM)))) ; ; caught STYLE-WARNING: ; The variable BLOCK-LENGTH is defined but never used. ; ; caught STYLE-WARNING: ; The variable INPUT-BLOCK1 is defined but never used. ; ; caught STYLE-WARNING: ; The variable INPUT-BLOCK1-START is defined but never used. ; ; caught STYLE-WARNING: ; The variable INPUT-BLOCK2 is defined but never used. ; ; caught STYLE-WARNING: ; The variable INPUT-BLOCK2-START is defined but never used. ; ; caught STYLE-WARNING: ; The variable OUTPUT-BLOCK is defined but never used. ; ; caught STYLE-WARNING: ; The variable OUTPUT-BLOCK-START is defined but never used. ; ; caught STYLE-WARNING: ; The variable ENV is defined but never used. ; file: /usr/share/common-lisp/source/ironclad/src/common.lisp ; in: DEFINE-COMPILER-MACRO XOR-BLOCK ; (DEFINE-COMPILER-MACRO IRONCLAD::XOR-BLOCK ; (&WHOLE IRONCLAD::FORM &ENVIRONMENT IRONCLAD::ENV IRONCLAD:BLOCK-LENGTH ; IRONCLAD::INPUT-BLOCK1 IRONCLAD::INPUT-BLOCK1-START ; IRONCLAD::INPUT-BLOCK2 IRONCLAD::INPUT-BLOCK2-START ; IRONCLAD::OUTPUT-BLOCK IRONCLAD::OUTPUT-BLOCK-START) ; (COND (T IRONCLAD::FORM))) ; --> EVAL-WHEN SB-C::%DEFINE-COMPILER-MACRO SB-C::%DEFINE-COMPILER-MACRO ; --> SB-INT:NAMED-LAMBDA FUNCTION SB-INT:NAMED-DS-BIND SB-INT:BINDING* ; ==> ; (LET* ((#:G0 ; (SB-C::CHECK-DS-LIST (SB-C::COMPILER-MACRO-ARGS #:EXPR) 7 7 ; '(# IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK1 ; IRONCLAD::INPUT-BLOCK1-START ; IRONCLAD::INPUT-BLOCK2 ; IRONCLAD::INPUT-BLOCK2-START ; IRONCLAD::OUTPUT-BLOCK ; IRONCLAD::OUTPUT-BLOCK-START))) ; (IRONCLAD:BLOCK-LENGTH (POP #:G0)) ; (IRONCLAD::INPUT-BLOCK1 (POP #:G0)) ; (IRONCLAD::INPUT-BLOCK1-START (POP #:G0)) ; (IRONCLAD::INPUT-BLOCK2 (POP #:G0)) ; (IRONCLAD::INPUT-BLOCK2-START (POP #:G0)) ; (IRONCLAD::OUTPUT-BLOCK (POP #:G0)) ; (IRONCLAD::OUTPUT-BLOCK-START (POP #:G0))) ; (DECLARE ; (SB-C::CONSTANT-VALUE IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK1 ; IRONCLAD::INPUT-BLOCK1-START IRONCLAD::INPUT-BLOCK2 ; IRONCLAD::INPUT-BLOCK2-START IRONCLAD::OUTPUT-BLOCK ; IRONCLAD::OUTPUT-BLOCK-START)) ; (BLOCK IRONCLAD::XOR-BLOCK (COND (T IRONCLAD::FORM)))) ; ; caught STYLE-WARNING: ; The variable BLOCK-LENGTH is defined but never used. ; ; caught STYLE-WARNING: ; The variable INPUT-BLOCK1 is defined but never used. ; ; caught STYLE-WARNING: ; The variable INPUT-BLOCK1-START is defined but never used. ; ; caught STYLE-WARNING: ; The variable INPUT-BLOCK2 is defined but never used. ; ; caught STYLE-WARNING: ; The variable INPUT-BLOCK2-START is defined but never used. ; ; caught STYLE-WARNING: ; The variable OUTPUT-BLOCK is defined but never used. ; ; caught STYLE-WARNING: ; The variable OUTPUT-BLOCK-START is defined but never used. ; --> EVAL-WHEN SB-C::%DEFINE-COMPILER-MACRO SB-C::%DEFINE-COMPILER-MACRO ; --> SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA (COMPILER-MACRO IRONCLAD::XOR-BLOCK) ; (#:EXPR IRONCLAD::ENV &AUX (IRONCLAD::FORM #:EXPR)) ; (DECLARE ; (SB-C::LAMBDA-LIST ; (IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK1 ; IRONCLAD::INPUT-BLOCK1-START ; IRONCLAD::INPUT-BLOCK2 ; IRONCLAD::INPUT-BLOCK2-START ; IRONCLAD::OUTPUT-BLOCK ; IRONCLAD::OUTPUT-BLOCK-START))) ; (SB-INT:NAMED-DS-BIND (:MACRO IRONCLAD::XOR-BLOCK . DEFINE-COMPILER-MACRO) ; (IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK1 ; IRONCLAD::INPUT-BLOCK1-START ; IRONCLAD::INPUT-BLOCK2 ; IRONCLAD::INPUT-BLOCK2-START ; IRONCLAD::OUTPUT-BLOCK ; IRONCLAD::OUTPUT-BLOCK-START) ; (SB-C::COMPILER-MACRO-ARGS #:EXPR) ; (DECLARE ; (SB-C::CONSTANT-VALUE IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK1 ; IRONCLAD::INPUT-BLOCK1-START ; IRONCLAD::INPUT-BLOCK2 ; IRONCLAD::INPUT-BLOCK2-START ; IRONCLAD::OUTPUT-BLOCK ; IRONCLAD::OUTPUT-BLOCK-START)) ; (BLOCK IRONCLAD::XOR-BLOCK (COND (T IRONCLAD::FORM))))) ; ; caught STYLE-WARNING: ; The variable ENV is defined but never used. ; processing (DEFUN COPY-BLOCK ...) ; processing (DEFINE-COMPILER-MACRO COPY-BLOCK ...) ; file: /usr/share/common-lisp/source/ironclad/src/common.lisp ; in: DEFINE-COMPILER-MACRO COPY-BLOCK ; (DEFINE-COMPILER-MACRO IRONCLAD::COPY-BLOCK ; (&WHOLE IRONCLAD::FORM &ENVIRONMENT IRONCLAD::ENV IRONCLAD:BLOCK-LENGTH ; IRONCLAD::INPUT-BLOCK IRONCLAD::INPUT-BLOCK-START IRONCLAD::OUTPUT-BLOCK ; IRONCLAD::OUTPUT-BLOCK-START) ; (COND (T IRONCLAD::FORM))) ; --> SB-INT:BINDING* ; ==> ; (LET* ((#:G0 ; (SB-C::CHECK-DS-LIST (SB-C::COMPILER-MACRO-ARGS #:EXPR) 5 5 ; '(# IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK ; IRONCLAD::INPUT-BLOCK-START ; IRONCLAD::OUTPUT-BLOCK ; IRONCLAD::OUTPUT-BLOCK-START))) ; (IRONCLAD:BLOCK-LENGTH (POP #:G0)) ; (IRONCLAD::INPUT-BLOCK (POP #:G0)) ; (IRONCLAD::INPUT-BLOCK-START (POP #:G0)) ; (IRONCLAD::OUTPUT-BLOCK (POP #:G0)) ; (IRONCLAD::OUTPUT-BLOCK-START (POP #:G0))) ; (DECLARE ; (SB-C::CONSTANT-VALUE IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK ; IRONCLAD::INPUT-BLOCK-START IRONCLAD::OUTPUT-BLOCK ; IRONCLAD::OUTPUT-BLOCK-START)) ; (BLOCK IRONCLAD::COPY-BLOCK (COND (T IRONCLAD::FORM)))) ; ; caught STYLE-WARNING: ; The variable BLOCK-LENGTH is defined but never used. ; ; caught STYLE-WARNING: ; The variable INPUT-BLOCK is defined but never used. ; ; caught STYLE-WARNING: ; The variable INPUT-BLOCK-START is defined but never used. ; ; caught STYLE-WARNING: ; The variable OUTPUT-BLOCK is defined but never used. ; ; caught STYLE-WARNING: ; The variable OUTPUT-BLOCK-START is defined but never used. ; ; caught STYLE-WARNING: ; The variable ENV is defined but never used. ; file: /usr/share/common-lisp/source/ironclad/src/common.lisp ; in: DEFINE-COMPILER-MACRO COPY-BLOCK ; (DEFINE-COMPILER-MACRO IRONCLAD::COPY-BLOCK ; (&WHOLE IRONCLAD::FORM &ENVIRONMENT IRONCLAD::ENV IRONCLAD:BLOCK-LENGTH ; IRONCLAD::INPUT-BLOCK IRONCLAD::INPUT-BLOCK-START IRONCLAD::OUTPUT-BLOCK ; IRONCLAD::OUTPUT-BLOCK-START) ; (COND (T IRONCLAD::FORM))) ; --> EVAL-WHEN SB-C::%DEFINE-COMPILER-MACRO SB-C::%DEFINE-COMPILER-MACRO ; --> SB-INT:NAMED-LAMBDA FUNCTION SB-INT:NAMED-DS-BIND SB-INT:BINDING* ; ==> ; (LET* ((#:G0 ; (SB-C::CHECK-DS-LIST (SB-C::COMPILER-MACRO-ARGS #:EXPR) 5 5 ; '(# IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK ; IRONCLAD::INPUT-BLOCK-START ; IRONCLAD::OUTPUT-BLOCK ; IRONCLAD::OUTPUT-BLOCK-START))) ; (IRONCLAD:BLOCK-LENGTH (POP #:G0)) ; (IRONCLAD::INPUT-BLOCK (POP #:G0)) ; (IRONCLAD::INPUT-BLOCK-START (POP #:G0)) ; (IRONCLAD::OUTPUT-BLOCK (POP #:G0)) ; (IRONCLAD::OUTPUT-BLOCK-START (POP #:G0))) ; (DECLARE ; (SB-C::CONSTANT-VALUE IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK ; IRONCLAD::INPUT-BLOCK-START IRONCLAD::OUTPUT-BLOCK ; IRONCLAD::OUTPUT-BLOCK-START)) ; (BLOCK IRONCLAD::COPY-BLOCK (COND (T IRONCLAD::FORM)))) ; ; caught STYLE-WARNING: ; The variable BLOCK-LENGTH is defined but never used. ; ; caught STYLE-WARNING: ; The variable INPUT-BLOCK is defined but never used. ; ; caught STYLE-WARNING: ; The variable INPUT-BLOCK-START is defined but never used. ; ; caught STYLE-WARNING: ; The variable OUTPUT-BLOCK is defined but never used. ; ; caught STYLE-WARNING: ; The variable OUTPUT-BLOCK-START is defined but never used. ; --> EVAL-WHEN SB-C::%DEFINE-COMPILER-MACRO SB-C::%DEFINE-COMPILER-MACRO ; --> SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA (COMPILER-MACRO IRONCLAD::COPY-BLOCK) ; (#:EXPR IRONCLAD::ENV &AUX (IRONCLAD::FORM #:EXPR)) ; (DECLARE ; (SB-C::LAMBDA-LIST ; (IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK ; IRONCLAD::INPUT-BLOCK-START ; IRONCLAD::OUTPUT-BLOCK ; IRONCLAD::OUTPUT-BLOCK-START))) ; (SB-INT:NAMED-DS-BIND (:MACRO IRONCLAD::COPY-BLOCK ; . DEFINE-COMPILER-MACRO) ; (IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK ; IRONCLAD::INPUT-BLOCK-START ; IRONCLAD::OUTPUT-BLOCK ; IRONCLAD::OUTPUT-BLOCK-START) ; (SB-C::COMPILER-MACRO-ARGS #:EXPR) ; (DECLARE ; (SB-C::CONSTANT-VALUE IRONCLAD:BLOCK-LENGTH IRONCLAD::INPUT-BLOCK ; IRONCLAD::INPUT-BLOCK-START ; IRONCLAD::OUTPUT-BLOCK ; IRONCLAD::OUTPUT-BLOCK-START)) ; (BLOCK IRONCLAD::COPY-BLOCK (COND (T IRONCLAD::FORM))))) ; ; caught STYLE-WARNING: ; The variable ENV is defined but never used. ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/common-tmp6XOIRI3N.fasl ; compilation finished in 0:00:00.184 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/cipher.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/cipher-tmp9ZHTLHSG.fasl ; compilation finished in 0:00:00.144 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/padding.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/padding-tmpRW73Q691.fasl ; compilation finished in 0:00:00.036 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/make-cipher.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/make-cipher-tmp4TM0ME1F.fasl ; compilation finished in 0:00:00.072 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/modes.lisp" (written 18 FEB 2022 01:39:10 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 (MACROLET (# #) ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/modes.lisp ; in: DEFINE-MODE-FUNCTION MODE-CRYPT ; (IRONCLAD::DEFINE-MODE-FUNCTION IRONCLAD::MODE-CRYPT IRONCLAD::MESSAGE-LENGTH) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET SETF SETQ THE ; ==> ; (- 128 ; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0 ; 128)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET MAKE-ARRAY ; ==> ; 1 ; ; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET SETF SETQ THE ; ==> ; (- 128 ; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0 ; 128)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET ; ==> ; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED 128) ; (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING)) ; ; note: doing signed word to integer coercion (cost 20) to "" ; ; note: doing signed word to integer coercion (cost 20) to "" ; ==> ; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING) ; (+ IRONCLAD::N-BYTES-PROCESSED 128)) ; ; note: doing signed word to integer coercion (cost 20) to "" ; ; note: doing signed word to integer coercion (cost 20) to "" ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET SETF SETQ THE ; ==> ; (- 64 ; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0 ; 64)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET MAKE-ARRAY ; ==> ; 1 ; ; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET SETF SETQ THE ; ==> ; (- 64 ; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0 ; 64)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET ; ==> ; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED 64) ; (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING)) ; ; note: doing signed word to integer coercion (cost 20) to "" ; ; note: doing signed word to integer coercion (cost 20) to "" ; ==> ; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING) ; (+ IRONCLAD::N-BYTES-PROCESSED 64)) ; ; note: doing signed word to integer coercion (cost 20) to "" ; ; note: doing signed word to integer coercion (cost 20) to "" ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET SETF SETQ THE ; ==> ; (- 32 ; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0 ; 32)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET MAKE-ARRAY ; ==> ; 1 ; ; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET SETF SETQ THE ; ==> ; (- 32 ; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0 ; 32)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET ; ==> ; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED 32) ; (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING)) ; ; note: doing signed word to integer coercion (cost 20) to "" ; ; note: doing signed word to integer coercion (cost 20) to "" ; ==> ; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING) ; (+ IRONCLAD::N-BYTES-PROCESSED 32)) ; ; note: doing signed word to integer coercion (cost 20) to "" ; ; note: doing signed word to integer coercion (cost 20) to "" ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET SETF SETQ THE ; ==> ; (- 16 ; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0 ; 16)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET MAKE-ARRAY ; ==> ; 1 ; ; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET SETF SETQ THE ; ==> ; (- 16 ; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0 ; 16)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET ; ==> ; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED 16) ; (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING)) ; ; note: doing signed word to integer coercion (cost 20) to "" ; ; note: doing signed word to integer coercion (cost 20) to "" ; ==> ; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING) ; (+ IRONCLAD::N-BYTES-PROCESSED 16)) ; ; note: doing signed word to integer coercion (cost 20) to "" ; ; note: doing signed word to integer coercion (cost 20) to "" ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET SETF SETQ THE ; ==> ; (- 8 ; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0 8)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET MAKE-ARRAY ; ==> ; 1 ; ; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET SETF SETQ THE ; ==> ; (- 8 ; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0 8)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET ; ==> ; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED 8) ; (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING)) ; ; note: doing signed word to integer coercion (cost 20) to "" ; ; note: doing signed word to integer coercion (cost 20) to "" ; ==> ; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING) ; (+ IRONCLAD::N-BYTES-PROCESSED 8)) ; ; note: doing signed word to integer coercion (cost 20) to "" ; ; note: doing signed word to integer coercion (cost 20) to "" ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET SETF SETQ THE ; ==> ; (- 128 ; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0 ; 128)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET MAKE-ARRAY ; ==> ; 1 ; ; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET SETF SETQ THE ; ==> ; (- 128 ; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0 ; 128)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER ; ==> ; (SB-PCL::LOAD-DEFMETHOD 'STANDARD-METHOD 'IRONCLAD::MODE-CRYPT-FUNCTIONS 'NIL ; (LIST (FIND-CLASS 'IRONCLAD::128-BYTE-BLOCK-MIXIN) ; (FIND-CLASS 'IRONCLAD::CBC-MODE)) ; '(IRONCLAD::CIPHER IRONCLAD::MODE) ; (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)) ; (SB-C:SOURCE-LOCATION)) ; ; caught STYLE-WARNING: ; Call to IRONCLAD::COPY-BLOCK 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 IRONCLAD::XOR-BLOCK 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. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET ; ==> ; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED 128) ; (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING)) ; ; note: doing signed word to integer coercion (cost 20) to "" ; ; note: doing signed word to integer coercion (cost 20) to "" ; ==> ; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING) ; (+ IRONCLAD::N-BYTES-PROCESSED 128)) ; ; note: doing signed word to integer coercion (cost 20) to "" ; ; note: doing signed word to integer coercion (cost 20) to "" ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET SETF SETQ THE ; ==> ; (- 64 ; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0 ; 64)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET MAKE-ARRAY ; ==> ; 1 ; ; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET SETF SETQ THE ; ==> ; (- 64 ; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0 ; 64)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET ; ==> ; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED 64) ; (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING)) ; ; note: doing signed word to integer coercion (cost 20) to "" ; ; note: doing signed word to integer coercion (cost 20) to "" ; ==> ; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING) ; (+ IRONCLAD::N-BYTES-PROCESSED 64)) ; ; note: doing signed word to integer coercion (cost 20) to "" ; ; note: doing signed word to integer coercion (cost 20) to "" ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET SETF SETQ THE ; ==> ; (- 32 ; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0 ; 32)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET MAKE-ARRAY ; ==> ; 1 ; ; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET SETF SETQ THE ; ==> ; (- 32 ; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0 ; 32)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET ; ==> ; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED 32) ; (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING)) ; ; note: doing signed word to integer coercion (cost 20) to "" ; ; note: doing signed word to integer coercion (cost 20) to "" ; ==> ; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING) ; (+ IRONCLAD::N-BYTES-PROCESSED 32)) ; ; note: doing signed word to integer coercion (cost 20) to "" ; ; note: doing signed word to integer coercion (cost 20) to "" ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET SETF SETQ THE ; ==> ; (- 16 ; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0 ; 16)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET MAKE-ARRAY ; ==> ; 1 ; ; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET SETF SETQ THE ; ==> ; (- 16 ; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0 ; 16)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET ; ==> ; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED 16) ; (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING)) ; ; note: doing signed word to integer coercion (cost 20) to "" ; ; note: doing signed word to integer coercion (cost 20) to "" ; ==> ; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING) ; (+ IRONCLAD::N-BYTES-PROCESSED 16)) ; ; note: doing signed word to integer coercion (cost 20) to "" ; ; note: doing signed word to integer coercion (cost 20) to "" ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET SETF SETQ THE ; ==> ; (- 8 ; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0 8)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET MAKE-ARRAY ; ==> ; 1 ; ; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET SETF SETQ THE ; ==> ; (- 8 ; (IRONCLAD::COUNT-PADDING-BYTES IRONCLAD::PADDING IRONCLAD::TEMP-BLOCK 0 8)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET LET IF LET ; ==> ; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED 8) ; (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING)) ; ; note: doing signed word to integer coercion (cost 20) to "" ; ; note: doing signed word to integer coercion (cost 20) to "" ; ==> ; (VALUES (+ IRONCLAD::N-BYTES-PROCESSED IRONCLAD::N-BYTES-REMAINING) ; (+ IRONCLAD::N-BYTES-PROCESSED 8)) ; ; note: doing signed word to integer coercion (cost 20) to "" ; ; note: doing signed word to integer coercion (cost 20) to "" ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 VALUES IRONCLAD::MODE-LAMBDA LAMBDA ; --> FUNCTION LET MAKE-ARRAY ; ==> ; 1 ; ; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH) ; ; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH) ; ; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH) ; ; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH) ; ; note: could not stack allocate: (DEFINE-MODE-FUNCTION MODE-CRYPT MESSAGE-LENGTH) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK ; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET MULTIPLE-VALUE-BIND LET PROGN ; --> UNLESS IF AND IF LOCALLY AND THE >= ; ==> ; 1 ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK ; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION INCF SETQ THE ; ==> ; (+ IRONCLAD::Q IRONCLAD::KEYSTREAM-BLOCKS) ; ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK ; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET LOOP BLOCK TAGBODY PROGN WHEN ; --> IF PROGN INCF SETQ THE ; ==> ; (+ 1 IRONCLAD::KEYSTREAM-BLOCKS) ; ; 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 (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK ; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET MULTIPLE-VALUE-BIND LET PROGN ; --> UNLESS IF AND IF LOCALLY AND THE >= ; ==> ; 1 ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK ; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION INCF SETQ THE ; ==> ; (+ IRONCLAD::Q IRONCLAD::KEYSTREAM-BLOCKS) ; ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK ; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET LOOP BLOCK TAGBODY PROGN WHEN ; --> IF PROGN INCF SETQ THE ; ==> ; (+ 1 IRONCLAD::KEYSTREAM-BLOCKS) ; ; 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 (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK ; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET MULTIPLE-VALUE-BIND LET PROGN ; --> UNLESS IF AND IF LOCALLY AND THE >= ; ==> ; 1 ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK ; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION INCF SETQ THE ; ==> ; (+ IRONCLAD::Q IRONCLAD::KEYSTREAM-BLOCKS) ; ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK ; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET LOOP BLOCK TAGBODY PROGN WHEN ; --> IF PROGN INCF SETQ THE ; ==> ; (+ 1 IRONCLAD::KEYSTREAM-BLOCKS) ; ; 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 (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK ; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET MULTIPLE-VALUE-BIND LET PROGN ; --> UNLESS IF AND IF LOCALLY AND THE >= ; ==> ; 1 ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK ; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION INCF SETQ THE ; ==> ; (+ IRONCLAD::Q IRONCLAD::KEYSTREAM-BLOCKS) ; ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK ; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET LOOP BLOCK TAGBODY PROGN WHEN ; --> IF PROGN INCF SETQ THE ; ==> ; (+ 1 IRONCLAD::KEYSTREAM-BLOCKS) ; ; 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 (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK ; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET MULTIPLE-VALUE-BIND LET PROGN ; --> UNLESS IF AND IF LOCALLY AND THE >= ; ==> ; 1 ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK ; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION INCF SETQ THE ; ==> ; (+ IRONCLAD::Q IRONCLAD::KEYSTREAM-BLOCKS) ; ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 FLET IRONCLAD::CTR-CRYPT-FUNCTION BLOCK ; --> IRONCLAD::MODE-LAMBDA LAMBDA FUNCTION LET LOOP BLOCK TAGBODY PROGN WHEN ; --> IF PROGN INCF SETQ THE ; ==> ; (+ 1 IRONCLAD::KEYSTREAM-BLOCKS) ; ; 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 (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; processing (DEFMETHOD ENCRYPTED-MESSAGE-LENGTH ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/modes-tmpU2IL9N4.fasl ; compilation finished in 0:00:01.100 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/digest.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL) ...) ; processing (DEFTYPE BUFFER-INDEX ...) ; processing (DEFUN UPDATE-DIGEST-FROM-STREAM ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/digest.lisp ; in: DEFUN UPDATE-DIGEST-FROM-STREAM ; (MAKE-ARRAY IRONCLAD::+BUFFER-SIZE+ :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) ; ; note: could not stack allocate: ; (MAKE-ARRAY +BUFFER-SIZE+ :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) ; processing (DECLAIM (INLINE UPDATE-DIGEST-FROM-VECTOR)) ; processing (DEFUN UPDATE-DIGEST-FROM-VECTOR ...) ; 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 (DECLAIM (NOTINLINE MAKE-DIGEST)) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/digests/digest-tmpOPW41KDL.fasl ; compilation finished in 0:00:00.392 ; compiling file "/usr/share/common-lisp/source/ironclad/src/macs/mac.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/macs/mac-tmpIPVWLON2.fasl ; compilation finished in 0:00:00.020 ; compiling file "/usr/share/common-lisp/source/ironclad/src/prng/prng.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/prng/prng-tmpO0LCOIDS.fasl ; compilation finished in 0:00:00.056 ; compiling file "/usr/share/common-lisp/source/ironclad/src/prng/os-prng.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/prng/os-prng-tmpP264WQ6O.fasl ; compilation finished in 0:00:00.020 ; compiling file "/usr/share/common-lisp/source/ironclad/src/math.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFUN EGCD ...) ; file: /usr/share/common-lisp/source/ironclad/src/math.lisp ; in: DEFUN EGCD ; (= IRONCLAD::C 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 because: The operands might not be the same type. ; (FLOOR IRONCLAD::D IRONCLAD::C) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a (OR FLOAT INTEGER). ; ; note: unable to ; 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 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. ; (* IRONCLAD::Q IRONCLAD::C) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a REAL, not a FLOAT. ; (- IRONCLAD::D (* IRONCLAD::Q IRONCLAD::C)) ; ; note: unable to ; open-code float conversion in mixed 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; (* IRONCLAD::Q IRONCLAD::U_C) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (- IRONCLAD::U_D (* IRONCLAD::Q IRONCLAD::U_C)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (* IRONCLAD::Q IRONCLAD::V_C) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (- IRONCLAD::V_D (* IRONCLAD::Q IRONCLAD::V_C)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (>= IRONCLAD::A 0) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (>= IRONCLAD::B 0) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (FLOOR IRONCLAD::D IRONCLAD::C) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (* IRONCLAD::Q IRONCLAD::C) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a REAL, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- IRONCLAD::D (* IRONCLAD::Q IRONCLAD::C)) ; ; note: forced to do full call ; 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 . #2#). ; 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 . #2#). ; etc. ; (* IRONCLAD::Q IRONCLAD::U_C) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (- IRONCLAD::U_D (* IRONCLAD::Q IRONCLAD::U_C)) ; ; note: forced to do full call ; 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 ; . #2#). ; 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 . #2#). ; etc. ; (* IRONCLAD::Q IRONCLAD::V_C) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (- IRONCLAD::V_D (* IRONCLAD::Q IRONCLAD::V_C)) ; ; note: forced to do full call ; 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 ; . #2#). ; 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 . #2#). ; etc. ; processing (DEFUN JACOBI ...) ; file: /usr/share/common-lisp/source/ironclad/src/math.lisp ; in: DEFUN JACOBI ; (ASH IRONCLAD::B -1) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; 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) ; . #2#). ; etc. ; (MINUSP IRONCLAD::B) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (- IRONCLAD::B) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a (INTEGER * -1), not a FIXNUM. ; The result is a (VALUES (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 2) because: ; The first argument is a (INTEGER * -1), not a (SIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES ; (SIGNED-BYTE 64) . #1#). ; etc. ; (MINUSP IRONCLAD::A) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (ASH IRONCLAD::A -1) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; 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) ; . #2#). ; etc. ; (ABS IRONCLAD::A) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a (INTEGER * -1), not a FIXNUM. ; The result is a (VALUES (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 2) because: ; The first argument is a (INTEGER * -1), not a (SIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES ; (SIGNED-BYTE 64) . #1#). ; etc. ; (> IRONCLAD::B 1) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (ABS IRONCLAD::A) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a (INTEGER * -1), not a FIXNUM. ; The result is a (VALUES (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 2) because: ; The first argument is a (INTEGER * -1), not a (SIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES ; (SIGNED-BYTE 64) . #1#). ; etc. ; processing (DEFUN POWER-MOD-TAB ...) ; file: /usr/share/common-lisp/source/ironclad/src/math.lisp ; in: DEFUN POWER-MOD-TAB ; (1- IRONCLAD::K) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (* IRONCLAD::B IRONCLAD::B) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::B IRONCLAD::B) IRONCLAD::M) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a (OR FLOAT INTEGER). ; ; note: unable to ; 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 in mixed 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; 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. ; (* IRONCLAD::BI IRONCLAD::BB) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a REAL, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::BI IRONCLAD::BB) IRONCLAD::M) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a (OR FLOAT INTEGER). ; ; note: unable to ; 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 in mixed 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; 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. ; (1- IRONCLAD::K) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (ASH 1 (1- IRONCLAD::K)) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 2) because: ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 62). ; The result is a (VALUES UNSIGNED-BYTE . #2=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #2#). ; unable to do #1# (cost 3) because: ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 62). ; The result is a (VALUES UNSIGNED-BYTE . #2#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #2#). ; etc. ; (* IRONCLAD::B IRONCLAD::B) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::B IRONCLAD::B) IRONCLAD::M) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (* IRONCLAD::BI IRONCLAD::BB) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a REAL, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::BI IRONCLAD::BB) IRONCLAD::M) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; processing (DEFUN POWER-MOD ...) ; file: /usr/share/common-lisp/source/ironclad/src/math.lisp ; in: DEFUN POWER-MOD ; (ZEROP IRONCLAD::E) ; ; 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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (MOD 1 IRONCLAD::M) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL 0)), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL 0)), not a RATIONAL. ; The second argument is a (OR (RATIONAL * (0)) (SINGLE-FLOAT * (0.0)) ; (DOUBLE-FLOAT * (0.0d0))), not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL 0)), not a FLOAT. ; The second argument is a (OR (RATIONAL * (0)) (SINGLE-FLOAT * (0.0)) ; (DOUBLE-FLOAT * (0.0d0))), not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL 0)), not a SINGLE-FLOAT. ; The second argument is a (OR (RATIONAL * (0)) (SINGLE-FLOAT * (0.0)) ; (DOUBLE-FLOAT * (0.0d0))), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL 0)), not a DOUBLE-FLOAT. ; The second argument is a (OR (RATIONAL * (0)) (SINGLE-FLOAT * (0.0)) ; (DOUBLE-FLOAT * (0.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. ; (* IRONCLAD::RES IRONCLAD::B) ; ; note: unable to ; open-code float conversion in mixed 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 in mixed 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 in mixed 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 in mixed 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 in mixed 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 in mixed 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 ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::RES IRONCLAD::B) IRONCLAD::M) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a (OR FLOAT INTEGER). ; ; note: unable to ; 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 in mixed 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; 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. ; (* IRONCLAD::B IRONCLAD::B) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::B IRONCLAD::B) IRONCLAD::M) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a (OR FLOAT INTEGER). ; ; note: unable to ; 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 in mixed 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; 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. ; (LDB (BYTE IRONCLAD::TMP IRONCLAD::S) IRONCLAD::E) ; ; 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). ; (* IRONCLAD::RES (SVREF IRONCLAD::TAB (ASH IRONCLAD::U -1))) ; ; note: unable to ; open-code float conversion in mixed 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 in mixed 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 in mixed 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 in mixed 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 in mixed 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 in mixed 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 ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::RES (SVREF IRONCLAD::TAB (ASH IRONCLAD::U -1))) IRONCLAD::M) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a (OR FLOAT INTEGER). ; ; note: unable to ; 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 in mixed 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; 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. ; (* IRONCLAD::RES IRONCLAD::RES) ; ; note: unable to ; open-code float conversion in mixed 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; (MOD (* IRONCLAD::RES IRONCLAD::RES) IRONCLAD::M) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0) ; (SINGLE-FLOAT 0.0)), 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 (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0) ; (SINGLE-FLOAT 0.0)), not a DOUBLE-FLOAT. ; The second argument is a REAL, not a (OR FLOAT INTEGER). ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL 0)), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL 0)), not a RATIONAL. ; The second argument is a (OR (RATIONAL * (0)) (SINGLE-FLOAT * (0.0)) ; (DOUBLE-FLOAT * (0.0d0))), not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL 0)), not a FLOAT. ; The second argument is a (OR (RATIONAL * (0)) (SINGLE-FLOAT * (0.0)) ; (DOUBLE-FLOAT * (0.0d0))), not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL 0)), not a SINGLE-FLOAT. ; The second argument is a (OR (RATIONAL * (0)) (SINGLE-FLOAT * (0.0)) ; (DOUBLE-FLOAT * (0.0d0))), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL 0)), not a DOUBLE-FLOAT. ; The second argument is a (OR (RATIONAL * (0)) (SINGLE-FLOAT * (0.0)) ; (DOUBLE-FLOAT * (0.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. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0) ; (SINGLE-FLOAT 0.0)), not a FLOAT. ; (* IRONCLAD::RES IRONCLAD::RES) ; ; note: unable to ; open-code float conversion in mixed 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; (MOD (* IRONCLAD::RES IRONCLAD::RES) IRONCLAD::M) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0) ; (SINGLE-FLOAT 0.0)), 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 (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0) ; (SINGLE-FLOAT 0.0)), not a DOUBLE-FLOAT. ; The second argument is a REAL, not a (OR FLOAT INTEGER). ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL 0)), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL 0)), not a RATIONAL. ; The second argument is a (OR (RATIONAL * (0)) (SINGLE-FLOAT * (0.0)) ; (DOUBLE-FLOAT * (0.0d0))), not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL 0)), not a FLOAT. ; The second argument is a (OR (RATIONAL * (0)) (SINGLE-FLOAT * (0.0)) ; (DOUBLE-FLOAT * (0.0d0))), not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL 0)), not a SINGLE-FLOAT. ; The second argument is a (OR (RATIONAL * (0)) (SINGLE-FLOAT * (0.0)) ; (DOUBLE-FLOAT * (0.0d0))), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL 0)), not a DOUBLE-FLOAT. ; The second argument is a (OR (RATIONAL * (0)) (SINGLE-FLOAT * (0.0)) ; (DOUBLE-FLOAT * (0.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. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0) ; (SINGLE-FLOAT 0.0)), not a FLOAT. ; (MOD 1 IRONCLAD::M) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL 0)), not a FIXNUM. ; The second argument is a (OR (RATIONAL * #1=(0)) ; (SINGLE-FLOAT * #2=(0.0)) ; (DOUBLE-FLOAT * #3=(0.0d0))), not a FIXNUM. ; The result is a (VALUES REAL . #4=(&OPTIONAL)), not a (VALUES FIXNUM ; . #4#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL 0)), not a SINGLE-FLOAT. ; The second argument is a (OR (RATIONAL * #1#) (SINGLE-FLOAT * #2#) ; (DOUBLE-FLOAT * #3#)), not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #4#), not a (VALUES SINGLE-FLOAT . #4#). ; etc. ; (* IRONCLAD::RES IRONCLAD::B) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::RES IRONCLAD::B) IRONCLAD::M) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (ASH IRONCLAD::E -1) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; 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) ; . #2#). ; etc. ; (* IRONCLAD::B IRONCLAD::B) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::B IRONCLAD::B) IRONCLAD::M) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (< IRONCLAD::I 0) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER -1), not a FIXNUM. ; (- IRONCLAD::I IRONCLAD::K) ; ; 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 (INTEGER -7) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES (INTEGER -7) . #1#), not a (VALUES ; (SIGNED-BYTE 64) ; . #1#). ; etc. ; (1+ (- IRONCLAD::I IRONCLAD::K)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -7), not a FIXNUM. ; The result is a (VALUES (INTEGER -6) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -7), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER -6) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MAX (1+ (- IRONCLAD::I IRONCLAD::K)) 0) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER -6), not a FIXNUM. ; (- IRONCLAD::I IRONCLAD::S) ; ; 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 INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The second argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (1+ (- IRONCLAD::I IRONCLAD::S)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (DOTIMES (IRONCLAD::H IRONCLAD::TMP) ; (SETQ IRONCLAD::RES (MOD (* IRONCLAD::RES IRONCLAD::RES) IRONCLAD::M))) ; --> BLOCK LET TAGBODY UNLESS IF >= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::RES IRONCLAD::RES) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0) ; (SINGLE-FLOAT 0.0)) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a REAL, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0) ; (SINGLE-FLOAT 0.0)) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::RES IRONCLAD::RES) IRONCLAD::M) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0) ; (SINGLE-FLOAT 0.0)), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0) ; (SINGLE-FLOAT 0.0)), not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL 0)), not a FIXNUM. ; The second argument is a (OR (RATIONAL * #1=(0)) ; (SINGLE-FLOAT * #2=(0.0)) ; (DOUBLE-FLOAT * #3=(0.0d0))), not a FIXNUM. ; The result is a (VALUES REAL . #4=(&OPTIONAL)), not a (VALUES FIXNUM ; . #4#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL 0)), not a SINGLE-FLOAT. ; The second argument is a (OR (RATIONAL * #1#) (SINGLE-FLOAT * #2#) ; (DOUBLE-FLOAT * #3#)), not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #4#), not a (VALUES SINGLE-FLOAT . #4#). ; etc. ; (DOTIMES (IRONCLAD::H IRONCLAD::TMP) ; (SETQ IRONCLAD::RES (MOD (* IRONCLAD::RES IRONCLAD::RES) IRONCLAD::M))) ; --> BLOCK LET TAGBODY PSETQ PROGN SETQ THE 1+ ; ==> ; 1 ; ; 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 (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (ASH IRONCLAD::U -1) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; unable to do #1# (cost 3) because: ; The first argument is a (INTEGER 1), not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::RES (SVREF IRONCLAD::TAB (ASH IRONCLAD::U -1))) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::RES (SVREF IRONCLAD::TAB (ASH IRONCLAD::U -1))) IRONCLAD::M) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (INCF IRONCLAD::S) ; --> THE ; ==> ; (+ 1 IRONCLAD::S) ; ; 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 (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (* IRONCLAD::RES IRONCLAD::RES) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0) ; (SINGLE-FLOAT 0.0)) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a REAL, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0) ; (SINGLE-FLOAT 0.0)) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::RES IRONCLAD::RES) IRONCLAD::M) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0) ; (SINGLE-FLOAT 0.0)), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0) ; (SINGLE-FLOAT 0.0)), not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL 0)), not a FIXNUM. ; The second argument is a (OR (RATIONAL * #1=(0)) ; (SINGLE-FLOAT * #2=(0.0)) ; (DOUBLE-FLOAT * #3=(0.0d0))), not a FIXNUM. ; The result is a (VALUES REAL . #4=(&OPTIONAL)), not a (VALUES FIXNUM ; . #4#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL 0)), not a SINGLE-FLOAT. ; The second argument is a (OR (RATIONAL * #1#) (SINGLE-FLOAT * #2#) ; (DOUBLE-FLOAT * #3#)), not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #4#), not a (VALUES SINGLE-FLOAT . #4#). ; etc. ; (DECF IRONCLAD::I) ; --> THE SB-IMPL::XSUBTRACT BLOCK ; ==> ; (- SB-IMPL::B SB-IMPL::A) ; ; 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 (INTEGER -1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES (INTEGER -1) . #1#), not a (VALUES ; (SIGNED-BYTE 64) ; . #1#). ; etc. ; processing (DEFUN MILLER-RABIN-DECOMPOSITION ...) ; file: /usr/share/common-lisp/source/ironclad/src/math.lisp ; in: DEFUN MILLER-RABIN-DECOMPOSITION ; (ASH IRONCLAD::N -1) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; 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) ; . #2#). ; etc. ; (1+ IRONCLAD::K) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES (INTEGER 2) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER 1), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 2) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (ASH IRONCLAD::Q -1) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; 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) ; . #2#). ; etc. ; processing (DEFUN MILLER-RABIN-KERNEL ...) ; file: /usr/share/common-lisp/source/ironclad/src/math.lisp ; in: DEFUN MILLER-RABIN-KERNEL ; (- IRONCLAD::N 2) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (+ (IRONCLAD:STRONG-RANDOM (- IRONCLAD::N 2)) 2) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (1- IRONCLAD::N) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (= IRONCLAD::Y 1) ; ; 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. ; (= IRONCLAD::Y IRONCLAD::MINUS1) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a 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 ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (= IRONCLAD::J IRONCLAD::K) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (= IRONCLAD::Y IRONCLAD::MINUS1) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a 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 ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (= IRONCLAD::Y 1) ; ; 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. ; (- IRONCLAD::N 2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (+ (IRONCLAD:STRONG-RANDOM (- IRONCLAD::N 2)) 2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (1- IRONCLAD::N) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (= IRONCLAD::Y IRONCLAD::MINUS1) ; ; note: forced to do full call ; 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 NUMBER, 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 NUMBER, not a DOUBLE-FLOAT. ; ; note: forced to do full call ; 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 NUMBER, 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 NUMBER, not a DOUBLE-FLOAT. ; (1+ IRONCLAD::J) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES (INTEGER 2) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER 1), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 2) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; processing (DEFUN LUCAS-SEQUENCE ...) ; file: /usr/share/common-lisp/source/ironclad/src/math.lisp ; in: DEFUN LUCAS-SEQUENCE ; (* IRONCLAD::UH IRONCLAD::VL) ; ; note: unable to ; open-code float conversion in mixed 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; (1- (* IRONCLAD::UH IRONCLAD::VL)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (MOD (1- (* IRONCLAD::UH IRONCLAD::VL)) IRONCLAD::N) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a (OR FLOAT INTEGER). ; (* IRONCLAD::VH IRONCLAD::VL) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a REAL, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P) IRONCLAD::N) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a (OR FLOAT INTEGER). ; ; note: unable to ; 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 in mixed 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; 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. ; (MOD (1- (* IRONCLAD::UH IRONCLAD::VL)) IRONCLAD::N) ; ; 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 in mixed 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; 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. ; (* IRONCLAD::UH IRONCLAD::VL) ; ; note: unable to ; open-code float conversion in mixed 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; (MOD (* IRONCLAD::UH IRONCLAD::VL) IRONCLAD::N) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a (OR FLOAT INTEGER). ; (* IRONCLAD::VL IRONCLAD::VL) ; ; note: unable to ; open-code float conversion in mixed 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; (- (* IRONCLAD::VL IRONCLAD::VL) 2) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0) ; (SINGLE-FLOAT 0.0)), not a FLOAT. ; (MOD (- (* IRONCLAD::VL IRONCLAD::VL) 2) IRONCLAD::N) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0) ; (RATIONAL -2)), 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 (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0) ; (RATIONAL -2)), not a DOUBLE-FLOAT. ; The second argument is a REAL, not a (OR 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 in mixed 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0) ; (RATIONAL -2)), not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0) ; (RATIONAL -2)), not a FLOAT. ; (MOD (* IRONCLAD::UH IRONCLAD::VL) IRONCLAD::N) ; ; 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 in mixed 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; 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. ; (* IRONCLAD::UH IRONCLAD::VH) ; ; note: unable to ; open-code float conversion in mixed 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 in mixed 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 in mixed 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 in mixed 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 in mixed 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 in mixed 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 ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::UH IRONCLAD::VH) IRONCLAD::N) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a (OR FLOAT INTEGER). ; (* IRONCLAD::VH IRONCLAD::VL) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a REAL, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P) IRONCLAD::N) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a (OR FLOAT INTEGER). ; (* IRONCLAD::VH IRONCLAD::VH) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (- (* IRONCLAD::VH IRONCLAD::VH) 2) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (- (* IRONCLAD::VH IRONCLAD::VH) 2) IRONCLAD::N) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a (OR FLOAT INTEGER). ; ; note: unable to ; 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 in mixed 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; 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. ; (MOD (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P) IRONCLAD::N) ; ; 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 in mixed 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; 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. ; (MOD (* IRONCLAD::UH IRONCLAD::VH) IRONCLAD::N) ; ; 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 in mixed 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; 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. ; (* IRONCLAD::UH IRONCLAD::VL) ; ; note: unable to ; open-code float conversion in mixed 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; (1- (* IRONCLAD::UH IRONCLAD::VL)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (MOD (1- (* IRONCLAD::UH IRONCLAD::VL)) IRONCLAD::N) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a (OR FLOAT INTEGER). ; (* IRONCLAD::VH IRONCLAD::VL) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a REAL, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P) IRONCLAD::N) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a (OR FLOAT INTEGER). ; (* IRONCLAD::VL IRONCLAD::VL) ; ; note: unable to ; open-code float conversion in mixed 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; (- (* IRONCLAD::VL IRONCLAD::VL) 2) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0) ; (SINGLE-FLOAT 0.0)), not a FLOAT. ; (MOD (- (* IRONCLAD::VL IRONCLAD::VL) 2) IRONCLAD::N) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0) ; (RATIONAL -2)), 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 (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0) ; (RATIONAL -2)), not a DOUBLE-FLOAT. ; The second argument is a REAL, not a (OR 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 in mixed 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0) ; (RATIONAL -2)), not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0) ; (RATIONAL -2)), not a FLOAT. ; (MOD (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P) IRONCLAD::N) ; ; 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 in mixed 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; 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. ; (MOD (1- (* IRONCLAD::UH IRONCLAD::VL)) IRONCLAD::N) ; ; 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 in mixed 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; 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. ; (* IRONCLAD::UH IRONCLAD::VH) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::UH IRONCLAD::VH) IRONCLAD::N) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (* IRONCLAD::VH IRONCLAD::VL) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a REAL, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P) ; ; note: forced to do full call ; 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 REAL . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT . #2#). ; 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 REAL . #2#), not a (VALUES SINGLE-FLOAT . #2#). ; etc. ; (MOD (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P) IRONCLAD::N) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (* IRONCLAD::VH IRONCLAD::VH) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (- (* IRONCLAD::VH IRONCLAD::VH) 2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- (* IRONCLAD::VH IRONCLAD::VH) 2) IRONCLAD::N) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (* IRONCLAD::UH IRONCLAD::VL) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a REAL, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (1- (* IRONCLAD::UH IRONCLAD::VL)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) . #1#). ; etc. ; (MOD (1- (* IRONCLAD::UH IRONCLAD::VL)) IRONCLAD::N) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (* IRONCLAD::VH IRONCLAD::VL) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a REAL, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P) ; ; note: forced to do full call ; 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 REAL . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT . #2#). ; 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 REAL . #2#), not a (VALUES SINGLE-FLOAT . #2#). ; etc. ; (MOD (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P) IRONCLAD::N) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (* IRONCLAD::VL IRONCLAD::VL) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0) ; (SINGLE-FLOAT 0.0)) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a REAL, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0) ; (SINGLE-FLOAT 0.0)) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- (* IRONCLAD::VL IRONCLAD::VL) 2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0) ; (SINGLE-FLOAT 0.0)), not a FIXNUM. ; The result is a (VALUES ; (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0) ; (RATIONAL -2)) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0) ; (SINGLE-FLOAT 0.0)), not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0) ; (RATIONAL -2)) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- (* IRONCLAD::VL IRONCLAD::VL) 2) IRONCLAD::N) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0) ; (RATIONAL -2)), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0) ; (RATIONAL -2)), not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0) ; (RATIONAL -2)), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0) ; (RATIONAL -2)), not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (* IRONCLAD::UH IRONCLAD::VL) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a REAL, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (1- (* IRONCLAD::UH IRONCLAD::VL)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) . #1#). ; etc. ; (MOD (1- (* IRONCLAD::UH IRONCLAD::VL)) IRONCLAD::N) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (* IRONCLAD::VH IRONCLAD::VL) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a REAL, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P) ; ; note: forced to do full call ; 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 REAL . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT . #2#). ; 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 REAL . #2#), not a (VALUES SINGLE-FLOAT . #2#). ; etc. ; (MOD (- (* IRONCLAD::VH IRONCLAD::VL) IRONCLAD::P) IRONCLAD::N) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (DOTIMES (IRONCLAD::J IRONCLAD::S) ; (SETQ IRONCLAD::UH (MOD (* IRONCLAD::UH IRONCLAD::VL) IRONCLAD::N)) ; (SETQ IRONCLAD::VL (MOD (- # 2) IRONCLAD::N))) ; --> BLOCK LET TAGBODY UNLESS IF >= ; ==> ; 1 ; ; note: forced to do full call ; 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. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::UH IRONCLAD::VL) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a REAL, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::UH IRONCLAD::VL) IRONCLAD::N) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (* IRONCLAD::VL IRONCLAD::VL) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0) ; (SINGLE-FLOAT 0.0)) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; The second argument is a REAL, not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0) ; (SINGLE-FLOAT 0.0)) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- (* IRONCLAD::VL IRONCLAD::VL) 2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0) ; (SINGLE-FLOAT 0.0)), not a FIXNUM. ; The result is a (VALUES ; (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0) ; (RATIONAL -2)) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (RATIONAL 0) (DOUBLE-FLOAT 0.0d0) ; (SINGLE-FLOAT 0.0)), not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0) ; (RATIONAL -2)) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- (* IRONCLAD::VL IRONCLAD::VL) 2) IRONCLAD::N) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0) ; (RATIONAL -2)), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0) ; (RATIONAL -2)), not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0) ; (RATIONAL -2)), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (OR (SINGLE-FLOAT -2.0) (DOUBLE-FLOAT -2.0d0) ; (RATIONAL -2)), not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (DOTIMES (IRONCLAD::J IRONCLAD::S) ; (SETQ IRONCLAD::UH (MOD (* IRONCLAD::UH IRONCLAD::VL) IRONCLAD::N)) ; (SETQ IRONCLAD::VL (MOD (- # 2) IRONCLAD::N))) ; --> BLOCK LET TAGBODY PSETQ PROGN SETQ THE 1+ ; ==> ; 1 ; ; 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 (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (ASH IRONCLAD::K -1) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; 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) ; . #2#). ; etc. ; (1+ IRONCLAD::S) ; ; 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 (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; processing (DEFUN PRIMEP-LUCAS ...) ; file: /usr/share/common-lisp/source/ironclad/src/math.lisp ; in: DEFUN PRIMEP-LUCAS ; (1+ IRONCLAD::N) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (ZEROP (IRONCLAD::LUCAS-SEQUENCE (1+ IRONCLAD::N) IRONCLAD::B IRONCLAD::N)) ; ; 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. ; (* IRONCLAD::B IRONCLAD::B) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER 3), not a FIXNUM. ; The second argument is a (INTEGER 3), not a FIXNUM. ; The result is a (VALUES (INTEGER 9) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (INTEGER 3), not a (SIGNED-BYTE 64). ; The second argument is a (INTEGER 3), not a (SIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 9) . #1#), not a (VALUES ; (SIGNED-BYTE 64) . #1#). ; etc. ; (- (* IRONCLAD::B IRONCLAD::B) 4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER 9), not a FIXNUM. ; The result is a (VALUES (INTEGER 5) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER 9), not a (SIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 5) . #1#), not a (VALUES ; (SIGNED-BYTE 64) . #1#). ; etc. ; (1+ IRONCLAD::N) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (INCF IRONCLAD::B) ; --> THE ; ==> ; (+ 1 IRONCLAD::B) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER 3), not a FIXNUM. ; The result is a (VALUES (INTEGER 4) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER 3), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 4) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; processing (DEFUN MODULAR-INVERSE ...) ; file: /usr/share/common-lisp/source/ironclad/src/math.lisp ; in: DEFUN MODULAR-INVERSE ; (MINUSP IRONCLAD::INVERSE) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (MOD IRONCLAD::INVERSE IRONCLAD::MODULUS) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER * -1), not a FIXNUM. ; The second argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER * -1), not a (SIGNED-BYTE 64). ; The second argument is a (INTEGER 1), not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES ; (SIGNED-BYTE 64) ; . #1#). ; (* IRONCLAD::N IRONCLAD::INVERSE) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER 1), 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (INTEGER 1), not a (SIGNED-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) ; . #1#). ; etc. ; (FLOOR IRONCLAD::R1 IRONCLAD::R2) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a FIXNUM. ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a FIXNUM. ; The second argument is a (OR (INTEGER * -1) (INTEGER 1)), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (OR (INTEGER * -1) (INTEGER 1)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (* IRONCLAD::Q IRONCLAD::U2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (DECF IRONCLAD::U1 (* IRONCLAD::Q IRONCLAD::U2)) ; --> THE SB-IMPL::XSUBTRACT BLOCK ; ==> ; (- SB-IMPL::B SB-IMPL::A) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; processing (DEFUN MODULAR-INVERSE-WITH-BLINDING ...) ; file: /usr/share/common-lisp/source/ironclad/src/math.lisp ; in: DEFUN MODULAR-INVERSE-WITH-BLINDING ; (+ 1 (IRONCLAD:STRONG-RANDOM (- IRONCLAD::MODULUS 1))) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (GCD IRONCLAD::B IRONCLAD::MODULUS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a INTEGER, not a (OR (INTEGER -4611686018427387904 -1) ; (INTEGER 1 4611686018427387903)). ; The second argument is a (INTEGER 1), not a (OR ; (INTEGER -4611686018427387904 ; -1) ; (INTEGER 1 4611686018427387903)). ; (- IRONCLAD::MODULUS 1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER 1), not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES ; (SIGNED-BYTE 64) ; . #1#). ; etc. ; (+ 1 (IRONCLAD:STRONG-RANDOM (- IRONCLAD::MODULUS 1))) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (* IRONCLAD::N IRONCLAD::B) ; ; 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 INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a UNSIGNED-BYTE, 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::N IRONCLAD::B) IRONCLAD::MODULUS) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a FIXNUM. ; The second argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (INTEGER 1), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (* IRONCLAD::Y IRONCLAD::B) ; ; 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 INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a UNSIGNED-BYTE, 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Y IRONCLAD::B) IRONCLAD::MODULUS) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a FIXNUM. ; The second argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (INTEGER 1), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; processing (DEFUN EXPT-MOD ...) ; file: /usr/share/common-lisp/source/ironclad/src/math.lisp ; in: DEFUN EXPT-MOD ; (ASSERT (<= 0 IRONCLAD::EXPONENT IRONCLAD::MODULUS)) ; --> LET WHEN IF <= ; ==> ; 1 ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; etc. ; (ASSERT (> IRONCLAD::MODULUS 1)) ; --> LET WHEN IF ; ==> ; (> #:TEMP5 1) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (* IRONCLAD::R0 IRONCLAD::R1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::R0 IRONCLAD::R1) IRONCLAD::MODULUS) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER * -1), not a FIXNUM. ; The second argument is a (INTEGER 2), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER * -1), not a (SIGNED-BYTE 64). ; The second argument is a (INTEGER 2), not a (SIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; (* IRONCLAD::R1 IRONCLAD::R1) ; ; note: forced to do full call ; 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 UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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 UNSIGNED-BYTE . #1#), not a (VALUES ; (SIGNED-BYTE 64) ; . #1#). ; etc. ; (* IRONCLAD::R0 IRONCLAD::R1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::R0 IRONCLAD::R1) IRONCLAD::MODULUS) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER * -1), not a FIXNUM. ; The second argument is a (INTEGER 2), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER * -1), not a (SIGNED-BYTE 64). ; The second argument is a (INTEGER 2), not a (SIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; (* IRONCLAD::R0 IRONCLAD::R0) ; ; note: forced to do full call ; 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 UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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 UNSIGNED-BYTE . #1#), not a (VALUES ; (SIGNED-BYTE 64) ; . #1#). ; etc. ; 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/math.lisp ; in: DEFUN PRIME-P ; (LOOP IRONCLAD::REPEAT IRONCLAD:*NUMBER-OF-MILLER-RABIN-TESTS* ; IRONCLAD::ALWAYS (IRONCLAD::MILLER-RABIN-KERNEL IRONCLAD::N IRONCLAD::Q ; IRONCLAD::K)) ; --> LET CEILING ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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. ; (<= IRONCLAD::N IRONCLAD::+LAST-SMALL-PRIME+) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (LOOP IRONCLAD::REPEAT IRONCLAD:*NUMBER-OF-MILLER-RABIN-TESTS* ; IRONCLAD::ALWAYS (IRONCLAD::MILLER-RABIN-KERNEL IRONCLAD::N IRONCLAD::Q ; IRONCLAD::K)) ; --> LET CEILING ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; --> LET TAGBODY IF <= ; ==> ; 1 ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> LET TAGBODY IF DECF SETQ THE SB-IMPL::XSUBTRACT BLOCK ; ==> ; (- SB-IMPL::B SB-IMPL::A) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER 1), not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES ; (SIGNED-BYTE 64) ; . #1#). ; etc. ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/math-tmpESC43OCR.fasl ; compilation finished in 0:00:00.364 ; compiling file "/usr/share/common-lisp/source/ironclad/src/octet-stream.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/octet-stream-tmpWCAM54ZJ.fasl ; compilation finished in 0:00:00.252 ; compiling file "/usr/share/common-lisp/source/ironclad/src/aead/aead.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/aead/aead-tmpVTMW561L.fasl ; compilation finished in 0:00:00.016 ; compiling file "/usr/share/common-lisp/source/ironclad/src/kdf/kdf.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFUN LIST-ALL-KDFS ...) ; processing (DEFUN MAKE-KDF ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/kdf/kdf-tmpUNNGT9CF.fasl ; compilation finished in 0:00:00.048 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/public-key.lisp" (written 18 FEB 2022 01:39:10 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/public-key.lisp ; in: DEFUN OCTETS-TO-INTEGER ; (- IRONCLAD::END IRONCLAD::START) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (CEILING IRONCLAD::N-BITS 8) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; convert division by 2^k to shift ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; convert integer division to multiplication ; due to type uncertainty: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; ; note: unable to ; convert integer division to multiplication ; due to type uncertainty: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (MIN (CEILING IRONCLAD::N-BITS 8) IRONCLAD::SIZE) ; ; note: unable to open code because: The operands might not be the same type. ; (CEILING IRONCLAD::N-BITS 8) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (* 8 IRONCLAD::SIZE) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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. ; (- IRONCLAD::END IRONCLAD::N-BYTES) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (+ IRONCLAD::START IRONCLAD::N-BYTES) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (LDB (BYTE IRONCLAD::N-BITS 0) IRONCLAD::SUM) ; ; 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). ; (LOOP IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM IRONCLAD::START IRONCLAD::BELOW (+ ; IRONCLAD::START ; IRONCLAD::N-BYTES) ; IRONCLAD::FOR IRONCLAD::J IRONCLAD::FROM 0 IRONCLAD::BY ...) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY WHEN IF >= ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to open code because: The operands might not be the same type. ; (LOOP IRONCLAD::WITH ; IRONCLAD::SUM = 0 ; IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM (- IRONCLAD::END ; IRONCLAD::N-BYTES) IRONCLAD::BELOW ; IRONCLAD::END ; DO ...) ; --> LET LET TAGBODY WHEN IF >= ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to open code because: The operands might not be the same type. ; (- IRONCLAD::END IRONCLAD::START) ; ; note: forced to do full call ; unable to do #1=inline float arithmetic (cost 2) because: ; The first argument is a (NOT NULL), 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 ; . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (NOT NULL), 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 . #2#). ; etc. ; (* 8 IRONCLAD::SIZE) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (CEILING IRONCLAD::N-BITS 8) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MIN (CEILING IRONCLAD::N-BITS 8) IRONCLAD::SIZE) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (+ IRONCLAD::START IRONCLAD::N-BYTES) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (LOOP IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM IRONCLAD::START IRONCLAD::BELOW (+ ; IRONCLAD::START ; IRONCLAD::N-BYTES) ; IRONCLAD::FOR IRONCLAD::J IRONCLAD::FROM 0 IRONCLAD::BY ...) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY WHEN IF >= ; ==> ; 1 ; ; note: forced to do full call ; 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 full call ; 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. ; (ASH (AREF IRONCLAD::OCTET-VEC IRONCLAD::I) IRONCLAD::J) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 2) because: ; The second argument is a (OR #2=(INTEGER 0 0) (INTEGER 16 16) ; (INTEGER 32 32) (INTEGER 56) (INTEGER 48 48) ; (INTEGER 40 40) (INTEGER 24 24) ; (INTEGER 8 8)), not a (UNSIGNED-BYTE 62). ; The result is a (VALUES UNSIGNED-BYTE . #3=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #3#). ; unable to do #1# (cost 3) because: ; The second argument is a (OR #2# (INTEGER 16 16) (INTEGER 32 32) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 40 40) ; (INTEGER 24 24) (INTEGER 8 8)), not a (UNSIGNED-BYTE ; 62). ; The result is a (VALUES UNSIGNED-BYTE . #3#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #3#). ; etc. ; (LOOP IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM IRONCLAD::START IRONCLAD::BELOW (+ ; IRONCLAD::START ; IRONCLAD::N-BYTES) ; IRONCLAD::FOR IRONCLAD::J IRONCLAD::FROM 0 IRONCLAD::BY ...) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-3 (ASH (AREF IRONCLAD::OCTET-VEC IRONCLAD::I) IRONCLAD::J)) ; ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY WHEN IF >= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The second argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE ; ==> ; (+ IRONCLAD::J 8) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR #1=(INTEGER 0 0) (INTEGER 16 16) ; (INTEGER 32 32) (INTEGER 56) (INTEGER 48 48) ; (INTEGER 40 40) (INTEGER 24 24) (INTEGER 8 8)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 16 16) (INTEGER 32 32) (INTEGER 56) ; (INTEGER 48 48) (INTEGER 40 40) (INTEGER 24 24) ; (INTEGER 8 8)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR #1# (INTEGER 16 16) (INTEGER 32 32) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 40 40) ; (INTEGER 24 24) (INTEGER 8 8)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES ; (OR (INTEGER 16 16) (INTEGER 32 32) (INTEGER 56) ; (INTEGER 48 48) (INTEGER 40 40) (INTEGER 24 24) ; (INTEGER 8 8)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; (- IRONCLAD::END IRONCLAD::N-BYTES) ; ; note: forced to do full call ; 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 ; . #2#). ; 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 . #2#). ; etc. ; (LOOP IRONCLAD::WITH ; IRONCLAD::SUM = 0 ; IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM (- IRONCLAD::END ; IRONCLAD::N-BYTES) IRONCLAD::BELOW ; IRONCLAD::END ; DO ...) ; --> LET LET TAGBODY WHEN IF >= ; ==> ; 1 ; ; note: forced to do full call ; 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 full call ; 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. ; (ASH IRONCLAD::SUM 8) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; 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 . #2#). ; etc. ; (+ (ASH IRONCLAD::SUM 8) (AREF IRONCLAD::OCTET-VEC IRONCLAD::I)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; processing (DEFUN INTEGER-TO-OCTETS ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/public-key.lisp ; in: DEFUN INTEGER-TO-OCTETS ; (LDB (BYTE IRONCLAD::N-BITS 0) BIGNUM) ; ; 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). ; (LDB (BYTE 8 (* IRONCLAD::I 8)) BIGNUM) ; ; 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 second argument is a (INTEGER -4611686018427387840 0), not a (UNSIGNED-BYTE ; 62). ; The result is a (VALUES UNSIGNED-BYTE . #2=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #2#). ; unable to do #1# (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387840 0), not a (UNSIGNED-BYTE ; 62). ; The result is a (VALUES UNSIGNED-BYTE . #2#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #2#). ; etc. ; (LDB (BYTE 8 BYTE) BIGNUM) ; ; 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 second argument is a (OR (INTEGER -8 -8) (INTEGER -24 -24) ; (INTEGER -4611686018427387840 -48) ; (INTEGER -40 -40) (INTEGER -32 -32) ; (INTEGER -16 -16) #2=(INTEGER 0 0)), not a (UNSIGNED-BYTE ; 62). ; The result is a (VALUES UNSIGNED-BYTE . #3=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #3#). ; unable to do #1# (cost 3) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The second argument is a (OR (INTEGER -8 -8) (INTEGER -24 -24) ; (INTEGER -4611686018427387840 -48) ; (INTEGER -40 -40) (INTEGER -32 -32) ; (INTEGER -16 -16) #2#), not a (UNSIGNED-BYTE ; 62). ; The result is a (VALUES UNSIGNED-BYTE . #3#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #3#). ; etc. ; processing (DEFUN MAYBE-INTEGERIZE ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/public-key/public-key-tmp4L3W83SU.fasl ; compilation finished in 0:00:00.060 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/pkcs1.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/public-key/pkcs1-tmpGE7QNNEE.fasl ; compilation finished in 0:00:00.060 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/elliptic-curve.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/public-key/elliptic-curve-tmp9B0UZGT4.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/aes.lisp" (written 18 FEB 2022 01:39:10 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 (MACROLET (# # ...) ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/aes.lisp ; in: ; MACROLET ((MIX (RK A0 A1 A2 A3 SYM0 SYM1 SYM2 SYM3) ; `(LOGXOR (AREF ,A0 (FOURTH-BYTE ,SYM0)) ; (AREF ,A1 (THIRD-BYTE ,SYM1)) ; (AREF ,A2 (SECOND-BYTE ,SYM2)) ; (AREF ,A3 (FIRST-BYTE ,SYM3)) (RK-REF ,RK))) ; (MIX-S-INTO-T-ENCRYPTING (OFFSET) ; `(SETF T0 (MIX ,OFFSET TE0 TE1 TE2 TE3 S0 S1 S2 S3) ; T1 (MIX # TE0 TE1 TE2 TE3 S1 S2 S3 S0) ; T2 (MIX # TE0 TE1 TE2 TE3 S2 S3 S0 S1) ; T3 (MIX # TE0 TE1 TE2 TE3 S3 S0 S1 S2))) ; (MIX-T-INTO-S-ENCRYPTING (OFFSET) ; `(SETF S0 (MIX ,OFFSET TE0 TE1 TE2 TE3 T0 T1 T2 T3) ; S1 (MIX # TE0 TE1 TE2 TE3 T1 T2 T3 T0) ; S2 (MIX # TE0 TE1 TE2 TE3 T2 T3 T0 T1) ; S3 (MIX # TE0 TE1 TE2 TE3 T3 T0 T1 T2))) ; (MIX-S-INTO-T-DECRYPTING (OFFSET) ; `(SETF T0 (MIX ,OFFSET TD0 TD1 TD2 TD3 S0 S3 S2 S1) ; T1 (MIX # TD0 TD1 TD2 TD3 S1 S0 S3 S2) ; T2 (MIX # TD0 TD1 TD2 TD3 S2 S1 S0 S3) ; T3 (MIX # TD0 TD1 TD2 TD3 S3 S2 S1 S0))) ; (MIX-T-INTO-S-DECRYPTING (OFFSET) ; `(SETF S0 (MIX ,OFFSET TD0 TD1 TD2 TD3 T0 T3 T2 T1) ; S1 (MIX # TD0 TD1 TD2 TD3 T1 T0 T3 T2) ; S2 (MIX # TD0 TD1 TD2 TD3 T2 T1 T0 T3) ; S3 (MIX # TD0 TD1 TD2 TD3 T3 T2 T1 T0))) ; (RK-REF (X) `(AREF ROUND-KEYS (+ ,X ROUND-KEY-OFFSET)))) ; (MACROLET ((IRONCLAD::MIX ; (IRONCLAD::RK IRONCLAD::A0 IRONCLAD::A1 IRONCLAD::A2 ; IRONCLAD::A3 IRONCLAD::SYM0 IRONCLAD::SYM1 IRONCLAD::SYM2 ; IRONCLAD::SYM3) ; `(LOGXOR (AREF ,IRONCLAD::A0 #) (AREF ,IRONCLAD::A1 #) ; (AREF ,IRONCLAD::A2 #) (AREF ,IRONCLAD::A3 #) ; (IRONCLAD::RK-REF ,IRONCLAD::RK))) ; (IRONCLAD::MIX-S-INTO-T-ENCRYPTING (IRONCLAD::OFFSET) ; `(SETF IRONCLAD::T0 # ; IRONCLAD::T1 # ; IRONCLAD::T2 # ; IRONCLAD::T3 #)) ; (IRONCLAD::MIX-T-INTO-S-ENCRYPTING (IRONCLAD::OFFSET) ; `(SETF IRONCLAD::S0 # ; IRONCLAD::S1 # ; IRONCLAD::S2 # ; IRONCLAD::S3 #)) ; (IRONCLAD::MIX-S-INTO-T-DECRYPTING (IRONCLAD::OFFSET) ; `(SETF IRONCLAD::T0 # ; IRONCLAD::T1 # ; IRONCLAD::T2 # ; IRONCLAD::T3 #)) ; (IRONCLAD::MIX-T-INTO-S-DECRYPTING (IRONCLAD::OFFSET) ; `(SETF IRONCLAD::S0 # ; IRONCLAD::S1 # ; IRONCLAD::S2 # ; IRONCLAD::S3 #)) ; (IRONCLAD::RK-REF (IRONCLAD::X) ; `(AREF IRONCLAD::ROUND-KEYS ; (+ ,IRONCLAD::X IRONCLAD::ROUND-KEY-OFFSET)))) ; (IRONCLAD::DEFINE-BLOCK-ENCRYPTOR IRONCLAD:AES ; 16 ; (LET ((IRONCLAD::ROUND-KEYS #) (IRONCLAD::N-ROUNDS #)) ; (DECLARE (TYPE IRONCLAD::AES-ROUND-KEYS IRONCLAD::ROUND-KEYS)) ; (DECLARE (TYPE # IRONCLAD::N-ROUNDS)) ; (IF NIL ; NIL ; (IRONCLAD::WITH-WORDS # ; #)))) ; (IRONCLAD::DEFINE-BLOCK-DECRYPTOR IRONCLAD:AES ; 16 ; (LET ((IRONCLAD::ROUND-KEYS #) (IRONCLAD::N-ROUNDS #)) ; (DECLARE (TYPE IRONCLAD::AES-ROUND-KEYS IRONCLAD::ROUND-KEYS)) ; (DECLARE (TYPE # IRONCLAD::N-ROUNDS)) ; (IF NIL ; NIL ; (IRONCLAD::WITH-WORDS # ; #))))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/aes.lisp ; in: ; MACROLET ((MIX (RK A0 A1 A2 A3 SYM0 SYM1 SYM2 SYM3) ; `(LOGXOR (AREF ,A0 (FOURTH-BYTE ,SYM0)) ; (AREF ,A1 (THIRD-BYTE ,SYM1)) ; (AREF ,A2 (SECOND-BYTE ,SYM2)) ; (AREF ,A3 (FIRST-BYTE ,SYM3)) (RK-REF ,RK))) ; (MIX-S-INTO-T-ENCRYPTING (OFFSET) ; `(SETF T0 (MIX ,OFFSET TE0 TE1 TE2 TE3 S0 S1 S2 S3) ; T1 (MIX # TE0 TE1 TE2 TE3 S1 S2 S3 S0) ; T2 (MIX # TE0 TE1 TE2 TE3 S2 S3 S0 S1) ; T3 (MIX # TE0 TE1 TE2 TE3 S3 S0 S1 S2))) ; (MIX-T-INTO-S-ENCRYPTING (OFFSET) ; `(SETF S0 (MIX ,OFFSET TE0 TE1 TE2 TE3 T0 T1 T2 T3) ; S1 (MIX # TE0 TE1 TE2 TE3 T1 T2 T3 T0) ; S2 (MIX # TE0 TE1 TE2 TE3 T2 T3 T0 T1) ; S3 (MIX # TE0 TE1 TE2 TE3 T3 T0 T1 T2))) ; (MIX-S-INTO-T-DECRYPTING (OFFSET) ; `(SETF T0 (MIX ,OFFSET TD0 TD1 TD2 TD3 S0 S3 S2 S1) ; T1 (MIX # TD0 TD1 TD2 TD3 S1 S0 S3 S2) ; T2 (MIX # TD0 TD1 TD2 TD3 S2 S1 S0 S3) ; T3 (MIX # TD0 TD1 TD2 TD3 S3 S2 S1 S0))) ; (MIX-T-INTO-S-DECRYPTING (OFFSET) ; `(SETF S0 (MIX ,OFFSET TD0 TD1 TD2 TD3 T0 T3 T2 T1) ; S1 (MIX # TD0 TD1 TD2 TD3 T1 T0 T3 T2) ; S2 (MIX # TD0 TD1 TD2 TD3 T2 T1 T0 T3) ; S3 (MIX # TD0 TD1 TD2 TD3 T3 T2 T1 T0))) ; (RK-REF (X) `(AREF ROUND-KEYS (+ ,X ROUND-KEY-OFFSET)))) ; (MACROLET ((IRONCLAD::MIX ; (IRONCLAD::RK IRONCLAD::A0 IRONCLAD::A1 IRONCLAD::A2 ; IRONCLAD::A3 IRONCLAD::SYM0 IRONCLAD::SYM1 IRONCLAD::SYM2 ; IRONCLAD::SYM3) ; `(LOGXOR (AREF ,IRONCLAD::A0 #) (AREF ,IRONCLAD::A1 #) ; (AREF ,IRONCLAD::A2 #) (AREF ,IRONCLAD::A3 #) ; (IRONCLAD::RK-REF ,IRONCLAD::RK))) ; (IRONCLAD::MIX-S-INTO-T-ENCRYPTING (IRONCLAD::OFFSET) ; `(SETF IRONCLAD::T0 # ; IRONCLAD::T1 # ; IRONCLAD::T2 # ; IRONCLAD::T3 #)) ; (IRONCLAD::MIX-T-INTO-S-ENCRYPTING (IRONCLAD::OFFSET) ; `(SETF IRONCLAD::S0 # ; IRONCLAD::S1 # ; IRONCLAD::S2 # ; IRONCLAD::S3 #)) ; (IRONCLAD::MIX-S-INTO-T-DECRYPTING (IRONCLAD::OFFSET) ; `(SETF IRONCLAD::T0 # ; IRONCLAD::T1 # ; IRONCLAD::T2 # ; IRONCLAD::T3 #)) ; (IRONCLAD::MIX-T-INTO-S-DECRYPTING (IRONCLAD::OFFSET) ; `(SETF IRONCLAD::S0 # ; IRONCLAD::S1 # ; IRONCLAD::S2 # ; IRONCLAD::S3 #)) ; (IRONCLAD::RK-REF (IRONCLAD::X) ; `(AREF IRONCLAD::ROUND-KEYS ; (+ ,IRONCLAD::X IRONCLAD::ROUND-KEY-OFFSET)))) ; (IRONCLAD::DEFINE-BLOCK-ENCRYPTOR IRONCLAD:AES ; 16 ; (LET ((IRONCLAD::ROUND-KEYS #) (IRONCLAD::N-ROUNDS #)) ; (DECLARE (TYPE IRONCLAD::AES-ROUND-KEYS IRONCLAD::ROUND-KEYS)) ; (DECLARE (TYPE # IRONCLAD::N-ROUNDS)) ; (IF NIL ; NIL ; (IRONCLAD::WITH-WORDS # ; #)))) ; (IRONCLAD::DEFINE-BLOCK-DECRYPTOR IRONCLAD:AES ; 16 ; (LET ((IRONCLAD::ROUND-KEYS #) (IRONCLAD::N-ROUNDS #)) ; (DECLARE (TYPE IRONCLAD::AES-ROUND-KEYS IRONCLAD::ROUND-KEYS)) ; (DECLARE (TYPE # IRONCLAD::N-ROUNDS)) ; (IF NIL ; NIL ; (IRONCLAD::WITH-WORDS # ; #))))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; processing (DEFMETHOD SCHEDULE-KEY ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/aes.lisp ; in: DEFMETHOD SCHEDULE-KEY (AES T) ; (LET ((IRONCLAD::ENCRYPTION-KEYS ; (IRONCLAD::ALLOCATE-ROUND-KEYS IRONCLAD::KEY)) ; (IRONCLAD::DECRYPTION-KEYS ; (IRONCLAD::ALLOCATE-ROUND-KEYS IRONCLAD::KEY)) ; (IRONCLAD::N-ROUNDS ; (ECASE (LENGTH IRONCLAD::KEY) (16 10) (24 12) (32 14)))) ; (DECLARE ; (TYPE IRONCLAD::AES-ROUND-KEYS IRONCLAD::ENCRYPTION-KEYS ; IRONCLAD::DECRYPTION-KEYS)) ; (SETF (IRONCLAD::ENCRYPTION-ROUND-KEYS IRONCLAD::CIPHER) ; IRONCLAD::ENCRYPTION-KEYS ; (IRONCLAD::DECRYPTION-ROUND-KEYS IRONCLAD::CIPHER) ; IRONCLAD::DECRYPTION-KEYS ; (IRONCLAD::N-ROUNDS IRONCLAD::CIPHER) IRONCLAD::N-ROUNDS) ; IRONCLAD::CIPHER) ; ; note: deleting unreachable code ; ; note: deleting unreachable code ; processing (DEFCIPHER AES ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/aes-tmpAJ5U325P.fasl ; compilation finished in 0:00:00.760 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/arcfour.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/arcfour-tmpAOF1CYAS.fasl ; compilation finished in 0:00:00.020 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/aria.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/aria-tmpIXCQTSHA.fasl ; compilation finished in 0:00:00.604 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/blowfish.lisp" (written 18 FEB 2022 01:39:10 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL) ...) ; processing (DEFCLASS BLOWFISH ...) ; processing (MACROLET (# # ...) ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/blowfish.lisp ; in: ; MACROLET ((S-BOX (S-BOXES WHICH INDEX) ; `(AREF ,S-BOXES (+ (* 256 ,WHICH) ,INDEX))) ; (S-BOX-0 (S-BOXES INDEX) `(S-BOX ,S-BOXES 0 ,INDEX)) ; (S-BOX-1 (S-BOXES INDEX) `(S-BOX ,S-BOXES 1 ,INDEX)) ; (S-BOX-2 (S-BOXES INDEX) `(S-BOX ,S-BOXES 2 ,INDEX)) ; (S-BOX-3 (S-BOXES INDEX) `(S-BOX ,S-BOXES 3 ,INDEX))) ; (MACROLET ((IRONCLAD::S-BOX ; (IRONCLAD::S-BOXES IRONCLAD::WHICH IRONCLAD::INDEX) ; `(AREF ,IRONCLAD::S-BOXES (+ # ,IRONCLAD::INDEX))) ; (IRONCLAD::S-BOX-0 (IRONCLAD::S-BOXES IRONCLAD::INDEX) ; `(IRONCLAD::S-BOX ,IRONCLAD::S-BOXES 0 ,IRONCLAD::INDEX)) ; (IRONCLAD::S-BOX-1 (IRONCLAD::S-BOXES IRONCLAD::INDEX) ; `(IRONCLAD::S-BOX ,IRONCLAD::S-BOXES 1 ,IRONCLAD::INDEX)) ; (IRONCLAD::S-BOX-2 (IRONCLAD::S-BOXES IRONCLAD::INDEX) ; `(IRONCLAD::S-BOX ,IRONCLAD::S-BOXES 2 ,IRONCLAD::INDEX)) ; (IRONCLAD::S-BOX-3 (IRONCLAD::S-BOXES IRONCLAD::INDEX) ; `(IRONCLAD::S-BOX ,IRONCLAD::S-BOXES 3 ,IRONCLAD::INDEX))) ; (DECLAIM (INLINE IRONCLAD::BLOWFISH-F)) ; (DEFUN IRONCLAD::BLOWFISH-F (BLOCK IRONCLAD::S-BOXES) ; (DECLARE (TYPE (UNSIGNED-BYTE 32) BLOCK)) ; (DECLARE (TYPE IRONCLAD::BLOWFISH-S-BOXES IRONCLAD::S-BOXES)) ; (IRONCLAD::MOD32+ ; (IRONCLAD::S-BOX-3 IRONCLAD::S-BOXES (IRONCLAD::FIRST-BYTE BLOCK)) ; (LOGXOR (IRONCLAD::S-BOX-2 IRONCLAD::S-BOXES #) ; (IRONCLAD::MOD32+ # #)))) ; (DECLAIM (INLINE IRONCLAD::BLOWFISH-ENCRYPT-BLOCK*)) ; (DEFUN IRONCLAD::BLOWFISH-ENCRYPT-BLOCK* ; (IRONCLAD::P-ARRAY IRONCLAD::S-BOXES IRONCLAD::PLAINTEXT ; IRONCLAD::PLAINTEXT-START IRONCLAD::CIPHERTEXT ; IRONCLAD::CIPHERTEXT-START) ; (DECLARE ; (TYPE (SIMPLE-ARRAY # #) IRONCLAD::PLAINTEXT IRONCLAD::CIPHERTEXT)) ; (DECLARE ; (TYPE (INTEGER 0 4611686018427387893) IRONCLAD::PLAINTEXT-START ; IRONCLAD::CIPHERTEXT-START)) ; (DECLARE (TYPE IRONCLAD::BLOWFISH-P-ARRAY IRONCLAD::P-ARRAY)) ; (DECLARE (TYPE IRONCLAD::BLOWFISH-S-BOXES IRONCLAD::S-BOXES)) ; (IRONCLAD::WITH-WORDS ((IRONCLAD::LEFT IRONCLAD::RIGHT) ; IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START) ; (PROGN ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; ...) ; (SETF IRONCLAD::LEFT # ; IRONCLAD::RIGHT #) ; (IRONCLAD::STORE-WORDS IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START ; IRONCLAD::RIGHT IRONCLAD::LEFT))) ; (DEFUN IRONCLAD::INITIALIZE-BLOWFISH-VECTORS ; (IRONCLAD::KEY IRONCLAD::P-ARRAY IRONCLAD::S-BOXES) ; (DECLARE (TYPE (SIMPLE-ARRAY # #) IRONCLAD::KEY)) ; (DECLARE (TYPE IRONCLAD::BLOWFISH-P-ARRAY IRONCLAD::P-ARRAY)) ; (DECLARE (TYPE IRONCLAD::BLOWFISH-S-BOXES IRONCLAD::S-BOXES)) ; (IRONCLAD::MIX-P-ARRAY IRONCLAD::KEY IRONCLAD::P-ARRAY) ; (LET ((IRONCLAD::DATA #)) ; (DECLARE (TYPE # IRONCLAD::DATA)) ; (DO (#) ; (#) ; (IRONCLAD::BLOWFISH-ENCRYPT-BLOCK* IRONCLAD::P-ARRAY ; IRONCLAD::S-BOXES IRONCLAD::DATA 0 IRONCLAD::DATA 0) ; (SETF #)) ; (DOTIMES (IRONCLAD::I 4) (DO # # # #)))) ; (DECLAIM (NOTINLINE IRONCLAD::BLOWFISH-ENCRYPT-BLOCK*)) ; (IRONCLAD::DEFINE-BLOCK-ENCRYPTOR IRONCLAD:BLOWFISH ; 8 ; (DECLARE (INLINE IRONCLAD::BLOWFISH-ENCRYPT-BLOCK*)) ; (IRONCLAD::BLOWFISH-ENCRYPT-BLOCK* (IRONCLAD::P-ARRAY IRONCLAD::CONTEXT) ; (IRONCLAD::S-BOXES IRONCLAD::CONTEXT) IRONCLAD::PLAINTEXT ; IRONCLAD::PLAINTEXT-START IRONCLAD::CIPHERTEXT ; IRONCLAD::CIPHERTEXT-START)) ; (DECLAIM (INLINE IRONCLAD::BLOWFISH-DECRYPT-BLOCK*)) ; (DEFUN IRONCLAD::BLOWFISH-DECRYPT-BLOCK* ; (IRONCLAD::P-ARRAY IRONCLAD::S-BOXES IRONCLAD::CIPHERTEXT ; IRONCLAD::CIPHERTEXT-START IRONCLAD::PLAINTEXT ; IRONCLAD::PLAINTEXT-START) ; (DECLARE ; (TYPE (SIMPLE-ARRAY # #) IRONCLAD::PLAINTEXT IRONCLAD::CIPHERTEXT)) ; (DECLARE ; (TYPE (INTEGER 0 4611686018427387893) IRONCLAD::CIPHERTEXT-START ; IRONCLAD::PLAINTEXT-START)) ; (DECLARE (TYPE IRONCLAD::BLOWFISH-P-ARRAY IRONCLAD::P-ARRAY)) ; (DECLARE (TYPE IRONCLAD::BLOWFISH-S-BOXES IRONCLAD::S-BOXES)) ; (IRONCLAD::WITH-WORDS ((IRONCLAD::LEFT IRONCLAD::RIGHT) ; IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START) ; (PROGN ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; ...) ; (SETF IRONCLAD::LEFT # ; IRONCLAD::RIGHT #) ; (IRONCLAD::STORE-WORDS IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START ; IRONCLAD::RIGHT IRONCLAD::LEFT))) ; (DECLAIM (NOTINLINE IRONCLAD::BLOWFISH-DECRYPT-BLOCK*)) ; ...) ; --> SB-INT:NAMED-DS-BIND SB-INT:BINDING* LET* BLOCK BLOCK LET LET LET* ; --> TAGBODY SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/blowfish.lisp ; in: ; MACROLET ((S-BOX (S-BOXES WHICH INDEX) ; `(AREF ,S-BOXES (+ (* 256 ,WHICH) ,INDEX))) ; (S-BOX-0 (S-BOXES INDEX) `(S-BOX ,S-BOXES 0 ,INDEX)) ; (S-BOX-1 (S-BOXES INDEX) `(S-BOX ,S-BOXES 1 ,INDEX)) ; (S-BOX-2 (S-BOXES INDEX) `(S-BOX ,S-BOXES 2 ,INDEX)) ; (S-BOX-3 (S-BOXES INDEX) `(S-BOX ,S-BOXES 3 ,INDEX))) ; (MACROLET ((IRONCLAD::S-BOX ; (IRONCLAD::S-BOXES IRONCLAD::WHICH IRONCLAD::INDEX) ; `(AREF ,IRONCLAD::S-BOXES (+ # ,IRONCLAD::INDEX))) ; (IRONCLAD::S-BOX-0 (IRONCLAD::S-BOXES IRONCLAD::INDEX) ; `(IRONCLAD::S-BOX ,IRONCLAD::S-BOXES 0 ,IRONCLAD::INDEX)) ; (IRONCLAD::S-BOX-1 (IRONCLAD::S-BOXES IRONCLAD::INDEX) ; `(IRONCLAD::S-BOX ,IRONCLAD::S-BOXES 1 ,IRONCLAD::INDEX)) ; (IRONCLAD::S-BOX-2 (IRONCLAD::S-BOXES IRONCLAD::INDEX) ; `(IRONCLAD::S-BOX ,IRONCLAD::S-BOXES 2 ,IRONCLAD::INDEX)) ; (IRONCLAD::S-BOX-3 (IRONCLAD::S-BOXES IRONCLAD::INDEX) ; `(IRONCLAD::S-BOX ,IRONCLAD::S-BOXES 3 ,IRONCLAD::INDEX))) ; (DECLAIM (INLINE IRONCLAD::BLOWFISH-F)) ; (DEFUN IRONCLAD::BLOWFISH-F (BLOCK IRONCLAD::S-BOXES) ; (DECLARE (TYPE (UNSIGNED-BYTE 32) BLOCK)) ; (DECLARE (TYPE IRONCLAD::BLOWFISH-S-BOXES IRONCLAD::S-BOXES)) ; (IRONCLAD::MOD32+ ; (IRONCLAD::S-BOX-3 IRONCLAD::S-BOXES (IRONCLAD::FIRST-BYTE BLOCK)) ; (LOGXOR (IRONCLAD::S-BOX-2 IRONCLAD::S-BOXES #) ; (IRONCLAD::MOD32+ # #)))) ; (DECLAIM (INLINE IRONCLAD::BLOWFISH-ENCRYPT-BLOCK*)) ; (DEFUN IRONCLAD::BLOWFISH-ENCRYPT-BLOCK* ; (IRONCLAD::P-ARRAY IRONCLAD::S-BOXES IRONCLAD::PLAINTEXT ; IRONCLAD::PLAINTEXT-START IRONCLAD::CIPHERTEXT ; IRONCLAD::CIPHERTEXT-START) ; (DECLARE ; (TYPE (SIMPLE-ARRAY # #) IRONCLAD::PLAINTEXT IRONCLAD::CIPHERTEXT)) ; (DECLARE ; (TYPE (INTEGER 0 4611686018427387893) IRONCLAD::PLAINTEXT-START ; IRONCLAD::CIPHERTEXT-START)) ; (DECLARE (TYPE IRONCLAD::BLOWFISH-P-ARRAY IRONCLAD::P-ARRAY)) ; (DECLARE (TYPE IRONCLAD::BLOWFISH-S-BOXES IRONCLAD::S-BOXES)) ; (IRONCLAD::WITH-WORDS ((IRONCLAD::LEFT IRONCLAD::RIGHT) ; IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START) ; (PROGN ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; ...) ; (SETF IRONCLAD::LEFT # ; IRONCLAD::RIGHT #) ; (IRONCLAD::STORE-WORDS IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START ; IRONCLAD::RIGHT IRONCLAD::LEFT))) ; (DEFUN IRONCLAD::INITIALIZE-BLOWFISH-VECTORS ; (IRONCLAD::KEY IRONCLAD::P-ARRAY IRONCLAD::S-BOXES) ; (DECLARE (TYPE (SIMPLE-ARRAY # #) IRONCLAD::KEY)) ; (DECLARE (TYPE IRONCLAD::BLOWFISH-P-ARRAY IRONCLAD::P-ARRAY)) ; (DECLARE (TYPE IRONCLAD::BLOWFISH-S-BOXES IRONCLAD::S-BOXES)) ; (IRONCLAD::MIX-P-ARRAY IRONCLAD::KEY IRONCLAD::P-ARRAY) ; (LET ((IRONCLAD::DATA #)) ; (DECLARE (TYPE # IRONCLAD::DATA)) ; (DO (#) ; (#) ; (IRONCLAD::BLOWFISH-ENCRYPT-BLOCK* IRONCLAD::P-ARRAY ; IRONCLAD::S-BOXES IRONCLAD::DATA 0 IRONCLAD::DATA 0) ; (SETF #)) ; (DOTIMES (IRONCLAD::I 4) (DO # # # #)))) ; (DECLAIM (NOTINLINE IRONCLAD::BLOWFISH-ENCRYPT-BLOCK*)) ; (IRONCLAD::DEFINE-BLOCK-ENCRYPTOR IRONCLAD:BLOWFISH ; 8 ; (DECLARE (INLINE IRONCLAD::BLOWFISH-ENCRYPT-BLOCK*)) ; (IRONCLAD::BLOWFISH-ENCRYPT-BLOCK* (IRONCLAD::P-ARRAY IRONCLAD::CONTEXT) ; (IRONCLAD::S-BOXES IRONCLAD::CONTEXT) IRONCLAD::PLAINTEXT ; IRONCLAD::PLAINTEXT-START IRONCLAD::CIPHERTEXT ; IRONCLAD::CIPHERTEXT-START)) ; (DECLAIM (INLINE IRONCLAD::BLOWFISH-DECRYPT-BLOCK*)) ; (DEFUN IRONCLAD::BLOWFISH-DECRYPT-BLOCK* ; (IRONCLAD::P-ARRAY IRONCLAD::S-BOXES IRONCLAD::CIPHERTEXT ; IRONCLAD::CIPHERTEXT-START IRONCLAD::PLAINTEXT ; IRONCLAD::PLAINTEXT-START) ; (DECLARE ; (TYPE (SIMPLE-ARRAY # #) IRONCLAD::PLAINTEXT IRONCLAD::CIPHERTEXT)) ; (DECLARE ; (TYPE (INTEGER 0 4611686018427387893) IRONCLAD::CIPHERTEXT-START ; IRONCLAD::PLAINTEXT-START)) ; (DECLARE (TYPE IRONCLAD::BLOWFISH-P-ARRAY IRONCLAD::P-ARRAY)) ; (DECLARE (TYPE IRONCLAD::BLOWFISH-S-BOXES IRONCLAD::S-BOXES)) ; (IRONCLAD::WITH-WORDS ((IRONCLAD::LEFT IRONCLAD::RIGHT) ; IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START) ; (PROGN ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; (SETF #) ; ...) ; (SETF IRONCLAD::LEFT # ; IRONCLAD::RIGHT #) ; (IRONCLAD::STORE-WORDS IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START ; IRONCLAD::RIGHT IRONCLAD::LEFT))) ; (DECLAIM (NOTINLINE IRONCLAD::BLOWFISH-DECRYPT-BLOCK*)) ; ...) ; --> SB-INT:NAMED-DS-BIND SB-INT:BINDING* LET* BLOCK BLOCK LET LET LET* ; --> TAGBODY SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; processing (DEFCIPHER BLOWFISH ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/blowfish-tmp5E6VIEMS.fasl ; compilation finished in 0:00:00.952 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/camellia.lisp" (written 18 FEB 2022 01:39:10 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/camellia.lisp ; in: DEFMETHOD SCHEDULE-KEY (CAMELLIA T) ; (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 32)) ; ; note: could not stack allocate: (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 32)) ; processing (DEFINE-BLOCK-ENCRYPTOR CAMELLIA ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/camellia.lisp ; in: DEFINE-BLOCK-ENCRYPTOR CAMELLIA ; (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 32)) ; ; note: could not stack allocate: (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 32)) ; processing (DEFINE-BLOCK-DECRYPTOR CAMELLIA ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/camellia.lisp ; in: DEFINE-BLOCK-DECRYPTOR CAMELLIA ; (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 32)) ; ; note: could not stack allocate: (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 32)) ; processing (DEFCIPHER CAMELLIA ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/camellia-tmpI0PODGVV.fasl ; compilation finished in 0:00:00.468 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/cast5.lisp" (written 18 FEB 2022 01:39:10 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 (MACROLET (#) ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/cast5.lisp ; in: ; MACROLET ((CAST5-S-BOX (S-BOX-INDEX INDEX) ; `(AREF ,(INTERN (FORMAT NIL "+~A~A+" '#:CAST5-SBOX S-BOX-INDEX)) ; ,INDEX))) ; (MACROLET ((IRONCLAD::CAST5-S-BOX (IRONCLAD::S-BOX-INDEX IRONCLAD::INDEX) ; `(AREF ,(INTERN #) ,IRONCLAD::INDEX))) ; (DEFUN IRONCLAD::CAST5-F1 (IRONCLAD::INPUT IRONCLAD::MASK IRONCLAD::ROTATE) ; (DECLARE (TYPE (UNSIGNED-BYTE 32) IRONCLAD::INPUT IRONCLAD::MASK)) ; (DECLARE (TYPE (UNSIGNED-BYTE 5) IRONCLAD::ROTATE)) ; (LET ((IRONCLAD::VALUE #)) ; (DECLARE (TYPE # IRONCLAD::VALUE)) ; (IRONCLAD::MOD32+ (IRONCLAD::CAST5-S-BOX 3 #) (IRONCLAD::MOD32- # #)))) ; (DEFUN IRONCLAD::CAST5-F2 (IRONCLAD::INPUT IRONCLAD::MASK IRONCLAD::ROTATE) ; (DECLARE (TYPE (UNSIGNED-BYTE 32) IRONCLAD::INPUT IRONCLAD::MASK)) ; (DECLARE (TYPE (UNSIGNED-BYTE 5) IRONCLAD::ROTATE)) ; (LET ((IRONCLAD::VALUE #)) ; (DECLARE (TYPE # IRONCLAD::VALUE)) ; (LOGXOR (IRONCLAD::CAST5-S-BOX 3 #) (IRONCLAD::MOD32+ # #)))) ; (DEFUN IRONCLAD::CAST5-F3 (IRONCLAD::INPUT IRONCLAD::MASK IRONCLAD::ROTATE) ; (DECLARE (TYPE (UNSIGNED-BYTE 32) IRONCLAD::INPUT IRONCLAD::MASK)) ; (DECLARE (TYPE (UNSIGNED-BYTE 5) IRONCLAD::ROTATE)) ; (LET ((IRONCLAD::VALUE #)) ; (DECLARE (TYPE # IRONCLAD::VALUE)) ; (IRONCLAD::MOD32- (LOGXOR # #) (IRONCLAD::CAST5-S-BOX 3 #)))) ; (IRONCLAD::DEFINE-BLOCK-ENCRYPTOR IRONCLAD:CAST5 ; 8 ; (LET ((IRONCLAD::MASK-VECTOR #) ; (IRONCLAD::ROTATE-VECTOR #) ; (IRONCLAD::N-ROUNDS #)) ; (DECLARE (TYPE IRONCLAD::CAST5-MASK-VECTOR IRONCLAD::MASK-VECTOR)) ; (DECLARE (TYPE IRONCLAD::CAST5-ROTATE-VECTOR IRONCLAD::ROTATE-VECTOR)) ; (DECLARE (TYPE # IRONCLAD::N-ROUNDS)) ; (IRONCLAD::WITH-WORDS (# IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START) ; (PROGN # # # # # # # # # # # ...) ; (IRONCLAD::STORE-WORDS IRONCLAD::CIPHERTEXT ; IRONCLAD::CIPHERTEXT-START IRONCLAD::R0 IRONCLAD::L0)))) ; (IRONCLAD::DEFINE-BLOCK-DECRYPTOR IRONCLAD:CAST5 ; 8 ; (LET ((IRONCLAD::MASK-VECTOR #) ; (IRONCLAD::ROTATE-VECTOR #) ; (IRONCLAD::N-ROUNDS #)) ; (DECLARE (TYPE IRONCLAD::CAST5-MASK-VECTOR IRONCLAD::MASK-VECTOR)) ; (DECLARE (TYPE IRONCLAD::CAST5-ROTATE-VECTOR IRONCLAD::ROTATE-VECTOR)) ; (DECLARE (TYPE # IRONCLAD::N-ROUNDS)) ; (IRONCLAD::WITH-WORDS (# IRONCLAD::CIPHERTEXT ; IRONCLAD::CIPHERTEXT-START) ; (PROGN # # # # # # # # # # # ...) ; (IRONCLAD::STORE-WORDS IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START ; IRONCLAD::R0 IRONCLAD::L0))))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/cast5.lisp ; in: ; MACROLET ((CAST5-S-BOX (S-BOX-INDEX INDEX) ; `(AREF ,(INTERN (FORMAT NIL "+~A~A+" '#:CAST5-SBOX S-BOX-INDEX)) ; ,INDEX))) ; (MACROLET ((IRONCLAD::CAST5-S-BOX (IRONCLAD::S-BOX-INDEX IRONCLAD::INDEX) ; `(AREF ,(INTERN #) ,IRONCLAD::INDEX))) ; (DEFUN IRONCLAD::CAST5-F1 (IRONCLAD::INPUT IRONCLAD::MASK IRONCLAD::ROTATE) ; (DECLARE (TYPE (UNSIGNED-BYTE 32) IRONCLAD::INPUT IRONCLAD::MASK)) ; (DECLARE (TYPE (UNSIGNED-BYTE 5) IRONCLAD::ROTATE)) ; (LET ((IRONCLAD::VALUE #)) ; (DECLARE (TYPE # IRONCLAD::VALUE)) ; (IRONCLAD::MOD32+ (IRONCLAD::CAST5-S-BOX 3 #) (IRONCLAD::MOD32- # #)))) ; (DEFUN IRONCLAD::CAST5-F2 (IRONCLAD::INPUT IRONCLAD::MASK IRONCLAD::ROTATE) ; (DECLARE (TYPE (UNSIGNED-BYTE 32) IRONCLAD::INPUT IRONCLAD::MASK)) ; (DECLARE (TYPE (UNSIGNED-BYTE 5) IRONCLAD::ROTATE)) ; (LET ((IRONCLAD::VALUE #)) ; (DECLARE (TYPE # IRONCLAD::VALUE)) ; (LOGXOR (IRONCLAD::CAST5-S-BOX 3 #) (IRONCLAD::MOD32+ # #)))) ; (DEFUN IRONCLAD::CAST5-F3 (IRONCLAD::INPUT IRONCLAD::MASK IRONCLAD::ROTATE) ; (DECLARE (TYPE (UNSIGNED-BYTE 32) IRONCLAD::INPUT IRONCLAD::MASK)) ; (DECLARE (TYPE (UNSIGNED-BYTE 5) IRONCLAD::ROTATE)) ; (LET ((IRONCLAD::VALUE #)) ; (DECLARE (TYPE # IRONCLAD::VALUE)) ; (IRONCLAD::MOD32- (LOGXOR # #) (IRONCLAD::CAST5-S-BOX 3 #)))) ; (IRONCLAD::DEFINE-BLOCK-ENCRYPTOR IRONCLAD:CAST5 ; 8 ; (LET ((IRONCLAD::MASK-VECTOR #) ; (IRONCLAD::ROTATE-VECTOR #) ; (IRONCLAD::N-ROUNDS #)) ; (DECLARE (TYPE IRONCLAD::CAST5-MASK-VECTOR IRONCLAD::MASK-VECTOR)) ; (DECLARE (TYPE IRONCLAD::CAST5-ROTATE-VECTOR IRONCLAD::ROTATE-VECTOR)) ; (DECLARE (TYPE # IRONCLAD::N-ROUNDS)) ; (IRONCLAD::WITH-WORDS (# IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START) ; (PROGN # # # # # # # # # # # ...) ; (IRONCLAD::STORE-WORDS IRONCLAD::CIPHERTEXT ; IRONCLAD::CIPHERTEXT-START IRONCLAD::R0 IRONCLAD::L0)))) ; (IRONCLAD::DEFINE-BLOCK-DECRYPTOR IRONCLAD:CAST5 ; 8 ; (LET ((IRONCLAD::MASK-VECTOR #) ; (IRONCLAD::ROTATE-VECTOR #) ; (IRONCLAD::N-ROUNDS #)) ; (DECLARE (TYPE IRONCLAD::CAST5-MASK-VECTOR IRONCLAD::MASK-VECTOR)) ; (DECLARE (TYPE IRONCLAD::CAST5-ROTATE-VECTOR IRONCLAD::ROTATE-VECTOR)) ; (DECLARE (TYPE # IRONCLAD::N-ROUNDS)) ; (IRONCLAD::WITH-WORDS (# IRONCLAD::CIPHERTEXT ; IRONCLAD::CIPHERTEXT-START) ; (PROGN # # # # # # # # # # # ...) ; (IRONCLAD::STORE-WORDS IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START ; IRONCLAD::R0 IRONCLAD::L0))))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; processing (DEFUN GENERATE-CAST5-KEY-SCHEDULE ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFCIPHER CAST5 ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/cast5-tmp1Z95I17K.fasl ; compilation finished in 0:00:00.544 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/chacha.lisp" (written 18 FEB 2022 01:39:10 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/chacha.lisp ; in: DEFUN CHACHA-CORE ; (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 32)) ; ; note: could not stack allocate: (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 32)) ; (DOTIMES (IRONCLAD::I IRONCLAD::N-ROUNDS) ; (IRONCLAD::QUARTER-ROUND 0 4 8 12) ; (IRONCLAD::QUARTER-ROUND 1 5 9 13) ; (IRONCLAD::QUARTER-ROUND 2 6 10 14) ; (IRONCLAD::QUARTER-ROUND 3 7 11 15) ; (IRONCLAD::QUARTER-ROUND 0 5 10 15) ; (IRONCLAD::QUARTER-ROUND 1 6 11 12) ; (IRONCLAD::QUARTER-ROUND 2 7 8 13) ; (IRONCLAD::QUARTER-ROUND 3 4 9 14)) ; --> BLOCK LET TAGBODY UNLESS IF >= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; etc. ; --> BLOCK LET TAGBODY PSETQ PROGN SETQ THE 1+ ; ==> ; 1 ; ; 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 (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; processing (DEFUN CHACHA/8-CORE ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/chacha.lisp ; in: DEFUN CHACHA/8-CORE ; (IRONCLAD::CHACHA-CORE 4 IRONCLAD::BUFFER IRONCLAD::STATE) ; --> BLOCK LET MAKE-ARRAY ; ==> ; 1 ; ; note: could not stack allocate: (CHACHA-CORE 4 BUFFER STATE) ; processing (DEFUN CHACHA/12-CORE ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/chacha.lisp ; in: DEFUN CHACHA/12-CORE ; (IRONCLAD::CHACHA-CORE 6 IRONCLAD::BUFFER IRONCLAD::STATE) ; --> BLOCK LET MAKE-ARRAY ; ==> ; 1 ; ; note: could not stack allocate: (CHACHA-CORE 6 BUFFER STATE) ; processing (DEFUN CHACHA/20-CORE ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/chacha.lisp ; in: DEFUN CHACHA/20-CORE ; (IRONCLAD::CHACHA-CORE 10 IRONCLAD::BUFFER IRONCLAD::STATE) ; --> BLOCK LET MAKE-ARRAY ; ==> ; 1 ; ; note: could not stack allocate: (CHACHA-CORE 10 BUFFER STATE) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/chacha-tmpCFVK1AC1.fasl ; compilation finished in 0:00:00.536 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/xchacha.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/xchacha-tmpHHRR8E8N.fasl ; compilation finished in 0:00:00.040 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/des.lisp" (written 18 FEB 2022 01:39:10 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 (MACROLET (# # ...) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/des-tmpWWJ02E3I.fasl ; compilation finished in 0:00:00.264 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/idea.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/idea-tmpONTOHUJ2.fasl ; compilation finished in 0:00:00.200 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp ; in: DEFMETHOD SCHEDULE-KEY (KALYNA128 T) ; (MAKE-ARRAY 2 :ELEMENT-TYPE '(UNSIGNED-BYTE 64) :INITIAL-CONTENTS ; (LIST (IRONCLAD:UB64REF/LE IRONCLAD::KEY 0) ; (IRONCLAD:UB64REF/LE IRONCLAD::KEY 8))) ; ; note: could not stack allocate: ; (MAKE-ARRAY 2 :ELEMENT-TYPE '(UNSIGNED-BYTE 64) :INITIAL-CONTENTS ; (LIST (UB64REF/LE KEY 0) (UB64REF/LE KEY 8))) ; (MAKE-ARRAY 2 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 2 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 2 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 2 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 2 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 2 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 2 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 64) :INITIAL-CONTENTS ; (LIST (IRONCLAD:UB64REF/LE IRONCLAD::KEY 0) ; (IRONCLAD:UB64REF/LE IRONCLAD::KEY 8) ; (IRONCLAD:UB64REF/LE IRONCLAD::KEY 16) ; (IRONCLAD:UB64REF/LE IRONCLAD::KEY 24))) ; ; note: could not stack allocate: ; (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 64) :INITIAL-CONTENTS ; (LIST (UB64REF/LE KEY 0) (UB64REF/LE KEY 8) ; (UB64REF/LE KEY 16) (UB64REF/LE KEY 24))) ; (MAKE-ARRAY 2 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 2 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 2 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 2 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 2 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; (MAKE-ARRAY 2 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 2 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 2 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; processing (DEFINE-BLOCK-ENCRYPTOR KALYNA128 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp ; in: DEFINE-BLOCK-ENCRYPTOR KALYNA128 ; (MAKE-ARRAY 2 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 2 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 2 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; processing (DEFINE-BLOCK-DECRYPTOR KALYNA128 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp ; in: DEFINE-BLOCK-DECRYPTOR KALYNA128 ; (MAKE-ARRAY 2 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 2 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 2 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp ; in: DEFMETHOD SCHEDULE-KEY (KALYNA256 T) ; (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 64) :INITIAL-CONTENTS ; (LIST (IRONCLAD:UB64REF/LE IRONCLAD::KEY 0) ; (IRONCLAD:UB64REF/LE IRONCLAD::KEY 8) ; (IRONCLAD:UB64REF/LE IRONCLAD::KEY 16) ; (IRONCLAD:UB64REF/LE IRONCLAD::KEY 24))) ; ; note: could not stack allocate: ; (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 64) :INITIAL-CONTENTS ; (LIST (UB64REF/LE KEY 0) (UB64REF/LE KEY 8) ; (UB64REF/LE KEY 16) (UB64REF/LE KEY 24))) ; (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64) :INITIAL-CONTENTS ; (LIST (IRONCLAD:UB64REF/LE IRONCLAD::KEY 0) ; (IRONCLAD:UB64REF/LE IRONCLAD::KEY 8) ; (IRONCLAD:UB64REF/LE IRONCLAD::KEY 16) ; (IRONCLAD:UB64REF/LE IRONCLAD::KEY 24) ; (IRONCLAD:UB64REF/LE IRONCLAD::KEY 32) ; (IRONCLAD:UB64REF/LE IRONCLAD::KEY 40) ; (IRONCLAD:UB64REF/LE IRONCLAD::KEY 48) ; (IRONCLAD:UB64REF/LE IRONCLAD::KEY 56))) ; ; note: could not stack allocate: ; (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64) :INITIAL-CONTENTS ; (LIST (UB64REF/LE KEY 0) (UB64REF/LE KEY 8) ; (UB64REF/LE KEY 16) (UB64REF/LE KEY 24) ; (UB64REF/LE KEY 32) (UB64REF/LE KEY 40) ; (UB64REF/LE KEY 48) (UB64REF/LE KEY 56))) ; (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; processing (DEFINE-BLOCK-ENCRYPTOR KALYNA256 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp ; in: DEFINE-BLOCK-ENCRYPTOR KALYNA256 ; (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; processing (DEFINE-BLOCK-DECRYPTOR KALYNA256 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp ; in: DEFINE-BLOCK-DECRYPTOR KALYNA256 ; (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp ; in: DEFMETHOD SCHEDULE-KEY (KALYNA512 T) ; (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64) :INITIAL-CONTENTS ; (LIST (IRONCLAD:UB64REF/LE IRONCLAD::KEY 0) ; (IRONCLAD:UB64REF/LE IRONCLAD::KEY 8) ; (IRONCLAD:UB64REF/LE IRONCLAD::KEY 16) ; (IRONCLAD:UB64REF/LE IRONCLAD::KEY 24) ; (IRONCLAD:UB64REF/LE IRONCLAD::KEY 32) ; (IRONCLAD:UB64REF/LE IRONCLAD::KEY 40) ; (IRONCLAD:UB64REF/LE IRONCLAD::KEY 48) ; (IRONCLAD:UB64REF/LE IRONCLAD::KEY 56))) ; ; note: could not stack allocate: ; (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64) :INITIAL-CONTENTS ; (LIST (UB64REF/LE KEY 0) (UB64REF/LE KEY 8) ; (UB64REF/LE KEY 16) (UB64REF/LE KEY 24) ; (UB64REF/LE KEY 32) (UB64REF/LE KEY 40) ; (UB64REF/LE KEY 48) (UB64REF/LE KEY 56))) ; (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; processing (DEFINE-BLOCK-ENCRYPTOR KALYNA512 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp ; in: DEFINE-BLOCK-ENCRYPTOR KALYNA512 ; (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; processing (DEFINE-BLOCK-DECRYPTOR KALYNA512 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp ; in: DEFINE-BLOCK-DECRYPTOR KALYNA512 ; (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; processing (DEFCIPHER KALYNA512 ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/kalyna-tmpQT9APWMH.fasl ; compilation finished in 0:00:13.912 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/salsa20.lisp" (written 18 FEB 2022 01:39:10 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/salsa20.lisp ; in: DEFUN SALSA-CORE ; (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 32)) ; ; note: could not stack allocate: (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 32)) ; (DOTIMES (IRONCLAD::I IRONCLAD::N-ROUNDS) ; (IRONCLAD::QUARTER-ROUND 4 8 12 0) ; (IRONCLAD::QUARTER-ROUND 9 13 1 5) ; (IRONCLAD::QUARTER-ROUND 14 2 6 10) ; (IRONCLAD::QUARTER-ROUND 3 7 11 15) ; (IRONCLAD::QUARTER-ROUND 1 2 3 0) ; (IRONCLAD::QUARTER-ROUND 6 7 4 5) ; (IRONCLAD::QUARTER-ROUND 11 8 9 10) ; (IRONCLAD::QUARTER-ROUND 12 13 14 15)) ; --> BLOCK LET TAGBODY UNLESS IF >= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; etc. ; --> BLOCK LET TAGBODY PSETQ PROGN SETQ THE 1+ ; ==> ; 1 ; ; 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 (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; processing (DEFUN SALSA20/8-CORE ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/salsa20.lisp ; in: DEFUN SALSA20/8-CORE ; (IRONCLAD::SALSA-CORE 4 IRONCLAD::BUFFER IRONCLAD::STATE) ; --> BLOCK LET MAKE-ARRAY ; ==> ; 1 ; ; note: could not stack allocate: (SALSA-CORE 4 BUFFER STATE) ; processing (DEFUN SALSA20/12-CORE ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/salsa20.lisp ; in: DEFUN SALSA20/12-CORE ; (IRONCLAD::SALSA-CORE 6 IRONCLAD::BUFFER IRONCLAD::STATE) ; --> BLOCK LET MAKE-ARRAY ; ==> ; 1 ; ; note: could not stack allocate: (SALSA-CORE 6 BUFFER STATE) ; processing (DEFUN SALSA20/20-CORE ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/salsa20.lisp ; in: DEFUN SALSA20/20-CORE ; (IRONCLAD::SALSA-CORE 10 IRONCLAD::BUFFER IRONCLAD::STATE) ; --> BLOCK LET MAKE-ARRAY ; ==> ; 1 ; ; note: could not stack allocate: (SALSA-CORE 10 BUFFER STATE) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/salsa20-tmp6LYQXY0L.fasl ; compilation finished in 0:00:00.684 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/keystream.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFUN KEYSTREAM-POSITION ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/keystream.lisp ; in: DEFUN KEYSTREAM-POSITION ; (MAKE-ARRAY 64 :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) ; ; note: could not stack allocate: (MAKE-ARRAY 64 :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) ; ; note: could not stack allocate: (MAKE-ARRAY 64 :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/keystream-tmpNKVDR0J1.fasl ; compilation finished in 0:00:00.016 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/kuznyechik.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (IN-IRONCLAD-READTABLE) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kuznyechik.lisp ; in: DEFINE-BLOCK-ENCRYPTOR KUZNYECHIK ; (IRONCLAD::DEFINE-BLOCK-ENCRYPTOR IRONCLAD:KUZNYECHIK ; 16 ; (LET ((IRONCLAD::RKE (IRONCLAD::KUZNYECHIK-RKE IRONCLAD::CONTEXT)) ; (IRONCLAD::T1 0) ; (IRONCLAD::T2 0)) ; (DECLARE (TYPE (SIMPLE-ARRAY # #) IRONCLAD::RKE) ; (TYPE (UNSIGNED-BYTE 64) IRONCLAD::T1 IRONCLAD::T2)) ; (IRONCLAD::WITH-WORDS ((IRONCLAD::X1 IRONCLAD::X2) IRONCLAD::PLAINTEXT ; IRONCLAD::PLAINTEXT-START :BIG-ENDIAN NIL :SIZE 8) ; (SETF IRONCLAD::X1 # ; IRONCLAD::X2 #) ; (IRONCLAD::KUZNYECHIK-LS IRONCLAD::X1 IRONCLAD::X2 IRONCLAD::T1 ; IRONCLAD::T2) ; (SETF IRONCLAD::T1 # ; IRONCLAD::T2 #) ; (IRONCLAD::KUZNYECHIK-LS IRONCLAD::T1 IRONCLAD::T2 IRONCLAD::X1 ; IRONCLAD::X2) ; (SETF IRONCLAD::X1 # ; IRONCLAD::X2 #) ; (IRONCLAD::KUZNYECHIK-LS IRONCLAD::X1 IRONCLAD::X2 IRONCLAD::T1 ; IRONCLAD::T2) ; (SETF IRONCLAD::T1 # ; IRONCLAD::T2 #) ; (IRONCLAD::KUZNYECHIK-LS IRONCLAD::T1 IRONCLAD::T2 IRONCLAD::X1 ; IRONCLAD::X2) ; (SETF IRONCLAD::X1 # ; IRONCLAD::X2 #) ; (IRONCLAD::KUZNYECHIK-LS IRONCLAD::X1 IRONCLAD::X2 IRONCLAD::T1 ; IRONCLAD::T2) ; ...)) ; (VALUES)) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 8) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; processing (DEFINE-BLOCK-DECRYPTOR KUZNYECHIK ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kuznyechik.lisp ; in: DEFINE-BLOCK-DECRYPTOR KUZNYECHIK ; (IRONCLAD::DEFINE-BLOCK-DECRYPTOR IRONCLAD:KUZNYECHIK ; 16 ; (LET ((IRONCLAD::RKD (IRONCLAD::KUZNYECHIK-RKD IRONCLAD::CONTEXT)) ; (IRONCLAD::T1 0) ; (IRONCLAD::T2 0)) ; (DECLARE (TYPE (SIMPLE-ARRAY # #) IRONCLAD::RKD) ; (TYPE (UNSIGNED-BYTE 64) IRONCLAD::T1 IRONCLAD::T2)) ; (IRONCLAD::WITH-WORDS ((IRONCLAD::X1 IRONCLAD::X2) IRONCLAD::CIPHERTEXT ; IRONCLAD::CIPHERTEXT-START :BIG-ENDIAN NIL :SIZE 8) ; (IRONCLAD::KUZNYECHIK-ILSS IRONCLAD::X1 IRONCLAD::X2 IRONCLAD::T1 ; IRONCLAD::T2) ; (SETF IRONCLAD::T1 # ; IRONCLAD::T2 #) ; (IRONCLAD::KUZNYECHIK-ILS IRONCLAD::T1 IRONCLAD::T2 IRONCLAD::X1 ; IRONCLAD::X2) ; (SETF IRONCLAD::X1 # ; IRONCLAD::X2 #) ; (IRONCLAD::KUZNYECHIK-ILS IRONCLAD::X1 IRONCLAD::X2 IRONCLAD::T1 ; IRONCLAD::T2) ; (SETF IRONCLAD::T1 # ; IRONCLAD::T2 #) ; (IRONCLAD::KUZNYECHIK-ILS IRONCLAD::T1 IRONCLAD::T2 IRONCLAD::X1 ; IRONCLAD::X2) ; (SETF IRONCLAD::X1 # ; IRONCLAD::X2 #) ; (IRONCLAD::KUZNYECHIK-ILS IRONCLAD::X1 IRONCLAD::X2 IRONCLAD::T1 ; IRONCLAD::T2) ; (SETF IRONCLAD::T1 # ; IRONCLAD::T2 #) ; ...)) ; (VALUES)) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 8) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; processing (DEFCIPHER KUZNYECHIK ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/kuznyechik-tmp6F83SDCV.fasl ; compilation finished in 0:00:02.904 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/misty1.lisp" (written 18 FEB 2022 01:39:10 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/misty1.lisp ; in: DEFINE-BLOCK-ENCRYPTOR MISTY1 ; (IRONCLAD::DEFINE-BLOCK-ENCRYPTOR IRONCLAD:MISTY1 ; 8 ; (LET ((IRONCLAD::ROUND-KEYS (IRONCLAD::ROUND-KEYS IRONCLAD::CONTEXT))) ; (IRONCLAD::WITH-WORDS ((IRONCLAD::D00 IRONCLAD::D01 IRONCLAD::D10 ; IRONCLAD::D11) ; IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START ; :SIZE 2) ; (PROGN ; (PROGN # # #) ; (MULTIPLE-VALUE-BIND # # # #) ; (PROGN # # #) ; (MULTIPLE-VALUE-BIND # # # #) ; (PROGN # # #) ; (MULTIPLE-VALUE-BIND # # # #) ; (PROGN # # #) ; (MULTIPLE-VALUE-BIND # # # #) ; (MULTIPLE-VALUE-SETQ # #) ; (MULTIPLE-VALUE-SETQ # #)) ; (IRONCLAD::STORE-WORDS IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START ; IRONCLAD::D10 IRONCLAD::D11 IRONCLAD::D00 IRONCLAD::D01)))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 2 2) (INTEGER 6 6) (INTEGER 10 10) ; (INTEGER 14) (INTEGER 12 12) (INTEGER 8 8) ; (INTEGER 4 4) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 2 2) (INTEGER 6 6) (INTEGER 10 10) ; (INTEGER 14) (INTEGER 12 12) (INTEGER 8 8) ; (INTEGER 4 4)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 2 2) (INTEGER 6 6) (INTEGER 10 10) ; (INTEGER 14) (INTEGER 12 12) (INTEGER 8 8) ; (INTEGER 4 4) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 2 2) (INTEGER 6 6) (INTEGER 10 10) ; (INTEGER 14) (INTEGER 12 12) (INTEGER 8 8) ; (INTEGER 4 4)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; processing (DEFINE-BLOCK-DECRYPTOR MISTY1 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/misty1.lisp ; in: DEFINE-BLOCK-DECRYPTOR MISTY1 ; (IRONCLAD::DEFINE-BLOCK-DECRYPTOR IRONCLAD:MISTY1 ; 8 ; (LET ((IRONCLAD::ROUND-KEYS (IRONCLAD::ROUND-KEYS IRONCLAD::CONTEXT))) ; (IRONCLAD::WITH-WORDS ((IRONCLAD::D10 IRONCLAD::D11 IRONCLAD::D00 ; IRONCLAD::D01) ; IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START ; :SIZE 2) ; (PROGN ; (MULTIPLE-VALUE-SETQ # #) ; (MULTIPLE-VALUE-SETQ # #) ; (MULTIPLE-VALUE-BIND # # # #) ; (PROGN # # #) ; (MULTIPLE-VALUE-BIND # # # #) ; (PROGN # # #) ; (MULTIPLE-VALUE-BIND # # # #) ; (PROGN # # #) ; (MULTIPLE-VALUE-BIND # # # #) ; (PROGN # # #)) ; (IRONCLAD::STORE-WORDS IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START ; IRONCLAD::D00 IRONCLAD::D01 IRONCLAD::D10 IRONCLAD::D11)))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 2 2) (INTEGER 6 6) (INTEGER 10 10) ; (INTEGER 14) (INTEGER 12 12) (INTEGER 8 8) ; (INTEGER 4 4) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 2 2) (INTEGER 6 6) (INTEGER 10 10) ; (INTEGER 14) (INTEGER 12 12) (INTEGER 8 8) ; (INTEGER 4 4)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 2 2) (INTEGER 6 6) (INTEGER 10 10) ; (INTEGER 14) (INTEGER 12 12) (INTEGER 8 8) ; (INTEGER 4 4) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 2 2) (INTEGER 6 6) (INTEGER 10 10) ; (INTEGER 14) (INTEGER 12 12) (INTEGER 8 8) ; (INTEGER 4 4)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; processing (DEFUN MISTY1-EXPAND-KEY ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFCIPHER MISTY1 ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/misty1-tmpEJNPPMJY.fasl ; compilation finished in 0:00:00.144 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/rc2.lisp" (written 18 FEB 2022 01:39:10 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/rc2.lisp ; in: DEFUN RC2-SCHEDULE-KEY ; (MAKE-ARRAY 128 :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :INITIAL-ELEMENT 0) ; ; note: could not stack allocate: ; (MAKE-ARRAY 128 :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :INITIAL-ELEMENT 0) ; processing (MACROLET (# # ...) ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/rc2.lisp ; in: ; MACROLET ((MIX (INDEX) ; (LOOP FOR I FROM 0 BELOW 4 ; COLLECT (LET (# # # #) ; `(PROGN # #)) INTO FORMS ; FINALLY ...)) ; (MASH NIL ; (LOOP FOR I FROM 0 BELOW 4 ; COLLECT (LET (# #) ; `(SETF #)) INTO FORMS ; FINALLY ...)) ; (RMIX (INDEX) ; (LOOP FOR I FROM 0 BELOW 4 ; COLLECT (LET (# # # #) ; `(PROGN # #)) INTO FORMS ; FINALLY ...)) ; (RMASH NIL ; (LOOP FOR I FROM 0 BELOW 4 ; COLLECT (LET (# #) ; `(SETF #)) INTO FORMS ; FINALLY ...))) ; (MACROLET ((IRONCLAD::MIX (IRONCLAD::INDEX) ; (LOOP IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM 0 IRONCLAD::BELOW 4 ; IRONCLAD::COLLECT (LET # ; `#) IRONCLAD::INTO IRONCLAD::FORMS ; IRONCLAD::FINALLY ...)) ; (IRONCLAD::MASH () ; (LOOP IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM 0 IRONCLAD::BELOW 4 ; IRONCLAD::COLLECT (LET # ; `#) IRONCLAD::INTO IRONCLAD::FORMS ; IRONCLAD::FINALLY ...)) ; (IRONCLAD::RMIX (IRONCLAD::INDEX) ; (LOOP IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM 0 IRONCLAD::BELOW 4 ; IRONCLAD::COLLECT (LET # ; `#) IRONCLAD::INTO IRONCLAD::FORMS ; IRONCLAD::FINALLY ...)) ; (IRONCLAD::RMASH () ; (LOOP IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM 0 IRONCLAD::BELOW 4 ; IRONCLAD::COLLECT (LET # ; `#) IRONCLAD::INTO IRONCLAD::FORMS ; IRONCLAD::FINALLY ...))) ; (IRONCLAD::DEFINE-BLOCK-ENCRYPTOR IRONCLAD:RC2 ; 8 ; (LET ((IRONCLAD::ROUND-KEYS #)) ; (DECLARE (TYPE IRONCLAD::RC2-ROUND-KEYS IRONCLAD::ROUND-KEYS)) ; (IRONCLAD::WITH-WORDS (# IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START ; :SIZE 2 :BIG-ENDIAN NIL) ; (PROGN # # # # # # # # # # # ...) ; (IRONCLAD::STORE-WORDS IRONCLAD::CIPHERTEXT ; IRONCLAD::CIPHERTEXT-START IRONCLAD::R0 IRONCLAD::R1 IRONCLAD::R2 ; IRONCLAD::R3)))) ; (IRONCLAD::DEFINE-BLOCK-DECRYPTOR IRONCLAD:RC2 ; 8 ; (LET ((IRONCLAD::ROUND-KEYS #)) ; (DECLARE (TYPE IRONCLAD::RC2-ROUND-KEYS IRONCLAD::ROUND-KEYS)) ; (IRONCLAD::WITH-WORDS (# IRONCLAD::CIPHERTEXT ; IRONCLAD::CIPHERTEXT-START :SIZE 2 :BIG-ENDIAN ; NIL) ; (PROGN # # # # # # # # # # # ...) ; (IRONCLAD::STORE-WORDS IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START ; IRONCLAD::R0 IRONCLAD::R1 IRONCLAD::R2 IRONCLAD::R3))))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 2 2) (INTEGER 6 6) (INTEGER 10 10) ; (INTEGER 14) (INTEGER 12 12) (INTEGER 8 8) ; (INTEGER 4 4) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 2 2) (INTEGER 6 6) (INTEGER 10 10) ; (INTEGER 14) (INTEGER 12 12) (INTEGER 8 8) ; (INTEGER 4 4)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 2 2) (INTEGER 6 6) (INTEGER 10 10) ; (INTEGER 14) (INTEGER 12 12) (INTEGER 8 8) ; (INTEGER 4 4) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 2 2) (INTEGER 6 6) (INTEGER 10 10) ; (INTEGER 14) (INTEGER 12 12) (INTEGER 8 8) ; (INTEGER 4 4)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/rc2.lisp ; in: ; MACROLET ((MIX (INDEX) ; (LOOP FOR I FROM 0 BELOW 4 ; COLLECT (LET (# # # #) ; `(PROGN # #)) INTO FORMS ; FINALLY ...)) ; (MASH NIL ; (LOOP FOR I FROM 0 BELOW 4 ; COLLECT (LET (# #) ; `(SETF #)) INTO FORMS ; FINALLY ...)) ; (RMIX (INDEX) ; (LOOP FOR I FROM 0 BELOW 4 ; COLLECT (LET (# # # #) ; `(PROGN # #)) INTO FORMS ; FINALLY ...)) ; (RMASH NIL ; (LOOP FOR I FROM 0 BELOW 4 ; COLLECT (LET (# #) ; `(SETF #)) INTO FORMS ; FINALLY ...))) ; (MACROLET ((IRONCLAD::MIX (IRONCLAD::INDEX) ; (LOOP IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM 0 IRONCLAD::BELOW 4 ; IRONCLAD::COLLECT (LET # ; `#) IRONCLAD::INTO IRONCLAD::FORMS ; IRONCLAD::FINALLY ...)) ; (IRONCLAD::MASH () ; (LOOP IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM 0 IRONCLAD::BELOW 4 ; IRONCLAD::COLLECT (LET # ; `#) IRONCLAD::INTO IRONCLAD::FORMS ; IRONCLAD::FINALLY ...)) ; (IRONCLAD::RMIX (IRONCLAD::INDEX) ; (LOOP IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM 0 IRONCLAD::BELOW 4 ; IRONCLAD::COLLECT (LET # ; `#) IRONCLAD::INTO IRONCLAD::FORMS ; IRONCLAD::FINALLY ...)) ; (IRONCLAD::RMASH () ; (LOOP IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM 0 IRONCLAD::BELOW 4 ; IRONCLAD::COLLECT (LET # ; `#) IRONCLAD::INTO IRONCLAD::FORMS ; IRONCLAD::FINALLY ...))) ; (IRONCLAD::DEFINE-BLOCK-ENCRYPTOR IRONCLAD:RC2 ; 8 ; (LET ((IRONCLAD::ROUND-KEYS #)) ; (DECLARE (TYPE IRONCLAD::RC2-ROUND-KEYS IRONCLAD::ROUND-KEYS)) ; (IRONCLAD::WITH-WORDS (# IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START ; :SIZE 2 :BIG-ENDIAN NIL) ; (PROGN # # # # # # # # # # # ...) ; (IRONCLAD::STORE-WORDS IRONCLAD::CIPHERTEXT ; IRONCLAD::CIPHERTEXT-START IRONCLAD::R0 IRONCLAD::R1 IRONCLAD::R2 ; IRONCLAD::R3)))) ; (IRONCLAD::DEFINE-BLOCK-DECRYPTOR IRONCLAD:RC2 ; 8 ; (LET ((IRONCLAD::ROUND-KEYS #)) ; (DECLARE (TYPE IRONCLAD::RC2-ROUND-KEYS IRONCLAD::ROUND-KEYS)) ; (IRONCLAD::WITH-WORDS (# IRONCLAD::CIPHERTEXT ; IRONCLAD::CIPHERTEXT-START :SIZE 2 :BIG-ENDIAN ; NIL) ; (PROGN # # # # # # # # # # # ...) ; (IRONCLAD::STORE-WORDS IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START ; IRONCLAD::R0 IRONCLAD::R1 IRONCLAD::R2 IRONCLAD::R3))))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 2 2) (INTEGER 6 6) (INTEGER 10 10) ; (INTEGER 14) (INTEGER 12 12) (INTEGER 8 8) ; (INTEGER 4 4) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 2 2) (INTEGER 6 6) (INTEGER 10 10) ; (INTEGER 14) (INTEGER 12 12) (INTEGER 8 8) ; (INTEGER 4 4)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 2 2) (INTEGER 6 6) (INTEGER 10 10) ; (INTEGER 14) (INTEGER 12 12) (INTEGER 8 8) ; (INTEGER 4 4) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 2 2) (INTEGER 6 6) (INTEGER 10 10) ; (INTEGER 14) (INTEGER 12 12) (INTEGER 8 8) ; (INTEGER 4 4)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFCIPHER RC2 ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/rc2-tmp31RWPSX2.fasl ; compilation finished in 0:00:00.212 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/rc5.lisp" (written 18 FEB 2022 01:39:10 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/rc5.lisp ; in: DEFINE-BLOCK-ENCRYPTOR RC5 ; (IRONCLAD::DEFINE-BLOCK-ENCRYPTOR IRONCLAD:RC5 ; 8 ; (LET ((IRONCLAD::N-ROUNDS (IRONCLAD::N-ROUNDS IRONCLAD::CONTEXT)) ; (IRONCLAD::ROUND-KEYS (IRONCLAD::ROUND-KEYS IRONCLAD::CONTEXT))) ; (DECLARE (TYPE IRONCLAD::RC5-N-ROUNDS IRONCLAD::N-ROUNDS)) ; (DECLARE (TYPE IRONCLAD::RC5-ROUND-KEYS IRONCLAD::ROUND-KEYS)) ; (IRONCLAD::WITH-WORDS ((IRONCLAD::A IRONCLAD::B) IRONCLAD::PLAINTEXT ; IRONCLAD::PLAINTEXT-START :BIG-ENDIAN NIL) ; (SETF IRONCLAD::A # ; IRONCLAD::B #) ; (DO (#) (# #) (SETF #) (SETF #) (SETF #) (SETF #))))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; processing (DEFINE-BLOCK-DECRYPTOR RC5 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/rc5.lisp ; in: DEFINE-BLOCK-DECRYPTOR RC5 ; (IRONCLAD::DEFINE-BLOCK-DECRYPTOR IRONCLAD:RC5 ; 8 ; (LET ((IRONCLAD::N-ROUNDS (IRONCLAD::N-ROUNDS IRONCLAD::CONTEXT)) ; (IRONCLAD::ROUND-KEYS (IRONCLAD::ROUND-KEYS IRONCLAD::CONTEXT))) ; (DECLARE (TYPE IRONCLAD::RC5-N-ROUNDS IRONCLAD::N-ROUNDS)) ; (DECLARE (TYPE IRONCLAD::RC5-ROUND-KEYS IRONCLAD::ROUND-KEYS)) ; (IRONCLAD::WITH-WORDS ((IRONCLAD::A IRONCLAD::B) IRONCLAD::CIPHERTEXT ; IRONCLAD::CIPHERTEXT-START :BIG-ENDIAN NIL) ; (DO (#) (# # #) (SETF #) (SETF #) (SETF #) (SETF #))))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; processing (DEFUN RC5-EXPAND-KEY ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/rc5.lisp ; in: DEFUN RC5-EXPAND-KEY ; (MAKE-ARRAY 64 :ELEMENT-TYPE '(UNSIGNED-BYTE 32)) ; ; note: could not stack allocate: (MAKE-ARRAY 64 :ELEMENT-TYPE '(UNSIGNED-BYTE 32)) ; (MAKE-ARRAY 256 :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :INITIAL-ELEMENT 0) ; ; note: could not stack allocate: ; (MAKE-ARRAY 256 :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :INITIAL-ELEMENT 0) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFCIPHER RC5 ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/rc5-tmp1HKLMSTH.fasl ; compilation finished in 0:00:00.176 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/rc6.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :IRONCLAD) ; processing (DEFCONSTANT +RC6/32-P+ ...) ; processing (DEFCONSTANT +RC6/32-Q+ ...) ; processing (DEFTYPE RC6-N-ROUNDS ...) ; processing (DEFCLASS RC6 ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DEFINE-BLOCK-ENCRYPTOR RC6 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/rc6.lisp ; in: DEFINE-BLOCK-ENCRYPTOR RC6 ; (IRONCLAD::DEFINE-BLOCK-ENCRYPTOR IRONCLAD:RC6 ; 16 ; (LET ((IRONCLAD::ROUND-KEYS (IRONCLAD::ROUND-KEYS IRONCLAD::CONTEXT))) ; (DECLARE (TYPE (SIMPLE-ARRAY # #) IRONCLAD::ROUND-KEYS)) ; (IRONCLAD::WITH-WORDS ((IRONCLAD::A IRONCLAD::B IRONCLAD::C IRONCLAD::D) ; IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START ; :BIG-ENDIAN NIL) ; (SETF IRONCLAD::B # ; IRONCLAD::D #) ; (LET (# #) ; (DECLARE #) ; (SETF #)) ; (LET (# #) ; (DECLARE #) ; (SETF #)) ; (LET (# #) ; (DECLARE #) ; (SETF #)) ; (LET (# #) ; (DECLARE #) ; (SETF #)) ; (LET (# #) ; (DECLARE #) ; (SETF #)) ; (LET (# #) ; (DECLARE #) ; (SETF #)) ; (LET (# #) ; (DECLARE #) ; (SETF #)) ; (LET (# #) ; (DECLARE #) ; (SETF #)) ; (LET (# #) ; (DECLARE #) ; (SETF #)) ; ...))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; processing (DEFINE-BLOCK-DECRYPTOR RC6 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/rc6.lisp ; in: DEFINE-BLOCK-DECRYPTOR RC6 ; (IRONCLAD::DEFINE-BLOCK-DECRYPTOR IRONCLAD:RC6 ; 16 ; (LET ((IRONCLAD::ROUND-KEYS (IRONCLAD::ROUND-KEYS IRONCLAD::CONTEXT))) ; (DECLARE (TYPE (SIMPLE-ARRAY # #) IRONCLAD::ROUND-KEYS)) ; (IRONCLAD::WITH-WORDS ((IRONCLAD::A IRONCLAD::B IRONCLAD::C IRONCLAD::D) ; IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START ; :BIG-ENDIAN NIL) ; (SETF IRONCLAD::C # ; IRONCLAD::A #) ; (LET (# #) ; (DECLARE #) ; (SETF #)) ; (LET (# #) ; (DECLARE #) ; (SETF #)) ; (LET (# #) ; (DECLARE #) ; (SETF #)) ; (LET (# #) ; (DECLARE #) ; (SETF #)) ; (LET (# #) ; (DECLARE #) ; (SETF #)) ; (LET (# #) ; (DECLARE #) ; (SETF #)) ; (LET (# #) ; (DECLARE #) ; (SETF #)) ; (LET (# #) ; (DECLARE #) ; (SETF #)) ; (LET (# #) ; (DECLARE #) ; (SETF #)) ; ...))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; processing (DEFUN RC6-EXPAND-KEY ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/rc6.lisp ; in: DEFUN RC6-EXPAND-KEY ; (MAKE-ARRAY 64 :ELEMENT-TYPE '(UNSIGNED-BYTE 32)) ; ; note: could not stack allocate: (MAKE-ARRAY 64 :ELEMENT-TYPE '(UNSIGNED-BYTE 32)) ; (MAKE-ARRAY 256 :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :INITIAL-ELEMENT 0) ; ; note: could not stack allocate: ; (MAKE-ARRAY 256 :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :INITIAL-ELEMENT 0) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFCIPHER RC6 ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/rc6-tmpEWG5XJ53.fasl ; compilation finished in 0:00:00.332 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/xsalsa20.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/xsalsa20-tmpXHL60MUV.fasl ; compilation finished in 0:00:00.040 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/seed.lisp" (written 18 FEB 2022 01:39:10 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/seed.lisp ; in: DEFINE-BLOCK-ENCRYPTOR SEED ; (IRONCLAD::DEFINE-BLOCK-ENCRYPTOR IRONCLAD:SEED ; 16 ; (LET ((IRONCLAD::ROUND-KEYS (IRONCLAD::ROUND-KEYS IRONCLAD::CONTEXT)) ; (IRONCLAD::T0 0) ; (IRONCLAD::T1 0)) ; (DECLARE (TYPE (SIMPLE-ARRAY # #) IRONCLAD::ROUND-KEYS) ; (TYPE (UNSIGNED-BYTE 32) IRONCLAD::T0 IRONCLAD::T1)) ; (IRONCLAD::WITH-WORDS ((IRONCLAD::L0 IRONCLAD::L1 IRONCLAD::R0 ; IRONCLAD::R1) ; IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START ; :SIZE 4) ; (IRONCLAD::DOTIMES-UNROLLED (IRONCLAD::I 15) ; (SETF #) ; (IRONCLAD::SEED-F IRONCLAD::R0 IRONCLAD::R1 # #) ; (SETF #)) ; (SETF IRONCLAD::T0 IRONCLAD::R0 ; IRONCLAD::T1 IRONCLAD::R1) ; (IRONCLAD::SEED-F IRONCLAD::T0 IRONCLAD::T1 ; (AREF IRONCLAD::ROUND-KEYS 30) ; (AREF IRONCLAD::ROUND-KEYS 31)) ; (SETF IRONCLAD::L0 # ; IRONCLAD::L1 #) ; (IRONCLAD::STORE-WORDS IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START ; IRONCLAD::L0 IRONCLAD::L1 IRONCLAD::R0 IRONCLAD::R1)))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; processing (DEFINE-BLOCK-DECRYPTOR SEED ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/seed.lisp ; in: DEFINE-BLOCK-DECRYPTOR SEED ; (IRONCLAD::DEFINE-BLOCK-DECRYPTOR IRONCLAD:SEED ; 16 ; (LET ((IRONCLAD::ROUND-KEYS (IRONCLAD::ROUND-KEYS IRONCLAD::CONTEXT)) ; (IRONCLAD::T0 0) ; (IRONCLAD::T1 0)) ; (DECLARE (TYPE (SIMPLE-ARRAY # #) IRONCLAD::ROUND-KEYS) ; (TYPE (UNSIGNED-BYTE 32) IRONCLAD::T0 IRONCLAD::T1)) ; (IRONCLAD::WITH-WORDS ((IRONCLAD::L0 IRONCLAD::L1 IRONCLAD::R0 ; IRONCLAD::R1) ; IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START ; :SIZE 4) ; (IRONCLAD::DOTIMES-UNROLLED (IRONCLAD::I 15) ; (SETF #) ; (IRONCLAD::SEED-F IRONCLAD::R0 IRONCLAD::R1 # #) ; (SETF #)) ; (SETF IRONCLAD::T0 IRONCLAD::R0 ; IRONCLAD::T1 IRONCLAD::R1) ; (IRONCLAD::SEED-F IRONCLAD::T0 IRONCLAD::T1 ; (AREF IRONCLAD::ROUND-KEYS 0) ; (AREF IRONCLAD::ROUND-KEYS 1)) ; (SETF IRONCLAD::L0 # ; IRONCLAD::L1 #) ; (IRONCLAD::STORE-WORDS IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START ; IRONCLAD::L0 IRONCLAD::L1 IRONCLAD::R0 IRONCLAD::R1)))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; processing (DEFCIPHER SEED ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/seed-tmpB7NPDQCW.fasl ; compilation finished in 0:00:00.628 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/serpent.lisp" (written 18 FEB 2022 01:39:10 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/serpent.lisp ; in: DEFUN SERPENT-GENERATE-SUBKEYS ; (+ IRONCLAD::R 0) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 ; fold zero arg ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR RATIONAL (COMPLEX RATIONAL)). ; (MOD (+ IRONCLAD::R 0) 8) ; ; 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). ; (+ IRONCLAD::R 3) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (MOD (+ IRONCLAD::R 3) 8) ; ; 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). ; (+ IRONCLAD::R 5) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (MOD (+ IRONCLAD::R 5) 8) ; ; 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). ; (+ IRONCLAD::R 7) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (MOD (+ IRONCLAD::R 7) 8) ; ; 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). ; (+ IRONCLAD::R 0) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 ; fold zero arg ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR RATIONAL (COMPLEX RATIONAL)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 ; fold zero arg ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR RATIONAL (COMPLEX RATIONAL)). ; (MOD (+ IRONCLAD::R 0) 8) ; ; 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). ; (+ IRONCLAD::R 1) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (MOD (+ IRONCLAD::R 1) 8) ; ; 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). ; (+ IRONCLAD::R 4) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (MOD (+ IRONCLAD::R 4) 8) ; ; 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). ; (+ IRONCLAD::R 6) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (MOD (+ IRONCLAD::R 6) 8) ; ; 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). ; (+ IRONCLAD::R 0) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 ; fold zero arg ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR RATIONAL (COMPLEX RATIONAL)). ; (MOD (+ IRONCLAD::R 0) 8) ; ; 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). ; (+ IRONCLAD::R 1) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (MOD (+ IRONCLAD::R 1) 8) ; ; 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). ; (+ IRONCLAD::R 2) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (MOD (+ IRONCLAD::R 2) 8) ; ; 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). ; (+ IRONCLAD::R 5) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (MOD (+ IRONCLAD::R 5) 8) ; ; 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). ; (+ IRONCLAD::R 7) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (MOD (+ IRONCLAD::R 7) 8) ; ; 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). ; (+ IRONCLAD::R 1) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (MOD (+ IRONCLAD::R 1) 8) ; ; 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). ; (+ IRONCLAD::R 2) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (MOD (+ IRONCLAD::R 2) 8) ; ; 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). ; (+ IRONCLAD::R 3) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (MOD (+ IRONCLAD::R 3) 8) ; ; 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). ; (+ IRONCLAD::R 6) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (MOD (+ IRONCLAD::R 6) 8) ; ; 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). ; (+ IRONCLAD::R 0) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 ; fold zero arg ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR RATIONAL (COMPLEX RATIONAL)). ; (MOD (+ IRONCLAD::R 0) 8) ; ; 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). ; (+ IRONCLAD::R 2) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (MOD (+ IRONCLAD::R 2) 8) ; ; 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). ; (+ IRONCLAD::R 3) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (MOD (+ IRONCLAD::R 3) 8) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; convert division by 2^k to shift ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; convert integer division to multiplication ; due to type uncertainty: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; ; note: unable to ; convert integer division to multiplication ; due to type uncertainty: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), 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. ; (MOD (+ IRONCLAD::R 2) 8) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), 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. ; (MOD (+ IRONCLAD::R 0) 8) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), 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. ; (MOD (+ IRONCLAD::R 6) 8) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), 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. ; (MOD (+ IRONCLAD::R 3) 8) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), 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. ; (MOD (+ IRONCLAD::R 2) 8) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), 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. ; (MOD (+ IRONCLAD::R 1) 8) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), 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. ; (MOD (+ IRONCLAD::R 7) 8) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), 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. ; (MOD (+ IRONCLAD::R 5) 8) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), 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. ; (MOD (+ IRONCLAD::R 2) 8) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), 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. ; (MOD (+ IRONCLAD::R 1) 8) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), 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. ; (MOD (+ IRONCLAD::R 0) 8) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), 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. ; (MOD (+ IRONCLAD::R 6) 8) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), 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. ; (MOD (+ IRONCLAD::R 4) 8) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), 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. ; (MOD (+ IRONCLAD::R 1) 8) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), 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. ; (MOD (+ IRONCLAD::R 0) 8) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), 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. ; (MOD (+ IRONCLAD::R 7) 8) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), 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. ; (MOD (+ IRONCLAD::R 5) 8) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), 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. ; (MOD (+ IRONCLAD::R 3) 8) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), 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. ; (MOD (+ IRONCLAD::R 0) 8) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-8) (8))), 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. ; (+ IRONCLAD::R 0) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::R 0) 8) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL #1=(-8) #2=(8))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #3=(0) #4=(8))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; etc. ; (+ IRONCLAD::R 3) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::R 3) 8) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL #1=(-8) #2=(8))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #3=(0) #4=(8))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; etc. ; (+ IRONCLAD::R 5) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::R 5) 8) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL #1=(-8) #2=(8))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #3=(0) #4=(8))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; etc. ; (+ IRONCLAD::R 7) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::R 7) 8) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL #1=(-8) #2=(8))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #3=(0) #4=(8))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; etc. ; (+ IRONCLAD::R 0) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::R 0) 8) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL #1=(-8) #2=(8))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #3=(0) #4=(8))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; etc. ; (+ IRONCLAD::R 1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::R 1) 8) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL #1=(-8) #2=(8))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #3=(0) #4=(8))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; etc. ; (+ IRONCLAD::R 4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::R 4) 8) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL #1=(-8) #2=(8))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #3=(0) #4=(8))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; etc. ; (+ IRONCLAD::R 6) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::R 6) 8) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL #1=(-8) #2=(8))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #3=(0) #4=(8))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; etc. ; (+ IRONCLAD::R 0) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::R 0) 8) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL #1=(-8) #2=(8))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #3=(0) #4=(8))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; etc. ; (+ IRONCLAD::R 1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::R 1) 8) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL #1=(-8) #2=(8))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #3=(0) #4=(8))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; etc. ; (+ IRONCLAD::R 2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::R 2) 8) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL #1=(-8) #2=(8))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #3=(0) #4=(8))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; etc. ; (+ IRONCLAD::R 5) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::R 5) 8) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL #1=(-8) #2=(8))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #3=(0) #4=(8))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; etc. ; (+ IRONCLAD::R 7) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::R 7) 8) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL #1=(-8) #2=(8))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #3=(0) #4=(8))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; etc. ; (+ IRONCLAD::R 1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::R 1) 8) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL #1=(-8) #2=(8))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #3=(0) #4=(8))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; etc. ; (+ IRONCLAD::R 2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::R 2) 8) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL #1=(-8) #2=(8))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #3=(0) #4=(8))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; etc. ; (+ IRONCLAD::R 3) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::R 3) 8) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL #1=(-8) #2=(8))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #3=(0) #4=(8))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; etc. ; (+ IRONCLAD::R 6) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::R 6) 8) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL #1=(-8) #2=(8))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #3=(0) #4=(8))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; etc. ; (+ IRONCLAD::R 0) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::R 0) 8) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL #1=(-8) #2=(8))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #3=(0) #4=(8))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; etc. ; (+ IRONCLAD::R 2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::R 2) 8) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL #1=(-8) #2=(8))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #3=(0) #4=(8))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; etc. ; (+ IRONCLAD::R 3) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::R 3) 8) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL #1=(-8) #2=(8))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #3=(0) #4=(8))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; etc. ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFINE-BLOCK-ENCRYPTOR SERPENT ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/serpent.lisp ; in: DEFINE-BLOCK-ENCRYPTOR SERPENT ; (IRONCLAD::DEFINE-BLOCK-ENCRYPTOR IRONCLAD:SERPENT ; 16 ; (LET ((IRONCLAD::SUBKEYS (IRONCLAD::SERPENT-SUBKEYS IRONCLAD::CONTEXT)) ; (IRONCLAD::T0 0) ; (IRONCLAD::T1 0) ; (IRONCLAD::T2 0) ; (IRONCLAD::T3 0) ; (IRONCLAD::T4 0)) ; (DECLARE (TYPE (SIMPLE-ARRAY # #) IRONCLAD::SUBKEYS) ; (TYPE (UNSIGNED-BYTE 32) IRONCLAD::T0 IRONCLAD::T1 IRONCLAD::T2 ; IRONCLAD::T3 IRONCLAD::T4)) ; (IRONCLAD::WITH-WORDS ((IRONCLAD::B0 IRONCLAD::B1 IRONCLAD::B2 ; IRONCLAD::B3) ; IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START ; :BIG-ENDIAN NIL :SIZE 4) ; (MACROLET (#) ; (IRONCLAD::SERPENT-ROUNDS) ; (SETF #) ; (IRONCLAD::SERPENT-SBOX7 IRONCLAD::B0 IRONCLAD::B1 IRONCLAD::B2 ; IRONCLAD::B3 IRONCLAD::T0 IRONCLAD::T1 ; IRONCLAD::T2 IRONCLAD::T3 IRONCLAD::T4) ; (SETF #) ; (IRONCLAD::STORE-WORDS IRONCLAD::CIPHERTEXT ; IRONCLAD::CIPHERTEXT-START IRONCLAD::B0 IRONCLAD::B1 IRONCLAD::B2 ; IRONCLAD::B3) ; (VALUES))))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; processing (DEFINE-BLOCK-DECRYPTOR SERPENT ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/serpent.lisp ; in: DEFINE-BLOCK-DECRYPTOR SERPENT ; (IRONCLAD::DEFINE-BLOCK-DECRYPTOR IRONCLAD:SERPENT ; 16 ; (LET ((IRONCLAD::SUBKEYS (IRONCLAD::SERPENT-SUBKEYS IRONCLAD::CONTEXT)) ; (IRONCLAD::T0 0) ; (IRONCLAD::T1 0) ; (IRONCLAD::T2 0) ; (IRONCLAD::T3 0) ; (IRONCLAD::T4 0)) ; (DECLARE (TYPE (SIMPLE-ARRAY # #) IRONCLAD::SUBKEYS) ; (TYPE (UNSIGNED-BYTE 32) IRONCLAD::T0 IRONCLAD::T1 IRONCLAD::T2 ; IRONCLAD::T3 IRONCLAD::T4)) ; (IRONCLAD::WITH-WORDS ((IRONCLAD::B0 IRONCLAD::B1 IRONCLAD::B2 ; IRONCLAD::B3) ; IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START ; :BIG-ENDIAN NIL :SIZE 4) ; (MACROLET (#) ; (SETF #) ; (IRONCLAD::SERPENT-SBOX7-INVERSE IRONCLAD::B0 IRONCLAD::B1 ; IRONCLAD::B2 IRONCLAD::B3 ; IRONCLAD::T0 IRONCLAD::T1 ; IRONCLAD::T2 IRONCLAD::T3 ; IRONCLAD::T4) ; (SETF #) ; (IRONCLAD::SERPENT-ROUNDS-INVERSE) ; (IRONCLAD::STORE-WORDS IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START ; IRONCLAD::B0 IRONCLAD::B1 IRONCLAD::B2 IRONCLAD::B3) ; (VALUES))))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; processing (DEFCIPHER SERPENT ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/serpent-tmpGZ70QILE.fasl ; compilation finished in 0:00:16.072 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/sm4.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (IN-IRONCLAD-READTABLE) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/sm4.lisp ; in: DEFINE-BLOCK-ENCRYPTOR SM4 ; (IRONCLAD::DEFINE-BLOCK-ENCRYPTOR IRONCLAD:SM4 ; 16 ; (LET ((IRONCLAD::ROUND-KEYS (IRONCLAD::SM4-ROUND-KEYS IRONCLAD::CONTEXT))) ; (DECLARE (TYPE (SIMPLE-ARRAY # #) IRONCLAD::ROUND-KEYS)) ; (IRONCLAD::WITH-WORDS ((IRONCLAD::W0 IRONCLAD::W1 IRONCLAD::W2 ; IRONCLAD::W3) ; IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START ; :SIZE 4) ; (IRONCLAD::SM4-ROUND IRONCLAD::W0 IRONCLAD::W1 IRONCLAD::W2 ; IRONCLAD::W3 IRONCLAD::ROUND-KEYS 0 T) ; (IRONCLAD::SM4-ROUND IRONCLAD::W0 IRONCLAD::W1 IRONCLAD::W2 ; IRONCLAD::W3 IRONCLAD::ROUND-KEYS 4 T) ; (IRONCLAD::SM4-ROUND IRONCLAD::W0 IRONCLAD::W1 IRONCLAD::W2 ; IRONCLAD::W3 IRONCLAD::ROUND-KEYS 8 T) ; (IRONCLAD::SM4-ROUND IRONCLAD::W0 IRONCLAD::W1 IRONCLAD::W2 ; IRONCLAD::W3 IRONCLAD::ROUND-KEYS 12 T) ; (IRONCLAD::SM4-ROUND IRONCLAD::W0 IRONCLAD::W1 IRONCLAD::W2 ; IRONCLAD::W3 IRONCLAD::ROUND-KEYS 16 T) ; (IRONCLAD::SM4-ROUND IRONCLAD::W0 IRONCLAD::W1 IRONCLAD::W2 ; IRONCLAD::W3 IRONCLAD::ROUND-KEYS 20 T) ; (IRONCLAD::SM4-ROUND IRONCLAD::W0 IRONCLAD::W1 IRONCLAD::W2 ; IRONCLAD::W3 IRONCLAD::ROUND-KEYS 24 T) ; (IRONCLAD::SM4-ROUND IRONCLAD::W0 IRONCLAD::W1 IRONCLAD::W2 ; IRONCLAD::W3 IRONCLAD::ROUND-KEYS 28 T) ; (IRONCLAD::STORE-WORDS IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START ; IRONCLAD::W3 IRONCLAD::W2 IRONCLAD::W1 IRONCLAD::W0))) ; (VALUES)) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; processing (DEFINE-BLOCK-DECRYPTOR SM4 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/sm4.lisp ; in: DEFINE-BLOCK-DECRYPTOR SM4 ; (IRONCLAD::DEFINE-BLOCK-DECRYPTOR IRONCLAD:SM4 ; 16 ; (LET ((IRONCLAD::ROUND-KEYS (IRONCLAD::SM4-ROUND-KEYS IRONCLAD::CONTEXT))) ; (DECLARE (TYPE (SIMPLE-ARRAY # #) IRONCLAD::ROUND-KEYS)) ; (IRONCLAD::WITH-WORDS ((IRONCLAD::W0 IRONCLAD::W1 IRONCLAD::W2 ; IRONCLAD::W3) ; IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START ; :SIZE 4) ; (IRONCLAD::SM4-ROUND IRONCLAD::W0 IRONCLAD::W1 IRONCLAD::W2 ; IRONCLAD::W3 IRONCLAD::ROUND-KEYS 31 NIL) ; (IRONCLAD::SM4-ROUND IRONCLAD::W0 IRONCLAD::W1 IRONCLAD::W2 ; IRONCLAD::W3 IRONCLAD::ROUND-KEYS 27 NIL) ; (IRONCLAD::SM4-ROUND IRONCLAD::W0 IRONCLAD::W1 IRONCLAD::W2 ; IRONCLAD::W3 IRONCLAD::ROUND-KEYS 23 NIL) ; (IRONCLAD::SM4-ROUND IRONCLAD::W0 IRONCLAD::W1 IRONCLAD::W2 ; IRONCLAD::W3 IRONCLAD::ROUND-KEYS 19 NIL) ; (IRONCLAD::SM4-ROUND IRONCLAD::W0 IRONCLAD::W1 IRONCLAD::W2 ; IRONCLAD::W3 IRONCLAD::ROUND-KEYS 15 NIL) ; (IRONCLAD::SM4-ROUND IRONCLAD::W0 IRONCLAD::W1 IRONCLAD::W2 ; IRONCLAD::W3 IRONCLAD::ROUND-KEYS 11 NIL) ; (IRONCLAD::SM4-ROUND IRONCLAD::W0 IRONCLAD::W1 IRONCLAD::W2 ; IRONCLAD::W3 IRONCLAD::ROUND-KEYS 7 NIL) ; (IRONCLAD::SM4-ROUND IRONCLAD::W0 IRONCLAD::W1 IRONCLAD::W2 ; IRONCLAD::W3 IRONCLAD::ROUND-KEYS 3 NIL) ; (IRONCLAD::STORE-WORDS IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START ; IRONCLAD::W3 IRONCLAD::W2 IRONCLAD::W1 IRONCLAD::W0))) ; (VALUES)) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; processing (DEFCIPHER SM4 ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/sm4-tmpKYD38Q95.fasl ; compilation finished in 0:00:00.416 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/sosemanuk.lisp" (written 18 FEB 2022 01:39:10 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/sosemanuk.lisp ; in: DEFUN SOSEMANUK-COMPUTE-BLOCK ; (+ IRONCLAD::OOFF 4) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (+ IRONCLAD::OOFF 8) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (+ IRONCLAD::OOFF 12) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (+ IRONCLAD::OOFF 4) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (+ IRONCLAD::OOFF 8) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (+ IRONCLAD::OOFF 12) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; processing (DEFINE-STREAM-CRYPTOR SOSEMANUK ...) ; processing (DEFCIPHER SOSEMANUK ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/sosemanuk-tmpV4YQ0HKA.fasl ; compilation finished in 0:00:01.496 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/square.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (IN-IRONCLAD-READTABLE) ; processing (DECLAIM (TYPE # ...)) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/square.lisp ; in: DEFINE-BLOCK-ENCRYPTOR SQUARE ; (IRONCLAD::DEFINE-BLOCK-ENCRYPTOR IRONCLAD:SQUARE ; 16 ; (LET ((IRONCLAD::N-ROUNDS (IRONCLAD::N-ROUNDS IRONCLAD::CONTEXT)) ; (IRONCLAD::ROUND-KEYS ; (IRONCLAD::ENCRYPTION-ROUND-KEYS IRONCLAD::CONTEXT))) ; (IRONCLAD::SQUARE-MUNGE-BLOCK IRONCLAD::ROUND-KEYS IRONCLAD::N-ROUNDS ; IRONCLAD::T-ENCRYPTION-TABLE IRONCLAD::S-ENCRYPTION-TABLE ; IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START IRONCLAD::CIPHERTEXT ; IRONCLAD::CIPHERTEXT-START))) ; --> SB-INT:NAMED-DS-BIND SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/square.lisp ; in: DEFINE-BLOCK-ENCRYPTOR SQUARE ; (IRONCLAD::SQUARE-MUNGE-BLOCK IRONCLAD::ROUND-KEYS IRONCLAD::N-ROUNDS ; IRONCLAD::T-ENCRYPTION-TABLE IRONCLAD::S-ENCRYPTION-TABLE ; IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START IRONCLAD::CIPHERTEXT ; IRONCLAD::CIPHERTEXT-START) ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET LET DO BLOCK LET TAGBODY UNLESS ; --> IF >= 1- ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET LET DO BLOCK LET TAGBODY UNLESS ; --> IF >= ; ==> ; 1 ; ; note: unable to open code because: The operands might not be the same type. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF + ; ==> ; (* IRONCLAD::N-ROUNDS 4) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF ; ==> ; (+ 0 (* IRONCLAD::N-ROUNDS 4)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 ; fold zero arg ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR RATIONAL (COMPLEX RATIONAL)). ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF + ; ==> ; (* IRONCLAD::N-ROUNDS 4) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF ; ==> ; (+ 1 (* IRONCLAD::N-ROUNDS 4)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF + ; ==> ; (* IRONCLAD::N-ROUNDS 4) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF ; ==> ; (+ 2 (* IRONCLAD::N-ROUNDS 4)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF + ; ==> ; (* IRONCLAD::N-ROUNDS 4) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF ; ==> ; (+ 3 (* IRONCLAD::N-ROUNDS 4)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET LET DO BLOCK LET TAGBODY UNLESS ; --> IF >= 1- ; ==> ; 1 ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET LET DO BLOCK LET TAGBODY UNLESS ; --> IF >= ; ==> ; 1 ; ; note: forced to do full call ; 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. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The second argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET LET DO BLOCK LET TAGBODY PSETQ ; --> LET* 1+ ; ==> ; 1 ; ; 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 (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF + ; ==> ; (* IRONCLAD::N-ROUNDS 4) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF ; ==> ; (+ 0 (* IRONCLAD::N-ROUNDS 4)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF + ; ==> ; (* IRONCLAD::N-ROUNDS 4) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF ; ==> ; (+ 1 (* IRONCLAD::N-ROUNDS 4)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF + ; ==> ; (* IRONCLAD::N-ROUNDS 4) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF ; ==> ; (+ 2 (* IRONCLAD::N-ROUNDS 4)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF + ; ==> ; (* IRONCLAD::N-ROUNDS 4) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF ; ==> ; (+ 3 (* IRONCLAD::N-ROUNDS 4)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; processing (DEFINE-BLOCK-DECRYPTOR SQUARE ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/square.lisp ; in: DEFINE-BLOCK-DECRYPTOR SQUARE ; (IRONCLAD::DEFINE-BLOCK-DECRYPTOR IRONCLAD:SQUARE ; 16 ; (LET ((IRONCLAD::N-ROUNDS (IRONCLAD::N-ROUNDS IRONCLAD::CONTEXT)) ; (IRONCLAD::ROUND-KEYS ; (IRONCLAD::DECRYPTION-ROUND-KEYS IRONCLAD::CONTEXT))) ; (IRONCLAD::SQUARE-MUNGE-BLOCK IRONCLAD::ROUND-KEYS IRONCLAD::N-ROUNDS ; IRONCLAD::T-DECRYPTION-TABLE IRONCLAD::S-DECRYPTION-TABLE ; IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START IRONCLAD::PLAINTEXT ; IRONCLAD::PLAINTEXT-START))) ; --> SB-INT:NAMED-DS-BIND SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/square.lisp ; in: DEFINE-BLOCK-DECRYPTOR SQUARE ; (IRONCLAD::SQUARE-MUNGE-BLOCK IRONCLAD::ROUND-KEYS IRONCLAD::N-ROUNDS ; IRONCLAD::T-DECRYPTION-TABLE IRONCLAD::S-DECRYPTION-TABLE ; IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START IRONCLAD::PLAINTEXT ; IRONCLAD::PLAINTEXT-START) ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET LET DO BLOCK LET TAGBODY UNLESS ; --> IF >= 1- ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET LET DO BLOCK LET TAGBODY UNLESS ; --> IF >= ; ==> ; 1 ; ; note: unable to open code because: The operands might not be the same type. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF + ; ==> ; (* IRONCLAD::N-ROUNDS 4) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF ; ==> ; (+ 0 (* IRONCLAD::N-ROUNDS 4)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 ; fold zero arg ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR RATIONAL (COMPLEX RATIONAL)). ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF + ; ==> ; (* IRONCLAD::N-ROUNDS 4) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF ; ==> ; (+ 1 (* IRONCLAD::N-ROUNDS 4)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF + ; ==> ; (* IRONCLAD::N-ROUNDS 4) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF ; ==> ; (+ 2 (* IRONCLAD::N-ROUNDS 4)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF + ; ==> ; (* IRONCLAD::N-ROUNDS 4) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF ; ==> ; (+ 3 (* IRONCLAD::N-ROUNDS 4)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET LET DO BLOCK LET TAGBODY UNLESS ; --> IF >= 1- ; ==> ; 1 ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET LET DO BLOCK LET TAGBODY UNLESS ; --> IF >= ; ==> ; 1 ; ; note: forced to do full call ; 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. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The second argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET LET DO BLOCK LET TAGBODY PSETQ ; --> LET* 1+ ; ==> ; 1 ; ; 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 (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF + ; ==> ; (* IRONCLAD::N-ROUNDS 4) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF ; ==> ; (+ 0 (* IRONCLAD::N-ROUNDS 4)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF + ; ==> ; (* IRONCLAD::N-ROUNDS 4) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF ; ==> ; (+ 1 (* IRONCLAD::N-ROUNDS 4)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF + ; ==> ; (* IRONCLAD::N-ROUNDS 4) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF ; ==> ; (+ 2 (* IRONCLAD::N-ROUNDS 4)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF + ; ==> ; (* IRONCLAD::N-ROUNDS 4) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; --> BLOCK IRONCLAD::WITH-WORDS MACROLET LET MACROLET LET FLET ; --> IRONCLAD::STORE-WORDS PROGN SETF LET* IRONCLAD::APPLY-RK IRONCLAD::RKREF ; --> AREF ; ==> ; (+ 3 (* IRONCLAD::N-ROUNDS 4)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFCIPHER SQUARE ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/square-tmpJXWE1HN2.fasl ; compilation finished in 0:00:00.832 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/tea.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCONSTANT +TEA-N-ROUNDS+ ...) ; processing (DEFCONSTANT +TEA-DELTA+ ...) ; processing (DEFCLASS TEA ...) ; processing (DEFINE-BLOCK-ENCRYPTOR TEA ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/tea.lisp ; in: DEFINE-BLOCK-ENCRYPTOR TEA ; (IRONCLAD::DEFINE-BLOCK-ENCRYPTOR IRONCLAD:TEA ; 8 ; (IRONCLAD::WITH-WORDS ((IRONCLAD::Y IRONCLAD::Z) IRONCLAD::PLAINTEXT ; IRONCLAD::PLAINTEXT-START) ; (LET ((IRONCLAD::KEY #) (IRONCLAD::SUM 0)) ; (DECLARE (TYPE # IRONCLAD::KEY)) ; (DECLARE (TYPE # IRONCLAD::SUM)) ; (DOTIMES (IRONCLAD::I IRONCLAD::+TEA-N-ROUNDS+) ; (SETF #) ; (SETF #) ; (SETF #)) ; (IRONCLAD::STORE-WORDS IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START ; IRONCLAD::Y IRONCLAD::Z)))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; processing (DEFINE-BLOCK-DECRYPTOR TEA ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/tea.lisp ; in: DEFINE-BLOCK-DECRYPTOR TEA ; (IRONCLAD::DEFINE-BLOCK-DECRYPTOR IRONCLAD:TEA ; 8 ; (IRONCLAD::WITH-WORDS ((IRONCLAD::Y IRONCLAD::Z) IRONCLAD::CIPHERTEXT ; IRONCLAD::CIPHERTEXT-START) ; (LET ((IRONCLAD::KEY #) (IRONCLAD::SUM #)) ; (DECLARE (TYPE # IRONCLAD::KEY)) ; (DECLARE (TYPE # IRONCLAD::SUM)) ; (DOTIMES (IRONCLAD::I IRONCLAD::+TEA-N-ROUNDS+) ; (SETF #) ; (SETF #) ; (SETF #)) ; (IRONCLAD::STORE-WORDS IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START ; IRONCLAD::Y IRONCLAD::Z)))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFCIPHER TEA ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/tea-tmpMNC5LX5B.fasl ; compilation finished in 0:00:00.060 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/threefish.lisp" (written 18 FEB 2022 01:39:10 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/threefish.lisp ; in: DEFINE-BLOCK-ENCRYPTOR THREEFISH256 ; (IRONCLAD::DEFINE-BLOCK-ENCRYPTOR IRONCLAD:THREEFISH256 ; 32 ; (LET* ((IRONCLAD::KEY (IRONCLAD::THREEFISH-KEY IRONCLAD::CONTEXT)) ; (IRONCLAD::TWEAK (IRONCLAD::THREEFISH-TWEAK IRONCLAD::CONTEXT)) ; (IRONCLAD::K0 (AREF IRONCLAD::KEY 0)) ; (IRONCLAD::K1 (AREF IRONCLAD::KEY 1)) ; (IRONCLAD::K2 (AREF IRONCLAD::KEY 2)) ; (IRONCLAD::K3 (AREF IRONCLAD::KEY 3)) ; (IRONCLAD::K4 (AREF IRONCLAD::KEY 4)) ; (IRONCLAD::T0 (AREF IRONCLAD::TWEAK 0)) ; (IRONCLAD::T1 (AREF IRONCLAD::TWEAK 1)) ; (IRONCLAD::T2 (AREF IRONCLAD::TWEAK 2))) ; (DECLARE (TYPE (SIMPLE-ARRAY # #) IRONCLAD::KEY) ; (TYPE (SIMPLE-ARRAY # #) IRONCLAD::TWEAK) ; (TYPE (UNSIGNED-BYTE 64) IRONCLAD::K0 IRONCLAD::K1 IRONCLAD::K2 ; IRONCLAD::K3 IRONCLAD::K4 IRONCLAD::T0 IRONCLAD::T1 ; IRONCLAD::T2)) ; (IRONCLAD::WITH-WORDS ((IRONCLAD::B0 IRONCLAD::B1 IRONCLAD::B2 ; IRONCLAD::B3) ; IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START ; :BIG-ENDIAN NIL :SIZE 8) ; (MACROLET (#) ; (IRONCLAD::ARX IRONCLAD::K1 IRONCLAD::T0 IRONCLAD::B1 IRONCLAD::K0 ; IRONCLAD::K3 0 IRONCLAD::K2 IRONCLAD::T1 IRONCLAD::K2 IRONCLAD::T1 ; IRONCLAD::B1 ...) ; (IRONCLAD::ARX IRONCLAD::K3 IRONCLAD::T2 IRONCLAD::B1 IRONCLAD::K2 ; IRONCLAD::K0 2 IRONCLAD::K4 IRONCLAD::T0 IRONCLAD::K4 IRONCLAD::T0 ; IRONCLAD::B1 ...) ; (IRONCLAD::ARX IRONCLAD::K0 IRONCLAD::T1 IRONCLAD::B1 IRONCLAD::K4 ; IRONCLAD::K2 4 IRONCLAD::K1 IRONCLAD::T2 IRONCLAD::K1 IRONCLAD::T2 ; IRONCLAD::B1 ...) ; (IRONCLAD::ARX IRONCLAD::K2 IRONCLAD::T0 IRONCLAD::B1 IRONCLAD::K1 ; IRONCLAD::K4 6 IRONCLAD::K3 IRONCLAD::T1 IRONCLAD::K3 IRONCLAD::T1 ; IRONCLAD::B1 ...) ; (IRONCLAD::ARX IRONCLAD::K4 IRONCLAD::T2 IRONCLAD::B1 IRONCLAD::K3 ; IRONCLAD::K1 8 IRONCLAD::K0 IRONCLAD::T0 IRONCLAD::K0 IRONCLAD::T0 ; IRONCLAD::B1 ...) ; (IRONCLAD::ARX IRONCLAD::K1 IRONCLAD::T1 IRONCLAD::B1 IRONCLAD::K0 ; IRONCLAD::K3 10 IRONCLAD::K2 IRONCLAD::T2 IRONCLAD::K2 IRONCLAD::T2 ; IRONCLAD::B1 ...) ; (IRONCLAD::ARX IRONCLAD::K3 IRONCLAD::T0 IRONCLAD::B1 IRONCLAD::K2 ; IRONCLAD::K0 12 IRONCLAD::K4 IRONCLAD::T1 IRONCLAD::K4 IRONCLAD::T1 ; IRONCLAD::B1 ...) ; (IRONCLAD::ARX IRONCLAD::K0 IRONCLAD::T2 IRONCLAD::B1 IRONCLAD::K4 ; IRONCLAD::K2 14 IRONCLAD::K1 IRONCLAD::T0 IRONCLAD::K1 IRONCLAD::T0 ; IRONCLAD::B1 ...) ; (IRONCLAD::ARX IRONCLAD::K2 IRONCLAD::T1 IRONCLAD::B1 IRONCLAD::K1 ; IRONCLAD::K4 16 IRONCLAD::K3 IRONCLAD::T2 IRONCLAD::K3 IRONCLAD::T2 ; IRONCLAD::B1 ...)) ; (SETF IRONCLAD::B0 # ; IRONCLAD::B1 # ; IRONCLAD::B2 # ; IRONCLAD::B3 #) ; (IRONCLAD::STORE-WORDS IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START ; IRONCLAD::B0 IRONCLAD::B1 IRONCLAD::B2 IRONCLAD::B3) ; (VALUES)))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 8) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/threefish.lisp ; in: DEFINE-BLOCK-ENCRYPTOR THREEFISH256 ; (IRONCLAD::ARX IRONCLAD::K1 IRONCLAD::T0 IRONCLAD::B1 IRONCLAD::K0 ; IRONCLAD::K3 0 IRONCLAD::K2 IRONCLAD::T1 IRONCLAD::K2 IRONCLAD::T1 ; IRONCLAD::B1 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; (IRONCLAD::ARX IRONCLAD::K3 IRONCLAD::T2 IRONCLAD::B1 IRONCLAD::K2 ; IRONCLAD::K0 2 IRONCLAD::K4 IRONCLAD::T0 IRONCLAD::K4 IRONCLAD::T0 ; IRONCLAD::B1 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; (IRONCLAD::ARX IRONCLAD::K0 IRONCLAD::T1 IRONCLAD::B1 IRONCLAD::K4 ; IRONCLAD::K2 4 IRONCLAD::K1 IRONCLAD::T2 IRONCLAD::K1 IRONCLAD::T2 ; IRONCLAD::B1 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; (IRONCLAD::ARX IRONCLAD::K2 IRONCLAD::T0 IRONCLAD::B1 IRONCLAD::K1 ; IRONCLAD::K4 6 IRONCLAD::K3 IRONCLAD::T1 IRONCLAD::K3 IRONCLAD::T1 ; IRONCLAD::B1 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; (IRONCLAD::ARX IRONCLAD::K4 IRONCLAD::T2 IRONCLAD::B1 IRONCLAD::K3 ; IRONCLAD::K1 8 IRONCLAD::K0 IRONCLAD::T0 IRONCLAD::K0 IRONCLAD::T0 ; IRONCLAD::B1 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; (IRONCLAD::ARX IRONCLAD::K1 IRONCLAD::T1 IRONCLAD::B1 IRONCLAD::K0 ; IRONCLAD::K3 10 IRONCLAD::K2 IRONCLAD::T2 IRONCLAD::K2 IRONCLAD::T2 ; IRONCLAD::B1 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; (IRONCLAD::ARX IRONCLAD::K3 IRONCLAD::T0 IRONCLAD::B1 IRONCLAD::K2 ; IRONCLAD::K0 12 IRONCLAD::K4 IRONCLAD::T1 IRONCLAD::K4 IRONCLAD::T1 ; IRONCLAD::B1 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; (IRONCLAD::ARX IRONCLAD::K0 IRONCLAD::T2 IRONCLAD::B1 IRONCLAD::K4 ; IRONCLAD::K2 14 IRONCLAD::K1 IRONCLAD::T0 IRONCLAD::K1 IRONCLAD::T0 ; IRONCLAD::B1 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; (IRONCLAD::ARX IRONCLAD::K2 IRONCLAD::T1 IRONCLAD::B1 IRONCLAD::K1 ; IRONCLAD::K4 16 IRONCLAD::K3 IRONCLAD::T2 IRONCLAD::K3 IRONCLAD::T2 ; IRONCLAD::B1 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; processing (DEFINE-BLOCK-DECRYPTOR THREEFISH256 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/threefish.lisp ; in: DEFINE-BLOCK-DECRYPTOR THREEFISH256 ; (IRONCLAD::DEFINE-BLOCK-DECRYPTOR IRONCLAD:THREEFISH256 ; 32 ; (LET* ((IRONCLAD::KEY (IRONCLAD::THREEFISH-KEY IRONCLAD::CONTEXT)) ; (IRONCLAD::TWEAK (IRONCLAD::THREEFISH-TWEAK IRONCLAD::CONTEXT)) ; (IRONCLAD::K0 (AREF IRONCLAD::KEY 0)) ; (IRONCLAD::K1 (AREF IRONCLAD::KEY 1)) ; (IRONCLAD::K2 (AREF IRONCLAD::KEY 2)) ; (IRONCLAD::K3 (AREF IRONCLAD::KEY 3)) ; (IRONCLAD::K4 (AREF IRONCLAD::KEY 4)) ; (IRONCLAD::T0 (AREF IRONCLAD::TWEAK 0)) ; (IRONCLAD::T1 (AREF IRONCLAD::TWEAK 1)) ; (IRONCLAD::T2 (AREF IRONCLAD::TWEAK 2))) ; (DECLARE (TYPE (SIMPLE-ARRAY # #) IRONCLAD::KEY) ; (TYPE (SIMPLE-ARRAY # #) IRONCLAD::TWEAK) ; (TYPE (UNSIGNED-BYTE 64) IRONCLAD::K0 IRONCLAD::K1 IRONCLAD::K2 ; IRONCLAD::K3 IRONCLAD::K4 IRONCLAD::T0 IRONCLAD::T1 ; IRONCLAD::T2)) ; (IRONCLAD::WITH-WORDS ((IRONCLAD::B0 IRONCLAD::B1 IRONCLAD::B2 ; IRONCLAD::B3) ; IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START ; :BIG-ENDIAN NIL :SIZE 8) ; (SETF IRONCLAD::B0 # ; IRONCLAD::B1 # ; IRONCLAD::B2 # ; IRONCLAD::B3 #) ; (MACROLET (#) ; (IRONCLAD::ARX IRONCLAD::K2 IRONCLAD::K3 IRONCLAD::T2 IRONCLAD::K4 ; IRONCLAD::T0 IRONCLAD::K0 17 IRONCLAD::K1 IRONCLAD::K2 IRONCLAD::T1 ; IRONCLAD::K3 ...) ; (IRONCLAD::ARX IRONCLAD::K0 IRONCLAD::K1 IRONCLAD::T0 IRONCLAD::K2 ; IRONCLAD::T1 IRONCLAD::K3 15 IRONCLAD::K4 IRONCLAD::K0 IRONCLAD::T2 ; IRONCLAD::K1 ...) ; (IRONCLAD::ARX IRONCLAD::K3 IRONCLAD::K4 IRONCLAD::T1 IRONCLAD::K0 ; IRONCLAD::T2 IRONCLAD::K1 13 IRONCLAD::K2 IRONCLAD::K3 IRONCLAD::T0 ; IRONCLAD::K4 ...) ; (IRONCLAD::ARX IRONCLAD::K1 IRONCLAD::K2 IRONCLAD::T2 IRONCLAD::K3 ; IRONCLAD::T0 IRONCLAD::K4 11 IRONCLAD::K0 IRONCLAD::K1 IRONCLAD::T1 ; IRONCLAD::K2 ...) ; (IRONCLAD::ARX IRONCLAD::K4 IRONCLAD::K0 IRONCLAD::T0 IRONCLAD::K1 ; IRONCLAD::T1 IRONCLAD::K2 9 IRONCLAD::K3 IRONCLAD::K4 IRONCLAD::T2 ; IRONCLAD::K0 ...) ; (IRONCLAD::ARX IRONCLAD::K2 IRONCLAD::K3 IRONCLAD::T1 IRONCLAD::K4 ; IRONCLAD::T2 IRONCLAD::K0 7 IRONCLAD::K1 IRONCLAD::K2 IRONCLAD::T0 ; IRONCLAD::K3 ...) ; (IRONCLAD::ARX IRONCLAD::K0 IRONCLAD::K1 IRONCLAD::T2 IRONCLAD::K2 ; IRONCLAD::T0 IRONCLAD::K3 5 IRONCLAD::K4 IRONCLAD::K0 IRONCLAD::T1 ; IRONCLAD::K1 ...) ; (IRONCLAD::ARX IRONCLAD::K3 IRONCLAD::K4 IRONCLAD::T0 IRONCLAD::K0 ; IRONCLAD::T1 IRONCLAD::K1 3 IRONCLAD::K2 IRONCLAD::K3 IRONCLAD::T2 ; IRONCLAD::K4 ...) ; (IRONCLAD::ARX IRONCLAD::K1 IRONCLAD::K2 IRONCLAD::T1 IRONCLAD::K3 ; IRONCLAD::T2 IRONCLAD::K4 1 IRONCLAD::K0 IRONCLAD::K1 IRONCLAD::T0 ; IRONCLAD::K2 ...)) ; (IRONCLAD::STORE-WORDS IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START ; IRONCLAD::B0 IRONCLAD::B1 IRONCLAD::B2 IRONCLAD::B3) ; (VALUES)))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 8) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/threefish.lisp ; in: DEFINE-BLOCK-DECRYPTOR THREEFISH256 ; (IRONCLAD::ARX IRONCLAD::K2 IRONCLAD::K3 IRONCLAD::T2 IRONCLAD::K4 ; IRONCLAD::T0 IRONCLAD::K0 17 IRONCLAD::K1 IRONCLAD::K2 IRONCLAD::T1 ; IRONCLAD::K3 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 58) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 12) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 5) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 40) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 57) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 14) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::ARX IRONCLAD::K0 IRONCLAD::K1 IRONCLAD::T0 IRONCLAD::K2 ; IRONCLAD::T1 IRONCLAD::K3 15 IRONCLAD::K4 IRONCLAD::K0 IRONCLAD::T2 ; IRONCLAD::K1 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 58) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 12) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 5) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 40) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 57) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 14) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::ARX IRONCLAD::K3 IRONCLAD::K4 IRONCLAD::T1 IRONCLAD::K0 ; IRONCLAD::T2 IRONCLAD::K1 13 IRONCLAD::K2 IRONCLAD::K3 IRONCLAD::T0 ; IRONCLAD::K4 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 58) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 12) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 5) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 40) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 57) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 14) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::ARX IRONCLAD::K1 IRONCLAD::K2 IRONCLAD::T2 IRONCLAD::K3 ; IRONCLAD::T0 IRONCLAD::K4 11 IRONCLAD::K0 IRONCLAD::K1 IRONCLAD::T1 ; IRONCLAD::K2 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 58) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 12) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 5) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 40) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 57) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 14) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::ARX IRONCLAD::K4 IRONCLAD::K0 IRONCLAD::T0 IRONCLAD::K1 ; IRONCLAD::T1 IRONCLAD::K2 9 IRONCLAD::K3 IRONCLAD::K4 IRONCLAD::T2 ; IRONCLAD::K0 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 58) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 12) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 5) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 40) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 57) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 14) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::ARX IRONCLAD::K2 IRONCLAD::K3 IRONCLAD::T1 IRONCLAD::K4 ; IRONCLAD::T2 IRONCLAD::K0 7 IRONCLAD::K1 IRONCLAD::K2 IRONCLAD::T0 ; IRONCLAD::K3 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 58) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 12) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 5) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 40) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 57) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 14) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::ARX IRONCLAD::K0 IRONCLAD::K1 IRONCLAD::T2 IRONCLAD::K2 ; IRONCLAD::T0 IRONCLAD::K3 5 IRONCLAD::K4 IRONCLAD::K0 IRONCLAD::T1 ; IRONCLAD::K1 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 58) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 12) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 5) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 40) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 57) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 14) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::ARX IRONCLAD::K3 IRONCLAD::K4 IRONCLAD::T0 IRONCLAD::K0 ; IRONCLAD::T1 IRONCLAD::K1 3 IRONCLAD::K2 IRONCLAD::K3 IRONCLAD::T2 ; IRONCLAD::K4 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 58) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 12) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 5) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 40) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 57) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 14) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::ARX IRONCLAD::K1 IRONCLAD::K2 IRONCLAD::T1 IRONCLAD::K3 ; IRONCLAD::T2 IRONCLAD::K4 1 IRONCLAD::K0 IRONCLAD::K1 IRONCLAD::T0 ; IRONCLAD::K2 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 58) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 12) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 5) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 40) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 57) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 14) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; processing (DEFCIPHER THREEFISH256 ...) ; processing (DEFCLASS THREEFISH512 ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFINE-BLOCK-ENCRYPTOR THREEFISH512 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/threefish.lisp ; in: DEFINE-BLOCK-ENCRYPTOR THREEFISH512 ; (IRONCLAD::DEFINE-BLOCK-ENCRYPTOR IRONCLAD:THREEFISH512 ; 64 ; (LET* ((IRONCLAD::KEY (IRONCLAD::THREEFISH-KEY IRONCLAD::CONTEXT)) ; (IRONCLAD::TWEAK (IRONCLAD::THREEFISH-TWEAK IRONCLAD::CONTEXT)) ; (IRONCLAD::K0 (AREF IRONCLAD::KEY 0)) ; (IRONCLAD::K1 (AREF IRONCLAD::KEY 1)) ; (IRONCLAD::K2 (AREF IRONCLAD::KEY 2)) ; (IRONCLAD::K3 (AREF IRONCLAD::KEY 3)) ; (IRONCLAD::K4 (AREF IRONCLAD::KEY 4)) ; (IRONCLAD::K5 (AREF IRONCLAD::KEY 5)) ; (IRONCLAD::K6 (AREF IRONCLAD::KEY 6)) ; (IRONCLAD::K7 (AREF IRONCLAD::KEY 7)) ; (IRONCLAD::K8 (AREF IRONCLAD::KEY 8)) ; (IRONCLAD::T0 (AREF IRONCLAD::TWEAK 0)) ; ...) ; (DECLARE (TYPE (SIMPLE-ARRAY # #) IRONCLAD::KEY) ; (TYPE (SIMPLE-ARRAY # #) IRONCLAD::TWEAK) ; (TYPE (UNSIGNED-BYTE 64) IRONCLAD::K0 IRONCLAD::K1 IRONCLAD::K2 ; IRONCLAD::K3 IRONCLAD::K4 IRONCLAD::K5 IRONCLAD::K6 ; IRONCLAD::K7 IRONCLAD::K8 IRONCLAD::T0 ...)) ; (IRONCLAD::WITH-WORDS ((IRONCLAD::B0 IRONCLAD::B1 IRONCLAD::B2 ; IRONCLAD::B3 IRONCLAD::B4 IRONCLAD::B5 ; IRONCLAD::B6 IRONCLAD::B7) ; IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START ; :BIG-ENDIAN NIL :SIZE 8) ; (MACROLET (#) ; (IRONCLAD::ARX IRONCLAD::K1 IRONCLAD::K0 IRONCLAD::K3 IRONCLAD::K2 ; IRONCLAD::K5 IRONCLAD::T0 IRONCLAD::K4 IRONCLAD::K7 0 IRONCLAD::K6 ; IRONCLAD::T1 ...) ; (IRONCLAD::ARX IRONCLAD::K3 IRONCLAD::K2 IRONCLAD::K5 IRONCLAD::K4 ; IRONCLAD::K7 IRONCLAD::T2 IRONCLAD::K6 IRONCLAD::K0 2 IRONCLAD::K8 ; IRONCLAD::T0 ...) ; (IRONCLAD::ARX IRONCLAD::K5 IRONCLAD::K4 IRONCLAD::K7 IRONCLAD::K6 ; IRONCLAD::K0 IRONCLAD::T1 IRONCLAD::K8 IRONCLAD::K2 4 IRONCLAD::K1 ; IRONCLAD::T2 ...) ; (IRONCLAD::ARX IRONCLAD::K7 IRONCLAD::K6 IRONCLAD::K0 IRONCLAD::K8 ; IRONCLAD::K2 IRONCLAD::T0 IRONCLAD::K1 IRONCLAD::K4 6 IRONCLAD::K3 ; IRONCLAD::T1 ...) ; (IRONCLAD::ARX IRONCLAD::K0 IRONCLAD::K8 IRONCLAD::K2 IRONCLAD::K1 ; IRONCLAD::K4 IRONCLAD::T2 IRONCLAD::K3 IRONCLAD::K6 8 IRONCLAD::K5 ; IRONCLAD::T0 ...) ; (IRONCLAD::ARX IRONCLAD::K2 IRONCLAD::K1 IRONCLAD::K4 IRONCLAD::K3 ; IRONCLAD::K6 IRONCLAD::T1 IRONCLAD::K5 IRONCLAD::K8 10 IRONCLAD::K7 ; IRONCLAD::T2 ...) ; (IRONCLAD::ARX IRONCLAD::K4 IRONCLAD::K3 IRONCLAD::K6 IRONCLAD::K5 ; IRONCLAD::K8 IRONCLAD::T0 IRONCLAD::K7 IRONCLAD::K1 12 IRONCLAD::K0 ; IRONCLAD::T1 ...) ; (IRONCLAD::ARX IRONCLAD::K6 IRONCLAD::K5 IRONCLAD::K8 IRONCLAD::K7 ; IRONCLAD::K1 IRONCLAD::T2 IRONCLAD::K0 IRONCLAD::K3 14 IRONCLAD::K2 ; IRONCLAD::T0 ...) ; (IRONCLAD::ARX IRONCLAD::K8 IRONCLAD::K7 IRONCLAD::K1 IRONCLAD::K0 ; IRONCLAD::K3 IRONCLAD::T1 IRONCLAD::K2 IRONCLAD::K5 16 IRONCLAD::K4 ; IRONCLAD::T2 ...)) ; (SETF IRONCLAD::B0 # ; IRONCLAD::B1 # ; IRONCLAD::B2 # ; IRONCLAD::B3 # ; IRONCLAD::B4 # ; IRONCLAD::B5 # ; ...) ; (IRONCLAD::STORE-WORDS IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START ; IRONCLAD::B0 IRONCLAD::B1 IRONCLAD::B2 IRONCLAD::B3 IRONCLAD::B4 ; IRONCLAD::B5 IRONCLAD::B6 IRONCLAD::B7) ; (VALUES)))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 8) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/threefish.lisp ; in: DEFINE-BLOCK-ENCRYPTOR THREEFISH512 ; (IRONCLAD::ARX IRONCLAD::K1 IRONCLAD::K0 IRONCLAD::K3 IRONCLAD::K2 ; IRONCLAD::K5 IRONCLAD::T0 IRONCLAD::K4 IRONCLAD::K7 0 IRONCLAD::K6 ; IRONCLAD::T1 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; (IRONCLAD::ARX IRONCLAD::K3 IRONCLAD::K2 IRONCLAD::K5 IRONCLAD::K4 ; IRONCLAD::K7 IRONCLAD::T2 IRONCLAD::K6 IRONCLAD::K0 2 IRONCLAD::K8 ; IRONCLAD::T0 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; (IRONCLAD::ARX IRONCLAD::K5 IRONCLAD::K4 IRONCLAD::K7 IRONCLAD::K6 ; IRONCLAD::K0 IRONCLAD::T1 IRONCLAD::K8 IRONCLAD::K2 4 IRONCLAD::K1 ; IRONCLAD::T2 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; (IRONCLAD::ARX IRONCLAD::K7 IRONCLAD::K6 IRONCLAD::K0 IRONCLAD::K8 ; IRONCLAD::K2 IRONCLAD::T0 IRONCLAD::K1 IRONCLAD::K4 6 IRONCLAD::K3 ; IRONCLAD::T1 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; (IRONCLAD::ARX IRONCLAD::K0 IRONCLAD::K8 IRONCLAD::K2 IRONCLAD::K1 ; IRONCLAD::K4 IRONCLAD::T2 IRONCLAD::K3 IRONCLAD::K6 8 IRONCLAD::K5 ; IRONCLAD::T0 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; (IRONCLAD::ARX IRONCLAD::K2 IRONCLAD::K1 IRONCLAD::K4 IRONCLAD::K3 ; IRONCLAD::K6 IRONCLAD::T1 IRONCLAD::K5 IRONCLAD::K8 10 IRONCLAD::K7 ; IRONCLAD::T2 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; (IRONCLAD::ARX IRONCLAD::K4 IRONCLAD::K3 IRONCLAD::K6 IRONCLAD::K5 ; IRONCLAD::K8 IRONCLAD::T0 IRONCLAD::K7 IRONCLAD::K1 12 IRONCLAD::K0 ; IRONCLAD::T1 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; (IRONCLAD::ARX IRONCLAD::K6 IRONCLAD::K5 IRONCLAD::K8 IRONCLAD::K7 ; IRONCLAD::K1 IRONCLAD::T2 IRONCLAD::K0 IRONCLAD::K3 14 IRONCLAD::K2 ; IRONCLAD::T0 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; (IRONCLAD::ARX IRONCLAD::K8 IRONCLAD::K7 IRONCLAD::K1 IRONCLAD::K0 ; IRONCLAD::K3 IRONCLAD::T1 IRONCLAD::K2 IRONCLAD::K5 16 IRONCLAD::K4 ; IRONCLAD::T2 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; processing (DEFINE-BLOCK-DECRYPTOR THREEFISH512 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/threefish.lisp ; in: DEFINE-BLOCK-DECRYPTOR THREEFISH512 ; (IRONCLAD::DEFINE-BLOCK-DECRYPTOR IRONCLAD:THREEFISH512 ; 64 ; (LET* ((IRONCLAD::KEY (IRONCLAD::THREEFISH-KEY IRONCLAD::CONTEXT)) ; (IRONCLAD::TWEAK (IRONCLAD::THREEFISH-TWEAK IRONCLAD::CONTEXT)) ; (IRONCLAD::K0 (AREF IRONCLAD::KEY 0)) ; (IRONCLAD::K1 (AREF IRONCLAD::KEY 1)) ; (IRONCLAD::K2 (AREF IRONCLAD::KEY 2)) ; (IRONCLAD::K3 (AREF IRONCLAD::KEY 3)) ; (IRONCLAD::K4 (AREF IRONCLAD::KEY 4)) ; (IRONCLAD::K5 (AREF IRONCLAD::KEY 5)) ; (IRONCLAD::K6 (AREF IRONCLAD::KEY 6)) ; (IRONCLAD::K7 (AREF IRONCLAD::KEY 7)) ; (IRONCLAD::K8 (AREF IRONCLAD::KEY 8)) ; (IRONCLAD::T0 (AREF IRONCLAD::TWEAK 0)) ; ...) ; (DECLARE (TYPE (SIMPLE-ARRAY # #) IRONCLAD::KEY) ; (TYPE (SIMPLE-ARRAY # #) IRONCLAD::TWEAK) ; (TYPE (UNSIGNED-BYTE 64) IRONCLAD::K0 IRONCLAD::K1 IRONCLAD::K2 ; IRONCLAD::K3 IRONCLAD::K4 IRONCLAD::K5 IRONCLAD::K6 ; IRONCLAD::K7 IRONCLAD::K8 IRONCLAD::T0 ...)) ; (IRONCLAD::WITH-WORDS ((IRONCLAD::B0 IRONCLAD::B1 IRONCLAD::B2 ; IRONCLAD::B3 IRONCLAD::B4 IRONCLAD::B5 ; IRONCLAD::B6 IRONCLAD::B7) ; IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START ; :BIG-ENDIAN NIL :SIZE 8) ; (SETF IRONCLAD::B0 # ; IRONCLAD::B1 # ; IRONCLAD::B2 # ; IRONCLAD::B3 # ; IRONCLAD::B4 # ; IRONCLAD::B5 # ; ...) ; (MACROLET (#) ; (IRONCLAD::ARX IRONCLAD::K5 IRONCLAD::T0 IRONCLAD::K6 17 IRONCLAD::K3 ; IRONCLAD::K4 IRONCLAD::T2 IRONCLAD::K1 IRONCLAD::K2 IRONCLAD::K8 ; IRONCLAD::K0 ...) ; (IRONCLAD::ARX IRONCLAD::K3 IRONCLAD::T1 IRONCLAD::K4 15 IRONCLAD::K1 ; IRONCLAD::K2 IRONCLAD::T0 IRONCLAD::K8 IRONCLAD::K0 IRONCLAD::K6 ; IRONCLAD::K7 ...) ; (IRONCLAD::ARX IRONCLAD::K1 IRONCLAD::T2 IRONCLAD::K2 13 IRONCLAD::K8 ; IRONCLAD::K0 IRONCLAD::T1 IRONCLAD::K6 IRONCLAD::K7 IRONCLAD::K4 ; IRONCLAD::K5 ...) ; (IRONCLAD::ARX IRONCLAD::K8 IRONCLAD::T0 IRONCLAD::K0 11 IRONCLAD::K6 ; IRONCLAD::K7 IRONCLAD::T2 IRONCLAD::K4 IRONCLAD::K5 IRONCLAD::K2 ; IRONCLAD::K3 ...) ; (IRONCLAD::ARX IRONCLAD::K6 IRONCLAD::T1 IRONCLAD::K7 9 IRONCLAD::K4 ; IRONCLAD::K5 IRONCLAD::T0 IRONCLAD::K2 IRONCLAD::K3 IRONCLAD::K0 ; IRONCLAD::K1 ...) ; (IRONCLAD::ARX IRONCLAD::K4 IRONCLAD::T2 IRONCLAD::K5 7 IRONCLAD::K2 ; IRONCLAD::K3 IRONCLAD::T1 IRONCLAD::K0 IRONCLAD::K1 IRONCLAD::K7 ; IRONCLAD::K8 ...) ; (IRONCLAD::ARX IRONCLAD::K2 IRONCLAD::T0 IRONCLAD::K3 5 IRONCLAD::K0 ; IRONCLAD::K1 IRONCLAD::T2 IRONCLAD::K7 IRONCLAD::K8 IRONCLAD::K5 ; IRONCLAD::K6 ...) ; (IRONCLAD::ARX IRONCLAD::K0 IRONCLAD::T1 IRONCLAD::K1 3 IRONCLAD::K7 ; IRONCLAD::K8 IRONCLAD::T0 IRONCLAD::K5 IRONCLAD::K6 IRONCLAD::K3 ; IRONCLAD::K4 ...) ; (IRONCLAD::ARX IRONCLAD::K7 IRONCLAD::T2 IRONCLAD::K8 1 IRONCLAD::K5 ; IRONCLAD::K6 IRONCLAD::T1 IRONCLAD::K3 IRONCLAD::K4 IRONCLAD::K1 ; IRONCLAD::K2 ...)) ; (IRONCLAD::STORE-WORDS IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START ; IRONCLAD::B0 IRONCLAD::B1 IRONCLAD::B2 IRONCLAD::B3 IRONCLAD::B4 ; IRONCLAD::B5 IRONCLAD::B6 IRONCLAD::B7) ; (VALUES)))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 8) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/threefish.lisp ; in: DEFINE-BLOCK-DECRYPTOR THREEFISH512 ; (IRONCLAD::ARX IRONCLAD::K5 IRONCLAD::T0 IRONCLAD::K6 17 IRONCLAD::K3 ; IRONCLAD::K4 IRONCLAD::T2 IRONCLAD::K1 IRONCLAD::K2 IRONCLAD::K8 ; IRONCLAD::K0 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 35) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B2) 43) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B0) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B6) 29) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B4) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B6) 10) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B4) 50) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 30) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 54) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B2) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B0) 36) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B6) 49) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B4) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B6) 14) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B4) 27) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 36) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::ARX IRONCLAD::K3 IRONCLAD::T1 IRONCLAD::K4 15 IRONCLAD::K1 ; IRONCLAD::K2 IRONCLAD::T0 IRONCLAD::K8 IRONCLAD::K0 IRONCLAD::K6 ; IRONCLAD::K7 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 35) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B2) 43) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B0) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B6) 29) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B4) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B6) 10) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B4) 50) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 30) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 54) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B2) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B0) 36) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B6) 49) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B4) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B6) 14) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B4) 27) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 36) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::ARX IRONCLAD::K1 IRONCLAD::T2 IRONCLAD::K2 13 IRONCLAD::K8 ; IRONCLAD::K0 IRONCLAD::T1 IRONCLAD::K6 IRONCLAD::K7 IRONCLAD::K4 ; IRONCLAD::K5 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 35) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B2) 43) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B0) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B6) 29) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B4) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B6) 10) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B4) 50) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 30) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 54) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B2) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B0) 36) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B6) 49) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B4) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B6) 14) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B4) 27) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 36) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::ARX IRONCLAD::K8 IRONCLAD::T0 IRONCLAD::K0 11 IRONCLAD::K6 ; IRONCLAD::K7 IRONCLAD::T2 IRONCLAD::K4 IRONCLAD::K5 IRONCLAD::K2 ; IRONCLAD::K3 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 35) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B2) 43) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B0) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B6) 29) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B4) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B6) 10) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B4) 50) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 30) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 54) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B2) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B0) 36) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B6) 49) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B4) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B6) 14) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B4) 27) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 36) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::ARX IRONCLAD::K6 IRONCLAD::T1 IRONCLAD::K7 9 IRONCLAD::K4 ; IRONCLAD::K5 IRONCLAD::T0 IRONCLAD::K2 IRONCLAD::K3 IRONCLAD::K0 ; IRONCLAD::K1 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 35) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B2) 43) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B0) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B6) 29) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B4) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B6) 10) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B4) 50) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 30) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 54) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B2) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B0) 36) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B6) 49) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B4) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B6) 14) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B4) 27) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 36) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::ARX IRONCLAD::K4 IRONCLAD::T2 IRONCLAD::K5 7 IRONCLAD::K2 ; IRONCLAD::K3 IRONCLAD::T1 IRONCLAD::K0 IRONCLAD::K1 IRONCLAD::K7 ; IRONCLAD::K8 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 35) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B2) 43) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B0) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B6) 29) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B4) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B6) 10) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B4) 50) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 30) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 54) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B2) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B0) 36) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B6) 49) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B4) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B6) 14) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B4) 27) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 36) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::ARX IRONCLAD::K2 IRONCLAD::T0 IRONCLAD::K3 5 IRONCLAD::K0 ; IRONCLAD::K1 IRONCLAD::T2 IRONCLAD::K7 IRONCLAD::K8 IRONCLAD::K5 ; IRONCLAD::K6 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 35) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B2) 43) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B0) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B6) 29) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B4) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B6) 10) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B4) 50) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 30) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 54) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B2) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B0) 36) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B6) 49) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B4) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B6) 14) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B4) 27) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 36) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::ARX IRONCLAD::K0 IRONCLAD::T1 IRONCLAD::K1 3 IRONCLAD::K7 ; IRONCLAD::K8 IRONCLAD::T0 IRONCLAD::K5 IRONCLAD::K6 IRONCLAD::K3 ; IRONCLAD::K4 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 35) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B2) 43) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B0) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B6) 29) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B4) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B6) 10) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B4) 50) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 30) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 54) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B2) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B0) 36) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B6) 49) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B4) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B6) 14) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B4) 27) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 36) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::ARX IRONCLAD::K7 IRONCLAD::T2 IRONCLAD::K8 1 IRONCLAD::K5 ; IRONCLAD::K6 IRONCLAD::T1 IRONCLAD::K3 IRONCLAD::K4 IRONCLAD::K1 ; IRONCLAD::K2 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 35) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B2) 43) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B0) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B6) 29) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B4) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B6) 10) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B4) 50) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 30) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 54) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B2) 39) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B0) 36) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B6) 49) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B4) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B0) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B6) 14) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B4) 27) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B2) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 36) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; processing (DEFCIPHER THREEFISH512 ...) ; processing (DEFCLASS THREEFISH1024 ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFINE-BLOCK-ENCRYPTOR THREEFISH1024 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/threefish.lisp ; in: DEFINE-BLOCK-ENCRYPTOR THREEFISH1024 ; (IRONCLAD::DEFINE-BLOCK-ENCRYPTOR IRONCLAD:THREEFISH1024 ; 128 ; (LET* ((IRONCLAD::KEY (IRONCLAD::THREEFISH-KEY IRONCLAD::CONTEXT)) ; (IRONCLAD::TWEAK (IRONCLAD::THREEFISH-TWEAK IRONCLAD::CONTEXT)) ; (IRONCLAD::K0 (AREF IRONCLAD::KEY 0)) ; (IRONCLAD::K1 (AREF IRONCLAD::KEY 1)) ; (IRONCLAD::K2 (AREF IRONCLAD::KEY 2)) ; (IRONCLAD::K3 (AREF IRONCLAD::KEY 3)) ; (IRONCLAD::K4 (AREF IRONCLAD::KEY 4)) ; (IRONCLAD::K5 (AREF IRONCLAD::KEY 5)) ; (IRONCLAD::K6 (AREF IRONCLAD::KEY 6)) ; (IRONCLAD::K7 (AREF IRONCLAD::KEY 7)) ; (IRONCLAD::K8 (AREF IRONCLAD::KEY 8)) ; (IRONCLAD::K9 (AREF IRONCLAD::KEY 9)) ; ...) ; (DECLARE (TYPE (SIMPLE-ARRAY # #) IRONCLAD::KEY) ; (TYPE (SIMPLE-ARRAY # #) IRONCLAD::TWEAK) ; (TYPE (UNSIGNED-BYTE 64) IRONCLAD::K0 IRONCLAD::K1 IRONCLAD::K2 ; IRONCLAD::K3 IRONCLAD::K4 IRONCLAD::K5 IRONCLAD::K6 ; IRONCLAD::K7 IRONCLAD::K8 IRONCLAD::K9 ...)) ; (IRONCLAD::WITH-WORDS ((IRONCLAD::B0 IRONCLAD::B1 IRONCLAD::B2 ; IRONCLAD::B3 IRONCLAD::B4 IRONCLAD::B5 ; IRONCLAD::B6 IRONCLAD::B7 IRONCLAD::B8 ; IRONCLAD::B9 IRONCLAD::B10 IRONCLAD::B11 ...) ; IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START ; :BIG-ENDIAN NIL :SIZE 8) ; (MACROLET (#) ; (IRONCLAD::ARX IRONCLAD::K1 IRONCLAD::K0 IRONCLAD::K3 IRONCLAD::K2 ; IRONCLAD::K5 IRONCLAD::K4 IRONCLAD::K7 IRONCLAD::K6 IRONCLAD::K9 ; IRONCLAD::K8 IRONCLAD::K11 ...) ; (IRONCLAD::ARX IRONCLAD::K3 IRONCLAD::K2 IRONCLAD::K5 IRONCLAD::K4 ; IRONCLAD::K7 IRONCLAD::K6 IRONCLAD::K9 IRONCLAD::K8 IRONCLAD::K11 ; IRONCLAD::K10 IRONCLAD::K13 ...) ; (IRONCLAD::ARX IRONCLAD::K5 IRONCLAD::K4 IRONCLAD::K7 IRONCLAD::K6 ; IRONCLAD::K9 IRONCLAD::K8 IRONCLAD::K11 IRONCLAD::K10 IRONCLAD::K13 ; IRONCLAD::K12 IRONCLAD::K15 ...) ; (IRONCLAD::ARX IRONCLAD::K7 IRONCLAD::K6 IRONCLAD::K9 IRONCLAD::K8 ; IRONCLAD::K11 IRONCLAD::K10 IRONCLAD::K13 IRONCLAD::K12 ; IRONCLAD::K15 IRONCLAD::K14 IRONCLAD::K0 ...) ; (IRONCLAD::ARX IRONCLAD::K9 IRONCLAD::K8 IRONCLAD::K11 IRONCLAD::K10 ; IRONCLAD::K13 IRONCLAD::K12 IRONCLAD::K15 IRONCLAD::K14 IRONCLAD::K0 ; IRONCLAD::K16 IRONCLAD::K2 ...) ; (IRONCLAD::ARX IRONCLAD::K11 IRONCLAD::K10 IRONCLAD::K13 ; IRONCLAD::K12 IRONCLAD::K15 IRONCLAD::K14 IRONCLAD::K0 IRONCLAD::K16 ; IRONCLAD::K2 IRONCLAD::K1 IRONCLAD::K4 ...) ; (IRONCLAD::ARX IRONCLAD::K13 IRONCLAD::K12 IRONCLAD::K15 ; IRONCLAD::K14 IRONCLAD::K0 IRONCLAD::K16 IRONCLAD::K2 IRONCLAD::K1 ; IRONCLAD::K4 IRONCLAD::K3 IRONCLAD::K6 ...) ; (IRONCLAD::ARX IRONCLAD::K15 IRONCLAD::K14 IRONCLAD::K0 IRONCLAD::K16 ; IRONCLAD::K2 IRONCLAD::K1 IRONCLAD::K4 IRONCLAD::K3 IRONCLAD::K6 ; IRONCLAD::K5 IRONCLAD::K8 ...) ; (IRONCLAD::ARX IRONCLAD::K0 IRONCLAD::K16 IRONCLAD::K2 IRONCLAD::K1 ; IRONCLAD::K4 IRONCLAD::K3 IRONCLAD::K6 IRONCLAD::K5 IRONCLAD::K8 ; IRONCLAD::K7 IRONCLAD::K10 ...) ; (IRONCLAD::ARX IRONCLAD::K2 IRONCLAD::K1 IRONCLAD::K4 IRONCLAD::K3 ; IRONCLAD::K6 IRONCLAD::K5 IRONCLAD::K8 IRONCLAD::K7 IRONCLAD::K10 ; IRONCLAD::K9 IRONCLAD::K12 ...)) ; (SETF IRONCLAD::B0 # ; IRONCLAD::B1 # ; IRONCLAD::B2 # ; IRONCLAD::B3 # ; IRONCLAD::B4 # ; IRONCLAD::B5 # ; ...) ; (IRONCLAD::STORE-WORDS IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START ; IRONCLAD::B0 IRONCLAD::B1 IRONCLAD::B2 IRONCLAD::B3 IRONCLAD::B4 ; IRONCLAD::B5 IRONCLAD::B6 IRONCLAD::B7 IRONCLAD::B8 ...) ; (VALUES)))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 8) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/threefish.lisp ; in: DEFINE-BLOCK-ENCRYPTOR THREEFISH1024 ; (IRONCLAD::ARX IRONCLAD::K1 IRONCLAD::K0 IRONCLAD::K3 IRONCLAD::K2 ; IRONCLAD::K5 IRONCLAD::K4 IRONCLAD::K7 IRONCLAD::K6 IRONCLAD::K9 ; IRONCLAD::K8 IRONCLAD::K11 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; (IRONCLAD::ARX IRONCLAD::K3 IRONCLAD::K2 IRONCLAD::K5 IRONCLAD::K4 ; IRONCLAD::K7 IRONCLAD::K6 IRONCLAD::K9 IRONCLAD::K8 IRONCLAD::K11 ; IRONCLAD::K10 IRONCLAD::K13 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; (IRONCLAD::ARX IRONCLAD::K5 IRONCLAD::K4 IRONCLAD::K7 IRONCLAD::K6 ; IRONCLAD::K9 IRONCLAD::K8 IRONCLAD::K11 IRONCLAD::K10 IRONCLAD::K13 ; IRONCLAD::K12 IRONCLAD::K15 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; (IRONCLAD::ARX IRONCLAD::K7 IRONCLAD::K6 IRONCLAD::K9 IRONCLAD::K8 ; IRONCLAD::K11 IRONCLAD::K10 IRONCLAD::K13 IRONCLAD::K12 IRONCLAD::K15 ; IRONCLAD::K14 IRONCLAD::K0 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; (IRONCLAD::ARX IRONCLAD::K9 IRONCLAD::K8 IRONCLAD::K11 IRONCLAD::K10 ; IRONCLAD::K13 IRONCLAD::K12 IRONCLAD::K15 IRONCLAD::K14 IRONCLAD::K0 ; IRONCLAD::K16 IRONCLAD::K2 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; (IRONCLAD::ARX IRONCLAD::K11 IRONCLAD::K10 IRONCLAD::K13 IRONCLAD::K12 ; IRONCLAD::K15 IRONCLAD::K14 IRONCLAD::K0 IRONCLAD::K16 IRONCLAD::K2 ; IRONCLAD::K1 IRONCLAD::K4 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; (IRONCLAD::ARX IRONCLAD::K13 IRONCLAD::K12 IRONCLAD::K15 IRONCLAD::K14 ; IRONCLAD::K0 IRONCLAD::K16 IRONCLAD::K2 IRONCLAD::K1 IRONCLAD::K4 ; IRONCLAD::K3 IRONCLAD::K6 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; (IRONCLAD::ARX IRONCLAD::K15 IRONCLAD::K14 IRONCLAD::K0 IRONCLAD::K16 ; IRONCLAD::K2 IRONCLAD::K1 IRONCLAD::K4 IRONCLAD::K3 IRONCLAD::K6 ; IRONCLAD::K5 IRONCLAD::K8 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; (IRONCLAD::ARX IRONCLAD::K0 IRONCLAD::K16 IRONCLAD::K2 IRONCLAD::K1 ; IRONCLAD::K4 IRONCLAD::K3 IRONCLAD::K6 IRONCLAD::K5 IRONCLAD::K8 ; IRONCLAD::K7 IRONCLAD::K10 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; (IRONCLAD::ARX IRONCLAD::K2 IRONCLAD::K1 IRONCLAD::K4 IRONCLAD::K3 ; IRONCLAD::K6 IRONCLAD::K5 IRONCLAD::K8 IRONCLAD::K7 IRONCLAD::K10 ; IRONCLAD::K9 IRONCLAD::K12 ...) ; --> PROGN SETF SETQ THE LOGXOR IRONCLAD::ROL64 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B15 ; ; note: doing unsigned word to integer coercion (cost 20) from B15 ; ==> ; IRONCLAD::B11 ; ; note: doing unsigned word to integer coercion (cost 20) from B11 ; ==> ; IRONCLAD::B13 ; ; note: doing unsigned word to integer coercion (cost 20) from B13 ; ==> ; IRONCLAD::B9 ; ; note: doing unsigned word to integer coercion (cost 20) from B9 ; ==> ; IRONCLAD::B1 ; ; note: doing unsigned word to integer coercion (cost 20) from B1 ; ==> ; IRONCLAD::B5 ; ; note: doing unsigned word to integer coercion (cost 20) from B5 ; ==> ; IRONCLAD::B3 ; ; note: doing unsigned word to integer coercion (cost 20) from B3 ; ==> ; IRONCLAD::B7 ; ; note: doing unsigned word to integer coercion (cost 20) from B7 ; processing (DEFINE-BLOCK-DECRYPTOR THREEFISH1024 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/threefish.lisp ; in: DEFINE-BLOCK-DECRYPTOR THREEFISH1024 ; (IRONCLAD::DEFINE-BLOCK-DECRYPTOR IRONCLAD:THREEFISH1024 ; 128 ; (LET* ((IRONCLAD::KEY (IRONCLAD::THREEFISH-KEY IRONCLAD::CONTEXT)) ; (IRONCLAD::TWEAK (IRONCLAD::THREEFISH-TWEAK IRONCLAD::CONTEXT)) ; (IRONCLAD::K0 (AREF IRONCLAD::KEY 0)) ; (IRONCLAD::K1 (AREF IRONCLAD::KEY 1)) ; (IRONCLAD::K2 (AREF IRONCLAD::KEY 2)) ; (IRONCLAD::K3 (AREF IRONCLAD::KEY 3)) ; (IRONCLAD::K4 (AREF IRONCLAD::KEY 4)) ; (IRONCLAD::K5 (AREF IRONCLAD::KEY 5)) ; (IRONCLAD::K6 (AREF IRONCLAD::KEY 6)) ; (IRONCLAD::K7 (AREF IRONCLAD::KEY 7)) ; (IRONCLAD::K8 (AREF IRONCLAD::KEY 8)) ; (IRONCLAD::K9 (AREF IRONCLAD::KEY 9)) ; ...) ; (DECLARE (TYPE (SIMPLE-ARRAY # #) IRONCLAD::KEY) ; (TYPE (SIMPLE-ARRAY # #) IRONCLAD::TWEAK) ; (TYPE (UNSIGNED-BYTE 64) IRONCLAD::K0 IRONCLAD::K1 IRONCLAD::K2 ; IRONCLAD::K3 IRONCLAD::K4 IRONCLAD::K5 IRONCLAD::K6 ; IRONCLAD::K7 IRONCLAD::K8 IRONCLAD::K9 ...)) ; (IRONCLAD::WITH-WORDS ((IRONCLAD::B0 IRONCLAD::B1 IRONCLAD::B2 ; IRONCLAD::B3 IRONCLAD::B4 IRONCLAD::B5 ; IRONCLAD::B6 IRONCLAD::B7 IRONCLAD::B8 ; IRONCLAD::B9 IRONCLAD::B10 IRONCLAD::B11 ...) ; IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START ; :BIG-ENDIAN NIL :SIZE 8) ; (SETF IRONCLAD::B0 # ; IRONCLAD::B1 # ; IRONCLAD::B2 # ; IRONCLAD::B3 # ; IRONCLAD::B4 # ; IRONCLAD::B5 # ; ...) ; (MACROLET (#) ; (IRONCLAD::ARX IRONCLAD::K16 IRONCLAD::T2 IRONCLAD::K0 19 ; IRONCLAD::K14 IRONCLAD::K15 IRONCLAD::T1 IRONCLAD::K12 IRONCLAD::K13 ; IRONCLAD::K10 IRONCLAD::K11 ...) ; (IRONCLAD::ARX IRONCLAD::K14 IRONCLAD::T0 IRONCLAD::K15 17 ; IRONCLAD::K12 IRONCLAD::K13 IRONCLAD::T2 IRONCLAD::K10 IRONCLAD::K11 ; IRONCLAD::K8 IRONCLAD::K9 ...) ; (IRONCLAD::ARX IRONCLAD::K12 IRONCLAD::T1 IRONCLAD::K13 15 ; IRONCLAD::K10 IRONCLAD::K11 IRONCLAD::T0 IRONCLAD::K8 IRONCLAD::K9 ; IRONCLAD::K6 IRONCLAD::K7 ...) ; (IRONCLAD::ARX IRONCLAD::K10 IRONCLAD::T2 IRONCLAD::K11 13 ; IRONCLAD::K8 IRONCLAD::K9 IRONCLAD::T1 IRONCLAD::K6 IRONCLAD::K7 ; IRONCLAD::K4 IRONCLAD::K5 ...) ; (IRONCLAD::ARX IRONCLAD::K8 IRONCLAD::T0 IRONCLAD::K9 11 IRONCLAD::K6 ; IRONCLAD::K7 IRONCLAD::T2 IRONCLAD::K4 IRONCLAD::K5 IRONCLAD::K2 ; IRONCLAD::K3 ...) ; (IRONCLAD::ARX IRONCLAD::K6 IRONCLAD::T1 IRONCLAD::K7 9 IRONCLAD::K4 ; IRONCLAD::K5 IRONCLAD::T0 IRONCLAD::K2 IRONCLAD::K3 IRONCLAD::K0 ; IRONCLAD::K1 ...) ; (IRONCLAD::ARX IRONCLAD::K4 IRONCLAD::T2 IRONCLAD::K5 7 IRONCLAD::K2 ; IRONCLAD::K3 IRONCLAD::T1 IRONCLAD::K0 IRONCLAD::K1 IRONCLAD::K15 ; IRONCLAD::K16 ...) ; (IRONCLAD::ARX IRONCLAD::K2 IRONCLAD::T0 IRONCLAD::K3 5 IRONCLAD::K0 ; IRONCLAD::K1 IRONCLAD::T2 IRONCLAD::K15 IRONCLAD::K16 IRONCLAD::K13 ; IRONCLAD::K14 ...) ; (IRONCLAD::ARX IRONCLAD::K0 IRONCLAD::T1 IRONCLAD::K1 3 IRONCLAD::K15 ; IRONCLAD::K16 IRONCLAD::T0 IRONCLAD::K13 IRONCLAD::K14 IRONCLAD::K11 ; IRONCLAD::K12 ...) ; (IRONCLAD::ARX IRONCLAD::K15 IRONCLAD::T2 IRONCLAD::K16 1 ; IRONCLAD::K13 IRONCLAD::K14 IRONCLAD::T1 IRONCLAD::K11 IRONCLAD::K12 ; IRONCLAD::K9 IRONCLAD::K10 ...)) ; (IRONCLAD::STORE-WORDS IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START ; IRONCLAD::B0 IRONCLAD::B1 IRONCLAD::B2 IRONCLAD::B3 IRONCLAD::B4 ; IRONCLAD::B5 IRONCLAD::B6 IRONCLAD::B7 IRONCLAD::B8 ...) ; (VALUES)))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 8) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 8 8) (INTEGER 24 24) (INTEGER 40 40) ; (INTEGER 56) (INTEGER 48 48) (INTEGER 32 32) ; (INTEGER 16 16)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/threefish.lisp ; in: DEFINE-BLOCK-DECRYPTOR THREEFISH1024 ; (IRONCLAD::ARX IRONCLAD::K16 IRONCLAD::T2 IRONCLAD::K0 19 IRONCLAD::K14 ; IRONCLAD::K15 IRONCLAD::T1 IRONCLAD::K12 IRONCLAD::K13 IRONCLAD::K10 ; IRONCLAD::K11 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B12) 20) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B10) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B8) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B14) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B4) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B6) 35) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B2) 48) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B0) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B10) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B8) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B14) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B12) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B8) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B14) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B12) 53) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B10) 4) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B4) 51) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B6) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B2) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B14) 30) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B12) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B10) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B8) 12) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B12) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B10) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B8) 28) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B14) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B4) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B6) 48) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B2) 20) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B0 IRONCLAD::B15) 5) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B10) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B8) 59) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B14) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B12) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 51) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 4) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B8) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B14) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B12) 18) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B10) 49) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B4) 55) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B6) 10) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B2) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B0) 38) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B14) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B12) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B10) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B8) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::ARX IRONCLAD::K14 IRONCLAD::T0 IRONCLAD::K15 17 IRONCLAD::K12 ; IRONCLAD::K13 IRONCLAD::T2 IRONCLAD::K10 IRONCLAD::K11 IRONCLAD::K8 ; IRONCLAD::K9 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B12) 20) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B10) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B8) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B14) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B4) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B6) 35) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B2) 48) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B0) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B10) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B8) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B14) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B12) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B8) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B14) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B12) 53) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B10) 4) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B4) 51) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B6) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B2) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B14) 30) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B12) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B10) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B8) 12) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B12) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B10) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B8) 28) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B14) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B4) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B6) 48) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B2) 20) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B0 IRONCLAD::B15) 5) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B10) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B8) 59) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B14) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B12) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 51) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 4) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B8) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B14) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B12) 18) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B10) 49) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B4) 55) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B6) 10) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B2) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B0) 38) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B14) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B12) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B10) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B8) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::ARX IRONCLAD::K12 IRONCLAD::T1 IRONCLAD::K13 15 IRONCLAD::K10 ; IRONCLAD::K11 IRONCLAD::T0 IRONCLAD::K8 IRONCLAD::K9 IRONCLAD::K6 ; IRONCLAD::K7 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B12) 20) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B10) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B8) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B14) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B4) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B6) 35) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B2) 48) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B0) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B10) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B8) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B14) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B12) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B8) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B14) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B12) 53) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B10) 4) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B4) 51) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B6) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B2) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B14) 30) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B12) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B10) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B8) 12) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B12) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B10) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B8) 28) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B14) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B4) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B6) 48) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B2) 20) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B0 IRONCLAD::B15) 5) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B10) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B8) 59) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B14) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B12) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 51) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 4) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B8) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B14) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B12) 18) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B10) 49) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B4) 55) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B6) 10) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B2) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B0) 38) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B14) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B12) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B10) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B8) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::ARX IRONCLAD::K10 IRONCLAD::T2 IRONCLAD::K11 13 IRONCLAD::K8 ; IRONCLAD::K9 IRONCLAD::T1 IRONCLAD::K6 IRONCLAD::K7 IRONCLAD::K4 ; IRONCLAD::K5 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B12) 20) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B10) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B8) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B14) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B4) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B6) 35) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B2) 48) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B0) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B10) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B8) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B14) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B12) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B8) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B14) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B12) 53) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B10) 4) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B4) 51) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B6) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B2) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B14) 30) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B12) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B10) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B8) 12) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B12) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B10) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B8) 28) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B14) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B4) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B6) 48) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B2) 20) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B0 IRONCLAD::B15) 5) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B10) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B8) 59) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B14) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B12) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 51) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 4) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B8) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B14) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B12) 18) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B10) 49) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B4) 55) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B6) 10) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B2) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B0) 38) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B14) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B12) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B10) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B8) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::ARX IRONCLAD::K8 IRONCLAD::T0 IRONCLAD::K9 11 IRONCLAD::K6 ; IRONCLAD::K7 IRONCLAD::T2 IRONCLAD::K4 IRONCLAD::K5 IRONCLAD::K2 ; IRONCLAD::K3 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B12) 20) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B10) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B8) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B14) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B4) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B6) 35) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B2) 48) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B0) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B10) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B8) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B14) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B12) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B8) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B14) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B12) 53) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B10) 4) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B4) 51) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B6) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B2) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B14) 30) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B12) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B10) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B8) 12) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B12) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B10) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B8) 28) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B14) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B4) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B6) 48) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B2) 20) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B0 IRONCLAD::B15) 5) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B10) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B8) 59) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B14) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B12) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 51) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 4) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B8) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B14) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B12) 18) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B10) 49) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B4) 55) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B6) 10) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B2) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B0) 38) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B14) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B12) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B10) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B8) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::ARX IRONCLAD::K6 IRONCLAD::T1 IRONCLAD::K7 9 IRONCLAD::K4 ; IRONCLAD::K5 IRONCLAD::T0 IRONCLAD::K2 IRONCLAD::K3 IRONCLAD::K0 ; IRONCLAD::K1 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B12) 20) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B10) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B8) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B14) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B4) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B6) 35) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B2) 48) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B0) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B10) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B8) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B14) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B12) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B8) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B14) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B12) 53) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B10) 4) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B4) 51) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B6) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B2) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B14) 30) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B12) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B10) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B8) 12) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B12) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B10) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B8) 28) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B14) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B4) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B6) 48) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B2) 20) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B0 IRONCLAD::B15) 5) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B10) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B8) 59) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B14) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B12) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 51) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 4) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B8) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B14) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B12) 18) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B10) 49) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B4) 55) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B6) 10) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B2) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B0) 38) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B14) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B12) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B10) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B8) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::ARX IRONCLAD::K4 IRONCLAD::T2 IRONCLAD::K5 7 IRONCLAD::K2 ; IRONCLAD::K3 IRONCLAD::T1 IRONCLAD::K0 IRONCLAD::K1 IRONCLAD::K15 ; IRONCLAD::K16 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B12) 20) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B10) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B8) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B14) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B4) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B6) 35) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B2) 48) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B0) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B10) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B8) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B14) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B12) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B8) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B14) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B12) 53) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B10) 4) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B4) 51) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B6) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B2) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B14) 30) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B12) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B10) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B8) 12) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B12) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B10) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B8) 28) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B14) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B4) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B6) 48) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B2) 20) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B0 IRONCLAD::B15) 5) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B10) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B8) 59) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B14) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B12) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 51) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 4) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B8) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B14) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B12) 18) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B10) 49) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B4) 55) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B6) 10) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B2) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B0) 38) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B14) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B12) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B10) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B8) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::ARX IRONCLAD::K2 IRONCLAD::T0 IRONCLAD::K3 5 IRONCLAD::K0 ; IRONCLAD::K1 IRONCLAD::T2 IRONCLAD::K15 IRONCLAD::K16 IRONCLAD::K13 ; IRONCLAD::K14 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B12) 20) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B10) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B8) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B14) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B4) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B6) 35) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B2) 48) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B0) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B10) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B8) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B14) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B12) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B8) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B14) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B12) 53) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B10) 4) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B4) 51) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B6) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B2) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B14) 30) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B12) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B10) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B8) 12) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B12) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B10) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B8) 28) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B14) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B4) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B6) 48) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B2) 20) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B0 IRONCLAD::B15) 5) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B10) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B8) 59) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B14) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B12) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 51) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 4) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B8) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B14) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B12) 18) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B10) 49) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B4) 55) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B6) 10) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B2) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B0) 38) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B14) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B12) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B10) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B8) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::ARX IRONCLAD::K0 IRONCLAD::T1 IRONCLAD::K1 3 IRONCLAD::K15 ; IRONCLAD::K16 IRONCLAD::T0 IRONCLAD::K13 IRONCLAD::K14 IRONCLAD::K11 ; IRONCLAD::K12 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B12) 20) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B10) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B8) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B14) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B4) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B6) 35) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B2) 48) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B0) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B10) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B8) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B14) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B12) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B8) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B14) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B12) 53) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B10) 4) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B4) 51) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B6) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B2) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B14) 30) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B12) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B10) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B8) 12) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B12) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B10) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B8) 28) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B14) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B4) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B6) 48) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B2) 20) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B0 IRONCLAD::B15) 5) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B10) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B8) 59) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B14) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B12) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 51) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 4) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B8) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B14) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B12) 18) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B10) 49) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B4) 55) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B6) 10) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B2) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B0) 38) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B14) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B12) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B10) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B8) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::ARX IRONCLAD::K15 IRONCLAD::T2 IRONCLAD::K16 1 IRONCLAD::K13 ; IRONCLAD::K14 IRONCLAD::T1 IRONCLAD::K11 IRONCLAD::K12 IRONCLAD::K9 ; IRONCLAD::K10 ...) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B12) 20) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B10) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B8) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B14) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B4) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B6) 35) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B2) 48) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B0) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B10) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B8) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B14) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B12) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 46) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B8) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B14) 42) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B12) 53) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B10) 4) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B4) 51) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B6) 56) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B2) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B14) 30) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B12) 44) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B10) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B8) 12) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 31) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 9) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B12) 25) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B10) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B8) 28) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B14) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B4) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B6) 48) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B2) 20) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B0 IRONCLAD::B15) 5) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B10) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B8) 59) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B14) 41) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B12) 34) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B6) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B4) 51) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B2) 4) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B0) 33) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B8) 52) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B14) 23) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B12) 18) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B10) 49) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B4) 55) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B6) 10) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B2) 19) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B0) 38) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B15 IRONCLAD::B14) 37) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B13 IRONCLAD::B12) 22) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B11 IRONCLAD::B10) 17) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B9 IRONCLAD::B8) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B7 IRONCLAD::B6) 47) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B5 IRONCLAD::B4) 8) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B3 IRONCLAD::B2) 13) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::B1 IRONCLAD::B0) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; processing (DEFCIPHER THREEFISH1024 ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/threefish-tmp4RNSVVC1.fasl ; compilation finished in 0:00:07.544 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/twofish.lisp" (written 18 FEB 2022 01:39:10 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/twofish.lisp ; in: DEFUN TWOFISH-KEY-SCHEDULE ; (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :INITIAL-ELEMENT 0) ; ; note: could not stack allocate: ; (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :INITIAL-ELEMENT 0) ; processing (MACROLET (# # ...) ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/twofish.lisp ; in: ; MACROLET ((S-BOX (S-BOXES WHICH INDEX) ; `(AREF ,S-BOXES (+ (* 256 ,WHICH) ,INDEX))) ; (S-BOX-0 (S-BOXES INDEX) `(S-BOX ,S-BOXES 0 ,INDEX)) ; (S-BOX-1 (S-BOXES INDEX) `(S-BOX ,S-BOXES 1 ,INDEX)) ; (S-BOX-2 (S-BOXES INDEX) `(S-BOX ,S-BOXES 2 ,INDEX)) ; (S-BOX-3 (S-BOXES INDEX) `(S-BOX ,S-BOXES 3 ,INDEX))) ; (MACROLET ((IRONCLAD::S-BOX ; (IRONCLAD::S-BOXES IRONCLAD::WHICH IRONCLAD::INDEX) ; `(AREF ,IRONCLAD::S-BOXES (+ # ,IRONCLAD::INDEX))) ; (IRONCLAD::S-BOX-0 (IRONCLAD::S-BOXES IRONCLAD::INDEX) ; `(IRONCLAD::S-BOX ,IRONCLAD::S-BOXES 0 ,IRONCLAD::INDEX)) ; (IRONCLAD::S-BOX-1 (IRONCLAD::S-BOXES IRONCLAD::INDEX) ; `(IRONCLAD::S-BOX ,IRONCLAD::S-BOXES 1 ,IRONCLAD::INDEX)) ; (IRONCLAD::S-BOX-2 (IRONCLAD::S-BOXES IRONCLAD::INDEX) ; `(IRONCLAD::S-BOX ,IRONCLAD::S-BOXES 2 ,IRONCLAD::INDEX)) ; (IRONCLAD::S-BOX-3 (IRONCLAD::S-BOXES IRONCLAD::INDEX) ; `(IRONCLAD::S-BOX ,IRONCLAD::S-BOXES 3 ,IRONCLAD::INDEX))) ; (DEFUN IRONCLAD::TWOFISH-SCHEDULE-16-BYTE-KEY ; (IRONCLAD::ROUND-KEYS IRONCLAD::S-BOXES IRONCLAD::KEY IRONCLAD::BOX) ; (DECLARE (TYPE IRONCLAD::TWOFISH-ROUND-KEYS IRONCLAD::ROUND-KEYS) ; (TYPE IRONCLAD::TWOFISH-S-BOXES IRONCLAD::S-BOXES) ; (TYPE (IRONCLAD::SIMPLE-OCTET-VECTOR 16) IRONCLAD::KEY ; IRONCLAD::BOX)) ; (MACROLET ((IRONCLAD::Q-FROB # ; #)) ; (DOTIMES (IRONCLAD::I 256) (SETF #)) ; (LOOP IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM 0 IRONCLAD::BELOW 40 IRONCLAD::BY 2 ; DO (LET # ; # ; # ; # ; # ; #) ; IRONCLAD::FINALLY ...))) ; (DEFUN IRONCLAD::TWOFISH-SCHEDULE-24-BYTE-KEY ; (IRONCLAD::ROUND-KEYS IRONCLAD::S-BOXES IRONCLAD::KEY IRONCLAD::BOX) ; (DECLARE (TYPE IRONCLAD::TWOFISH-ROUND-KEYS IRONCLAD::ROUND-KEYS) ; (TYPE IRONCLAD::TWOFISH-S-BOXES IRONCLAD::S-BOXES) ; (TYPE (IRONCLAD::SIMPLE-OCTET-VECTOR 24) IRONCLAD::KEY) ; (TYPE (IRONCLAD::SIMPLE-OCTET-VECTOR 16) IRONCLAD::BOX)) ; (MACROLET ((IRONCLAD::Q-FROB # ; #)) ; (DOTIMES (IRONCLAD::I 256) (SETF #)) ; (LOOP IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM 0 IRONCLAD::BELOW 40 IRONCLAD::BY 2 ; DO (LET # ; # ; # ; # ; # ; #) ; IRONCLAD::FINALLY ...))) ; (DEFUN IRONCLAD::TWOFISH-SCHEDULE-32-BYTE-KEY ; (IRONCLAD::ROUND-KEYS IRONCLAD::S-BOXES IRONCLAD::KEY IRONCLAD::BOX) ; (DECLARE (TYPE IRONCLAD::TWOFISH-ROUND-KEYS IRONCLAD::ROUND-KEYS) ; (TYPE IRONCLAD::TWOFISH-S-BOXES IRONCLAD::S-BOXES) ; (TYPE (IRONCLAD::SIMPLE-OCTET-VECTOR 32) IRONCLAD::KEY) ; (TYPE (IRONCLAD::SIMPLE-OCTET-VECTOR 16) IRONCLAD::BOX)) ; (MACROLET ((IRONCLAD::Q-FROB # ; #)) ; (DOTIMES (IRONCLAD::I 256) (SETF #)) ; (LOOP IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM 0 IRONCLAD::BELOW 40 IRONCLAD::BY 2 ; DO (LET # ; # ; # ; # ; # ; #) ; IRONCLAD::FINALLY ...))) ; (IRONCLAD::DEFINE-BLOCK-ENCRYPTOR IRONCLAD:TWOFISH ; 16 ; (LET ((IRONCLAD::ROUND-KEYS #) (IRONCLAD::S-BOXES #)) ; (DECLARE (TYPE IRONCLAD::TWOFISH-ROUND-KEYS IRONCLAD::ROUND-KEYS)) ; (DECLARE (TYPE IRONCLAD::TWOFISH-S-BOXES IRONCLAD::S-BOXES)) ; (MACROLET (#) ; (IRONCLAD::WITH-WORDS # ; # ; # ; # ; # ; #)))) ; (IRONCLAD::DEFINE-BLOCK-DECRYPTOR IRONCLAD:TWOFISH ; 16 ; (LET ((IRONCLAD::ROUND-KEYS #) (IRONCLAD::S-BOXES #)) ; (DECLARE (TYPE IRONCLAD::TWOFISH-ROUND-KEYS IRONCLAD::ROUND-KEYS)) ; (DECLARE (TYPE IRONCLAD::TWOFISH-S-BOXES IRONCLAD::S-BOXES)) ; (MACROLET (#) ; (IRONCLAD::WITH-WORDS # ; # ; # ; # ; # ; #))))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/twofish.lisp ; in: ; MACROLET ((S-BOX (S-BOXES WHICH INDEX) ; `(AREF ,S-BOXES (+ (* 256 ,WHICH) ,INDEX))) ; (S-BOX-0 (S-BOXES INDEX) `(S-BOX ,S-BOXES 0 ,INDEX)) ; (S-BOX-1 (S-BOXES INDEX) `(S-BOX ,S-BOXES 1 ,INDEX)) ; (S-BOX-2 (S-BOXES INDEX) `(S-BOX ,S-BOXES 2 ,INDEX)) ; (S-BOX-3 (S-BOXES INDEX) `(S-BOX ,S-BOXES 3 ,INDEX))) ; (MACROLET ((IRONCLAD::S-BOX ; (IRONCLAD::S-BOXES IRONCLAD::WHICH IRONCLAD::INDEX) ; `(AREF ,IRONCLAD::S-BOXES (+ # ,IRONCLAD::INDEX))) ; (IRONCLAD::S-BOX-0 (IRONCLAD::S-BOXES IRONCLAD::INDEX) ; `(IRONCLAD::S-BOX ,IRONCLAD::S-BOXES 0 ,IRONCLAD::INDEX)) ; (IRONCLAD::S-BOX-1 (IRONCLAD::S-BOXES IRONCLAD::INDEX) ; `(IRONCLAD::S-BOX ,IRONCLAD::S-BOXES 1 ,IRONCLAD::INDEX)) ; (IRONCLAD::S-BOX-2 (IRONCLAD::S-BOXES IRONCLAD::INDEX) ; `(IRONCLAD::S-BOX ,IRONCLAD::S-BOXES 2 ,IRONCLAD::INDEX)) ; (IRONCLAD::S-BOX-3 (IRONCLAD::S-BOXES IRONCLAD::INDEX) ; `(IRONCLAD::S-BOX ,IRONCLAD::S-BOXES 3 ,IRONCLAD::INDEX))) ; (DEFUN IRONCLAD::TWOFISH-SCHEDULE-16-BYTE-KEY ; (IRONCLAD::ROUND-KEYS IRONCLAD::S-BOXES IRONCLAD::KEY IRONCLAD::BOX) ; (DECLARE (TYPE IRONCLAD::TWOFISH-ROUND-KEYS IRONCLAD::ROUND-KEYS) ; (TYPE IRONCLAD::TWOFISH-S-BOXES IRONCLAD::S-BOXES) ; (TYPE (IRONCLAD::SIMPLE-OCTET-VECTOR 16) IRONCLAD::KEY ; IRONCLAD::BOX)) ; (MACROLET ((IRONCLAD::Q-FROB # ; #)) ; (DOTIMES (IRONCLAD::I 256) (SETF #)) ; (LOOP IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM 0 IRONCLAD::BELOW 40 IRONCLAD::BY 2 ; DO (LET # ; # ; # ; # ; # ; #) ; IRONCLAD::FINALLY ...))) ; (DEFUN IRONCLAD::TWOFISH-SCHEDULE-24-BYTE-KEY ; (IRONCLAD::ROUND-KEYS IRONCLAD::S-BOXES IRONCLAD::KEY IRONCLAD::BOX) ; (DECLARE (TYPE IRONCLAD::TWOFISH-ROUND-KEYS IRONCLAD::ROUND-KEYS) ; (TYPE IRONCLAD::TWOFISH-S-BOXES IRONCLAD::S-BOXES) ; (TYPE (IRONCLAD::SIMPLE-OCTET-VECTOR 24) IRONCLAD::KEY) ; (TYPE (IRONCLAD::SIMPLE-OCTET-VECTOR 16) IRONCLAD::BOX)) ; (MACROLET ((IRONCLAD::Q-FROB # ; #)) ; (DOTIMES (IRONCLAD::I 256) (SETF #)) ; (LOOP IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM 0 IRONCLAD::BELOW 40 IRONCLAD::BY 2 ; DO (LET # ; # ; # ; # ; # ; #) ; IRONCLAD::FINALLY ...))) ; (DEFUN IRONCLAD::TWOFISH-SCHEDULE-32-BYTE-KEY ; (IRONCLAD::ROUND-KEYS IRONCLAD::S-BOXES IRONCLAD::KEY IRONCLAD::BOX) ; (DECLARE (TYPE IRONCLAD::TWOFISH-ROUND-KEYS IRONCLAD::ROUND-KEYS) ; (TYPE IRONCLAD::TWOFISH-S-BOXES IRONCLAD::S-BOXES) ; (TYPE (IRONCLAD::SIMPLE-OCTET-VECTOR 32) IRONCLAD::KEY) ; (TYPE (IRONCLAD::SIMPLE-OCTET-VECTOR 16) IRONCLAD::BOX)) ; (MACROLET ((IRONCLAD::Q-FROB # ; #)) ; (DOTIMES (IRONCLAD::I 256) (SETF #)) ; (LOOP IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM 0 IRONCLAD::BELOW 40 IRONCLAD::BY 2 ; DO (LET # ; # ; # ; # ; # ; #) ; IRONCLAD::FINALLY ...))) ; (IRONCLAD::DEFINE-BLOCK-ENCRYPTOR IRONCLAD:TWOFISH ; 16 ; (LET ((IRONCLAD::ROUND-KEYS #) (IRONCLAD::S-BOXES #)) ; (DECLARE (TYPE IRONCLAD::TWOFISH-ROUND-KEYS IRONCLAD::ROUND-KEYS)) ; (DECLARE (TYPE IRONCLAD::TWOFISH-S-BOXES IRONCLAD::S-BOXES)) ; (MACROLET (#) ; (IRONCLAD::WITH-WORDS # ; # ; # ; # ; # ; #)))) ; (IRONCLAD::DEFINE-BLOCK-DECRYPTOR IRONCLAD:TWOFISH ; 16 ; (LET ((IRONCLAD::ROUND-KEYS #) (IRONCLAD::S-BOXES #)) ; (DECLARE (TYPE IRONCLAD::TWOFISH-ROUND-KEYS IRONCLAD::ROUND-KEYS)) ; (DECLARE (TYPE IRONCLAD::TWOFISH-S-BOXES IRONCLAD::S-BOXES)) ; (MACROLET (#) ; (IRONCLAD::WITH-WORDS # ; # ; # ; # ; # ; #))))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFCIPHER TWOFISH ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/twofish-tmpN626KU7B.fasl ; compilation finished in 0:00:00.520 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/xor.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/xor-tmpOO0K1B0C.fasl ; compilation finished in 0:00:00.020 ; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/xtea.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCONSTANT +XTEA-N-ROUNDS+ ...) ; processing (DEFCONSTANT +XTEA-DELTA+ ...) ; processing (DEFCLASS XTEA ...) ; processing (DEFINE-BLOCK-ENCRYPTOR XTEA ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/xtea.lisp ; in: DEFINE-BLOCK-ENCRYPTOR XTEA ; (IRONCLAD::DEFINE-BLOCK-ENCRYPTOR IRONCLAD:XTEA ; 8 ; (IRONCLAD::WITH-WORDS ((IRONCLAD::Y IRONCLAD::Z) IRONCLAD::PLAINTEXT ; IRONCLAD::PLAINTEXT-START) ; (LET ((IRONCLAD::KEY #) (IRONCLAD::SUM 0)) ; (DECLARE (TYPE # IRONCLAD::KEY)) ; (DECLARE (TYPE # IRONCLAD::SUM)) ; (DOTIMES (IRONCLAD::I IRONCLAD::+XTEA-N-ROUNDS+) ; (SETF #) ; (SETF #) ; (SETF #)) ; (IRONCLAD::STORE-WORDS IRONCLAD::CIPHERTEXT IRONCLAD::CIPHERTEXT-START ; IRONCLAD::Y IRONCLAD::Z)))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; processing (DEFINE-BLOCK-DECRYPTOR XTEA ...) ; file: /usr/share/common-lisp/source/ironclad/src/ciphers/xtea.lisp ; in: DEFINE-BLOCK-DECRYPTOR XTEA ; (IRONCLAD::DEFINE-BLOCK-DECRYPTOR IRONCLAD:XTEA ; 8 ; (IRONCLAD::WITH-WORDS ((IRONCLAD::Y IRONCLAD::Z) IRONCLAD::CIPHERTEXT ; IRONCLAD::CIPHERTEXT-START) ; (LET ((IRONCLAD::KEY #) (IRONCLAD::SUM #)) ; (DECLARE (TYPE # IRONCLAD::KEY)) ; (DECLARE (TYPE # IRONCLAD::SUM)) ; (DOTIMES (IRONCLAD::I IRONCLAD::+XTEA-N-ROUNDS+) ; (SETF #) ; (SETF #) ; (SETF #)) ; (IRONCLAD::STORE-WORDS IRONCLAD::PLAINTEXT IRONCLAD::PLAINTEXT-START ; IRONCLAD::Y IRONCLAD::Z)))) ; --> SB-INT:BINDING* LET* BLOCK LOOP BLOCK LET LET ; --> SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY SB-LOOP::LOOP-DESETQ ; --> SETQ THE ; ==> ; (+ IRONCLAD::OFFSET 4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1=(INTEGER 0 0)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8) #1#), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (INTEGER 4 4) (INTEGER 12 12) (INTEGER 20 20) ; (INTEGER 28) (INTEGER 24 24) (INTEGER 16 16) ; (INTEGER 8 8)) ; . #2#), not a (VALUES (UNSIGNED-BYTE 64) . #2#). ; etc. ; processing (DEFMETHOD SCHEDULE-KEY ...) ; processing (DEFCIPHER XTEA ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/ciphers/xtea-tmpVFL7JAFK.fasl ; compilation finished in 0:00:00.160 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/adler32.lisp" (written 18 FEB 2022 01:39:10 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) ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/adler32.lisp ; in: DEFINE-DIGEST-FINALIZER (ADLER32 4) ; (ASH (IRONCLAD::ADLER32-S2 IRONCLAD::STATE) 16) ; ; note: forced to do */SIGNED=>INTEGER (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The result is a (VALUES ; (INTEGER -302231454903657293676544 ; 302231454903657293611008) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The result is a (VALUES ; (INTEGER -302231454903657293676544 ; 302231454903657293611008) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (LOGIOR (ASH (IRONCLAD::ADLER32-S2 IRONCLAD::STATE) 16) ; (IRONCLAD::ADLER32-S1 IRONCLAD::STATE)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -302231454903657293676544 ; 302231454903657293611008), not a FIXNUM. ; The result is a (VALUES (SIGNED-BYTE 79) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because: ; The first argument is a (INTEGER -302231454903657293676544 ; 302231454903657293611008), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (SIGNED-BYTE 79) . #1#), not a (VALUES ; (SIGNED-BYTE 64) ; . #1#). ; etc. ; processing (DEFDIGEST ADLER32 ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/digests/adler32-tmpU45RTF.fasl ; compilation finished in 0:00:00.120 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/blake2.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DEFUN BLAKE2-MAKE-INITIAL-STATE ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN BLAKE2-ROUNDS ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/blake2.lisp ; in: DEFUN BLAKE2-ROUNDS ; (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 64) :INITIAL-ELEMENT 0) ; ; note: could not stack allocate: ; (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 64) :INITIAL-ELEMENT 0) ; (LDB (BYTE 64 0) IRONCLAD::OFFSET) ; ; note: forced to do LOGAND-WORD-MASK (cost 10) ; unable to do #1=inline (unsigned-byte 64) arithmetic (cost 3) because: ; The first argument is a (UNSIGNED-BYTE 128), not a (UNSIGNED-BYTE 64). ; unable to do #1# (cost 3) because: ; The first argument is a (UNSIGNED-BYTE 128), not a (SIGNED-BYTE 64). ; (LDB (BYTE 64 64) IRONCLAD::OFFSET) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (UNSIGNED-BYTE 128), not a FIXNUM. ; The result is a (VALUES (UNSIGNED-BYTE 64) . #2=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #2#). ; unable to do #1# (cost 3) because: ; The first argument is a (UNSIGNED-BYTE 128), not a (UNSIGNED-BYTE 64). ; etc. ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V0 IRONCLAD::V4 IRONCLAD::V8 IRONCLAD::V12 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 0)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 1))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V8) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V8) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V1 IRONCLAD::V5 IRONCLAD::V9 IRONCLAD::V13 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 2)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 3))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V1) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V9) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V1) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V9) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V2 IRONCLAD::V6 IRONCLAD::V10 ; IRONCLAD::V14 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 4)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 5))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V10) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V10) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V3 IRONCLAD::V7 IRONCLAD::V11 ; IRONCLAD::V15 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 6)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 7))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V3) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V11) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V3) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V11) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V0 IRONCLAD::V5 IRONCLAD::V10 ; IRONCLAD::V15 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 8)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 9))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V10) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V10) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V1 IRONCLAD::V6 IRONCLAD::V11 ; IRONCLAD::V12 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 10)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 11))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V1) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V11) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V1) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V11) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V2 IRONCLAD::V7 IRONCLAD::V8 IRONCLAD::V13 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 12)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 13))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V8) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V8) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V3 IRONCLAD::V4 IRONCLAD::V9 IRONCLAD::V14 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 14)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 15))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V3) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V9) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V3) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V9) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V0 IRONCLAD::V4 IRONCLAD::V8 IRONCLAD::V12 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 0)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 1))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V8) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V8) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V1 IRONCLAD::V5 IRONCLAD::V9 IRONCLAD::V13 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 2)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 3))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V1) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V9) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V1) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V9) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V2 IRONCLAD::V6 IRONCLAD::V10 ; IRONCLAD::V14 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 4)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 5))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V10) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V10) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V3 IRONCLAD::V7 IRONCLAD::V11 ; IRONCLAD::V15 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 6)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 7))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V3) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V11) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V3) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V11) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V0 IRONCLAD::V5 IRONCLAD::V10 ; IRONCLAD::V15 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 8)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 9))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V10) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V10) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V1 IRONCLAD::V6 IRONCLAD::V11 ; IRONCLAD::V12 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 10)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 11))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V1) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V11) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V1) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V11) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V2 IRONCLAD::V7 IRONCLAD::V8 IRONCLAD::V13 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 12)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 13))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V8) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V8) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V3 IRONCLAD::V4 IRONCLAD::V9 IRONCLAD::V14 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 14)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 15))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V3) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V9) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V3) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V9) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V0 IRONCLAD::V4 IRONCLAD::V8 IRONCLAD::V12 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 0)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 1))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V8) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V8) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V1 IRONCLAD::V5 IRONCLAD::V9 IRONCLAD::V13 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 2)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 3))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V1) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V9) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V1) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V9) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V2 IRONCLAD::V6 IRONCLAD::V10 ; IRONCLAD::V14 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 4)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 5))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V10) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V10) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V3 IRONCLAD::V7 IRONCLAD::V11 ; IRONCLAD::V15 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 6)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 7))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V3) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V11) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V3) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V11) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V0 IRONCLAD::V5 IRONCLAD::V10 ; IRONCLAD::V15 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 8)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 9))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V10) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V10) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V1 IRONCLAD::V6 IRONCLAD::V11 ; IRONCLAD::V12 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 10)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 11))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V1) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V11) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V1) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V11) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V2 IRONCLAD::V7 IRONCLAD::V8 IRONCLAD::V13 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 12)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 13))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V8) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V8) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V3 IRONCLAD::V4 IRONCLAD::V9 IRONCLAD::V14 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 14)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 15))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V3) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V9) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V3) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V9) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V0 IRONCLAD::V4 IRONCLAD::V8 IRONCLAD::V12 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 0)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 1))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V8) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V8) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V1 IRONCLAD::V5 IRONCLAD::V9 IRONCLAD::V13 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 2)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 3))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V1) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V9) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V1) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V9) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V2 IRONCLAD::V6 IRONCLAD::V10 ; IRONCLAD::V14 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 4)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 5))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V10) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V10) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V3 IRONCLAD::V7 IRONCLAD::V11 ; IRONCLAD::V15 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 6)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 7))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V3) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V11) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V3) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V11) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V0 IRONCLAD::V5 IRONCLAD::V10 ; IRONCLAD::V15 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 8)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 9))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V10) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V10) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V1 IRONCLAD::V6 IRONCLAD::V11 ; IRONCLAD::V12 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 10)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 11))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V1) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V11) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V1) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V11) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V2 IRONCLAD::V7 IRONCLAD::V8 IRONCLAD::V13 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 12)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 13))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V8) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V8) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V3 IRONCLAD::V4 IRONCLAD::V9 IRONCLAD::V14 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 14)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 15))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V3) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V9) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V3) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V9) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V0 IRONCLAD::V4 IRONCLAD::V8 IRONCLAD::V12 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 0)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 1))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V8) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V8) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V1 IRONCLAD::V5 IRONCLAD::V9 IRONCLAD::V13 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 2)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 3))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V1) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V9) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V1) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V9) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V2 IRONCLAD::V6 IRONCLAD::V10 ; IRONCLAD::V14 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 4)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 5))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V10) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V10) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V3 IRONCLAD::V7 IRONCLAD::V11 ; IRONCLAD::V15 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 6)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 7))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V3) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V11) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V3) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V11) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V0 IRONCLAD::V5 IRONCLAD::V10 ; IRONCLAD::V15 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 8)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 9))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V10) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V10) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V1 IRONCLAD::V6 IRONCLAD::V11 ; IRONCLAD::V12 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 10)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 11))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V1) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V11) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V1) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V11) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V2 IRONCLAD::V7 IRONCLAD::V8 IRONCLAD::V13 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 12)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 13))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V8) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V8) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V3 IRONCLAD::V4 IRONCLAD::V9 IRONCLAD::V14 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 14)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 15))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V3) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V9) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V3) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V9) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V0 IRONCLAD::V4 IRONCLAD::V8 IRONCLAD::V12 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 0)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 1))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V8) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V8) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V1 IRONCLAD::V5 IRONCLAD::V9 IRONCLAD::V13 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 2)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 3))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V1) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V9) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V1) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V9) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V2 IRONCLAD::V6 IRONCLAD::V10 ; IRONCLAD::V14 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 4)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 5))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V10) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V10) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V3 IRONCLAD::V7 IRONCLAD::V11 ; IRONCLAD::V15 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 6)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 7))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V3) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V11) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V3) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V11) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V0 IRONCLAD::V5 IRONCLAD::V10 ; IRONCLAD::V15 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 8)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 9))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V10) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V10) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V1 IRONCLAD::V6 IRONCLAD::V11 ; IRONCLAD::V12 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 10)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 11))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V1) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V11) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V1) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V11) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V2 IRONCLAD::V7 IRONCLAD::V8 IRONCLAD::V13 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 12)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 13))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V8) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V8) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V3 IRONCLAD::V4 IRONCLAD::V9 IRONCLAD::V14 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 14)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 15))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V3) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V9) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V3) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V9) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V0 IRONCLAD::V4 IRONCLAD::V8 IRONCLAD::V12 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 0)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 1))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V8) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V8) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V1 IRONCLAD::V5 IRONCLAD::V9 IRONCLAD::V13 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 2)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 3))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V1) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V9) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V1) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V9) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V2 IRONCLAD::V6 IRONCLAD::V10 ; IRONCLAD::V14 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 4)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 5))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V10) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V10) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V3 IRONCLAD::V7 IRONCLAD::V11 ; IRONCLAD::V15 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 6)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 7))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V3) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V11) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V3) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V11) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V0 IRONCLAD::V5 IRONCLAD::V10 ; IRONCLAD::V15 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 8)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 9))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V10) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V10) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V1 IRONCLAD::V6 IRONCLAD::V11 ; IRONCLAD::V12 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 10)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 11))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V1) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V11) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V1) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V11) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V2 IRONCLAD::V7 IRONCLAD::V8 IRONCLAD::V13 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 12)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 13))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V8) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V8) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V3 IRONCLAD::V4 IRONCLAD::V9 IRONCLAD::V14 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 14)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 15))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V3) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V9) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V3) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V9) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V0 IRONCLAD::V4 IRONCLAD::V8 IRONCLAD::V12 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 0)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 1))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V8) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V8) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V1 IRONCLAD::V5 IRONCLAD::V9 IRONCLAD::V13 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 2)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 3))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V1) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V9) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V1) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V9) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V2 IRONCLAD::V6 IRONCLAD::V10 ; IRONCLAD::V14 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 4)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 5))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V10) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V10) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V3 IRONCLAD::V7 IRONCLAD::V11 ; IRONCLAD::V15 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 6)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 7))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V3) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V11) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V3) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V11) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V0 IRONCLAD::V5 IRONCLAD::V10 ; IRONCLAD::V15 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 8)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 9))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V10) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V10) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V1 IRONCLAD::V6 IRONCLAD::V11 ; IRONCLAD::V12 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 10)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 11))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V1) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V11) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V1) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V11) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V2 IRONCLAD::V7 IRONCLAD::V8 IRONCLAD::V13 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 12)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 13))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V8) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V8) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V3 IRONCLAD::V4 IRONCLAD::V9 IRONCLAD::V14 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 14)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 15))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V3) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V9) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V3) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V9) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V0 IRONCLAD::V4 IRONCLAD::V8 IRONCLAD::V12 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 0)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 1))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V8) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V8) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V1 IRONCLAD::V5 IRONCLAD::V9 IRONCLAD::V13 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 2)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 3))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V1) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V9) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V1) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V9) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V2 IRONCLAD::V6 IRONCLAD::V10 ; IRONCLAD::V14 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 4)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 5))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V10) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V10) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V3 IRONCLAD::V7 IRONCLAD::V11 ; IRONCLAD::V15 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 6)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 7))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V3) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V11) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V3) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V11) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V0 IRONCLAD::V5 IRONCLAD::V10 ; IRONCLAD::V15 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 8)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 9))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V10) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V10) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V1 IRONCLAD::V6 IRONCLAD::V11 ; IRONCLAD::V12 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 10)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 11))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V1) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V11) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V1) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V11) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V2 IRONCLAD::V7 IRONCLAD::V8 IRONCLAD::V13 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 12)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 13))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V8) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V8) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V3 IRONCLAD::V4 IRONCLAD::V9 IRONCLAD::V14 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 14)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 15))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V3) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V9) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V3) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V9) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V0 IRONCLAD::V4 IRONCLAD::V8 IRONCLAD::V12 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 0)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 1))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V8) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V8) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V1 IRONCLAD::V5 IRONCLAD::V9 IRONCLAD::V13 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 2)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 3))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V1) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V9) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V1) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V9) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V2 IRONCLAD::V6 IRONCLAD::V10 ; IRONCLAD::V14 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 4)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 5))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V10) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V10) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V3 IRONCLAD::V7 IRONCLAD::V11 ; IRONCLAD::V15 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 6)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 7))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V3) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V11) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V3) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V11) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V0 IRONCLAD::V5 IRONCLAD::V10 ; IRONCLAD::V15 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 8)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 9))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V10) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V10) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V1 IRONCLAD::V6 IRONCLAD::V11 ; IRONCLAD::V12 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 10)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 11))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V1) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V11) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V1) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V11) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V2 IRONCLAD::V7 IRONCLAD::V8 IRONCLAD::V13 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 12)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 13))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V8) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V8) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V3 IRONCLAD::V4 IRONCLAD::V9 IRONCLAD::V14 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 14)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 15))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V3) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V9) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V3) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V9) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V0 IRONCLAD::V4 IRONCLAD::V8 IRONCLAD::V12 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 0)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 1))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V8) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V8) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V1 IRONCLAD::V5 IRONCLAD::V9 IRONCLAD::V13 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 2)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 3))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V1) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V9) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V1) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V9) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V2 IRONCLAD::V6 IRONCLAD::V10 ; IRONCLAD::V14 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 4)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 5))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V10) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V10) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V3 IRONCLAD::V7 IRONCLAD::V11 ; IRONCLAD::V15 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 6)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 7))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V3) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V11) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V3) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V11) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V0 IRONCLAD::V5 IRONCLAD::V10 ; IRONCLAD::V15 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 8)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 9))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V10) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V10) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V1 IRONCLAD::V6 IRONCLAD::V11 ; IRONCLAD::V12 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 10)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 11))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V1) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V11) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V1) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V11) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V2 IRONCLAD::V7 IRONCLAD::V8 IRONCLAD::V13 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 12)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 13))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V8) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V8) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V3 IRONCLAD::V4 IRONCLAD::V9 IRONCLAD::V14 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 14)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 15))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V3) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V9) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V3) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V9) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V0 IRONCLAD::V4 IRONCLAD::V8 IRONCLAD::V12 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 0)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 1))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V8) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V8) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V1 IRONCLAD::V5 IRONCLAD::V9 IRONCLAD::V13 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 2)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 3))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V1) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V9) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V1) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V9) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V2 IRONCLAD::V6 IRONCLAD::V10 ; IRONCLAD::V14 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 4)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 5))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V10) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V10) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V3 IRONCLAD::V7 IRONCLAD::V11 ; IRONCLAD::V15 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 6)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 7))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V3) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V11) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V3) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V11) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V0 IRONCLAD::V5 IRONCLAD::V10 ; IRONCLAD::V15 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 8)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 9))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V0) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V10) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V15 IRONCLAD::V0) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V5 IRONCLAD::V10) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V1 IRONCLAD::V6 IRONCLAD::V11 ; IRONCLAD::V12 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 10)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 11))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V1) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V11) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V12 IRONCLAD::V1) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V6 IRONCLAD::V11) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V2 IRONCLAD::V7 IRONCLAD::V8 IRONCLAD::V13 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 12)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 13))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V2) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V8) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V13 IRONCLAD::V2) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V7 IRONCLAD::V8) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; (IRONCLAD::BLAKE2-MIXING IRONCLAD::V3 IRONCLAD::V4 IRONCLAD::V9 IRONCLAD::V14 ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 14)) ; (AREF IRONCLAD::M (AREF IRONCLAD::+BLAKE2-SIGMA+ IRONCLAD::I 15))) ; --> PROGN SETF SETQ THE ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V3) 32) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V9) 24) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V14 IRONCLAD::V3) 16) ; ; note: doing unsigned word to integer coercion (cost 20) ; ==> ; (IRONCLAD::ROR64 (LOGXOR IRONCLAD::V4 IRONCLAD::V9) 63) ; ; note: doing unsigned word to integer coercion (cost 20) ; 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/blake2.lisp ; in: DEFUN BLAKE2-UPDATE ; (INCF IRONCLAD::OFFSET IRONCLAD::N) ; --> THE ; ==> ; (+ IRONCLAD::N IRONCLAD::OFFSET) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a (UNSIGNED-BYTE 128), not a FIXNUM. ; The result is a (VALUES (UNSIGNED-BYTE 128) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -4611686018427387904 128), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (UNSIGNED-BYTE 128), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (UNSIGNED-BYTE 128) . #1#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #1#). ; etc. ; (INCF IRONCLAD::OFFSET IRONCLAD::+BLAKE2-BLOCK-SIZE+) ; --> THE ; ==> ; (+ IRONCLAD::+BLAKE2-BLOCK-SIZE+ IRONCLAD::OFFSET) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (UNSIGNED-BYTE 128), not a FIXNUM. ; The result is a (VALUES ; (INTEGER 128 340282366920938463463374607431768211455) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (UNSIGNED-BYTE 128), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER 128 340282366920938463463374607431768211455) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (INCF IRONCLAD::OFFSET LENGTH) ; --> THE ; ==> ; (+ LENGTH IRONCLAD::OFFSET) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a (UNSIGNED-BYTE 128), not a FIXNUM. ; The result is a (VALUES ; (INTEGER 1 340282366920938463463374607431768211455) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The second argument is a (UNSIGNED-BYTE 128), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER 1 340282366920938463463374607431768211455) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/digests/blake2-tmpZTS6G7ND.fasl ; compilation finished in 0:00:01.604 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/blake2s.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DEFUN BLAKE2S-MAKE-INITIAL-STATE ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN BLAKE2S-ROUNDS ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/blake2s.lisp ; in: DEFUN BLAKE2S-ROUNDS ; (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 32) :INITIAL-ELEMENT 0) ; ; note: could not stack allocate: ; (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 32) :INITIAL-ELEMENT 0) ; 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/blake2s.lisp ; in: DEFUN BLAKE2S-UPDATE ; (INCF IRONCLAD::OFFSET IRONCLAD::N) ; --> THE ; ==> ; (+ IRONCLAD::N IRONCLAD::OFFSET) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM. ; The result is a (VALUES (UNSIGNED-BYTE 64) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -4611686018427387904 64), not a (UNSIGNED-BYTE ; 64). ; etc. ; --> THE + ; ==> ; IRONCLAD::OFFSET ; ; note: doing unsigned word to integer coercion (cost 20) from OFFSET ; (IRONCLAD::BLAKE2S-ROUNDS IRONCLAD::BLAKE2S-STATE IRONCLAD::INPUT ; IRONCLAD::START IRONCLAD::OFFSET NIL) ; ; note: doing unsigned word to integer coercion (cost 20) from OFFSET ; (IRONCLAD::BLAKE2S-ROUNDS IRONCLAD::BLAKE2S-STATE IRONCLAD::BUFFER 0 ; IRONCLAD::OFFSET IRONCLAD::FINAL) ; ; note: doing unsigned word to integer coercion (cost 20) from OFFSET ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/digests/blake2s-tmp5TNBATEG.fasl ; compilation finished in 0:00:00.496 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/crc24.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/digests/crc24-tmpJL6JXW7Z.fasl ; compilation finished in 0:00:00.060 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/crc32.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/digests/crc32-tmp5PQ00DH7.fasl ; compilation finished in 0:00:00.100 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/groestl.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/groestl.lisp ; in: DEFUN GROESTL-F512 ; (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; processing (DEFUN GROESTL-F1024 ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/groestl.lisp ; in: DEFUN GROESTL-F1024 ; (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/groestl.lisp ; in: DEFUN GROESTL-UPDATE ; (INCF IRONCLAD::BLOCK-COUNTER) ; --> THE ; ==> ; (+ 1 IRONCLAD::BLOCK-COUNTER) ; ; note: forced to do +/UNSIGNED=>INTEGER (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM. ; The result is a (VALUES (INTEGER 1 18446744073709551616) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES (INTEGER 1 18446744073709551616) . #1#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #1#). ; etc. ; ; 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 (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (LET* ((IRONCLAD::GROESTL-STATE (IRONCLAD::GROESTL-STATE IRONCLAD::STATE)) ; (IRONCLAD::BUFFER (IRONCLAD::GROESTL-BUFFER IRONCLAD::STATE)) ; (IRONCLAD::BUFFER-INDEX ; (IRONCLAD::GROESTL-BUFFER-INDEX IRONCLAD::STATE)) ; (IRONCLAD::BLOCK-COUNTER ; (IRONCLAD::GROESTL-BLOCK-COUNTER IRONCLAD::STATE)) ; (IRONCLAD::BLOCK-SIZE (LENGTH IRONCLAD::BUFFER)) ; (IRONCLAD::TRANSFORM ; (IF (= IRONCLAD::BLOCK-SIZE IRONCLAD::+GROESTL-SIZE-512+) ; #'IRONCLAD::GROESTL-F512 ; #'IRONCLAD::GROESTL-F1024)) ; (LENGTH (- IRONCLAD::END IRONCLAD::START)) ; (IRONCLAD::N 0)) ; (DECLARE ; (TYPE (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) IRONCLAD::GROESTL-STATE) ; (TYPE (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) IRONCLAD::BUFFER) ; (TYPE (INTEGER 0 128) IRONCLAD::BLOCK-SIZE IRONCLAD::BUFFER-INDEX ; IRONCLAD::N) ; (TYPE (UNSIGNED-BYTE 64) LENGTH)) ; (SETF IRONCLAD::N ; (MIN LENGTH (- IRONCLAD::BLOCK-SIZE IRONCLAD::BUFFER-INDEX))) ; (REPLACE IRONCLAD::BUFFER IRONCLAD::INPUT :START1 IRONCLAD::BUFFER-INDEX ; :START2 IRONCLAD::START :END2 (+ IRONCLAD::START IRONCLAD::N)) ; (INCF IRONCLAD::BUFFER-INDEX IRONCLAD::N) ; (INCF IRONCLAD::START IRONCLAD::N) ; (DECF LENGTH IRONCLAD::N) ; (WHEN (= IRONCLAD::BUFFER-INDEX IRONCLAD::BLOCK-SIZE) ; (FUNCALL IRONCLAD::TRANSFORM IRONCLAD::GROESTL-STATE IRONCLAD::BUFFER 0) ; (SETF IRONCLAD::BUFFER-INDEX 0) ; (INCF IRONCLAD::BLOCK-COUNTER)) ; (LOOP IRONCLAD::UNTIL (< LENGTH IRONCLAD::BLOCK-SIZE) ; DO (FUNCALL IRONCLAD::TRANSFORM IRONCLAD::GROESTL-STATE ; IRONCLAD::INPUT IRONCLAD::START) (INCF ; IRONCLAD::BLOCK-COUNTER) (INCF ; IRONCLAD::START ; IRONCLAD::BLOCK-SIZE) (DECF ; LENGTH ; IRONCLAD::BLOCK-SIZE)) ; (WHEN (PLUSP LENGTH) ; (REPLACE IRONCLAD::BUFFER IRONCLAD::INPUT :END1 LENGTH :START2 ; IRONCLAD::START) ; (SETF IRONCLAD::BUFFER-INDEX LENGTH)) ; (SETF (IRONCLAD::GROESTL-BLOCK-COUNTER IRONCLAD::STATE) ; IRONCLAD::BLOCK-COUNTER ; (IRONCLAD::GROESTL-BUFFER-INDEX IRONCLAD::STATE) ; IRONCLAD::BUFFER-INDEX) ; ...) ; ; note: doing unsigned word to integer coercion (cost 20) to BLOCK-COUNTER ; (FUNCALL IRONCLAD::TRANSFORM IRONCLAD::GROESTL-STATE IRONCLAD::INPUT ; IRONCLAD::START) ; ; note: doing unsigned word to integer coercion (cost 20) from START ; processing (DEFUN GROESTL-FINALIZE ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/groestl.lisp ; in: DEFUN GROESTL-FINALIZE ; (- IRONCLAD::BLOCK-SIZE IRONCLAD:DIGEST-LENGTH) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (REPLACE IRONCLAD::DIGEST IRONCLAD::OUTPUT :START1 IRONCLAD::DIGEST-START ; :START2 (- IRONCLAD::BLOCK-SIZE IRONCLAD:DIGEST-LENGTH)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * . #1=((*))). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY * . #1#) ; &REST T). ; (COPY-SEQ IRONCLAD::GROESTL-STATE) ; ; note: could not stack allocate SB-C::RESULT in: (COPY-SEQ GROESTL-STATE) ; (MAKE-ARRAY IRONCLAD::+GROESTL-COLS-512+ :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: ; (MAKE-ARRAY +GROESTL-COLS-512+ :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: ; (MAKE-ARRAY +GROESTL-COLS-512+ :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; (COPY-SEQ IRONCLAD::GROESTL-STATE) ; ; note: could not stack allocate SB-C::RESULT in: (COPY-SEQ GROESTL-STATE) ; (MAKE-ARRAY IRONCLAD::+GROESTL-COLS-1024+ :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: ; (MAKE-ARRAY +GROESTL-COLS-1024+ :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: ; (MAKE-ARRAY +GROESTL-COLS-1024+ :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; (INCF IRONCLAD::BLOCK-COUNTER) ; --> THE ; ==> ; (+ 1 IRONCLAD::BLOCK-COUNTER) ; ; note: forced to do +/UNSIGNED=>INTEGER (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM. ; The result is a (VALUES (INTEGER 1 18446744073709551616) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES (INTEGER 1 18446744073709551616) . #1#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD 18446744073709551617), not a FIXNUM. ; The result is a (VALUES (INTEGER 1 18446744073709551617) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD 18446744073709551617), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (INTEGER 1 18446744073709551617) . #1#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #1#). ; etc. ; (- IRONCLAD::BLOCK-SIZE IRONCLAD:DIGEST-LENGTH) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a NUMBER, not a FIXNUM. ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; etc. ; (LET* ((IRONCLAD:DIGEST-LENGTH (IRONCLAD:DIGEST-LENGTH IRONCLAD::STATE)) ; (IRONCLAD::GROESTL-STATE (IRONCLAD::GROESTL-STATE IRONCLAD::STATE)) ; (IRONCLAD::BUFFER (IRONCLAD::GROESTL-BUFFER IRONCLAD::STATE)) ; (IRONCLAD::BUFFER-INDEX ; (IRONCLAD::GROESTL-BUFFER-INDEX IRONCLAD::STATE)) ; (IRONCLAD::BLOCK-COUNTER ; (IRONCLAD::GROESTL-BLOCK-COUNTER IRONCLAD::STATE)) ; (IRONCLAD::BLOCK-SIZE (LENGTH IRONCLAD::BUFFER)) ; (IRONCLAD::TRANSFORM ; (IF (= IRONCLAD::BLOCK-SIZE IRONCLAD::+GROESTL-SIZE-512+) ; #'IRONCLAD::GROESTL-F512 ; #'IRONCLAD::GROESTL-F1024))) ; (DECLARE ; (TYPE (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*)) IRONCLAD::GROESTL-STATE) ; (TYPE (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) IRONCLAD::BUFFER) ; (TYPE (INTEGER 0 128) IRONCLAD::BLOCK-SIZE IRONCLAD::BUFFER-INDEX) ; (OPTIMIZE (SPEED 3) (SPACE 0) (SAFETY 0) (DEBUG 0))) ; (SETF (AREF IRONCLAD::BUFFER IRONCLAD::BUFFER-INDEX) 128) ; (INCF IRONCLAD::BUFFER-INDEX) ; (WHEN ; (> IRONCLAD::BUFFER-INDEX ; (- IRONCLAD::BLOCK-SIZE IRONCLAD::+GROESTL-LENGTH-FIELD-LENGTH+)) ; (FILL IRONCLAD::BUFFER 0 :START IRONCLAD::BUFFER-INDEX) ; (FUNCALL IRONCLAD::TRANSFORM IRONCLAD::GROESTL-STATE IRONCLAD::BUFFER 0) ; (INCF IRONCLAD::BLOCK-COUNTER) ; (SETF IRONCLAD::BUFFER-INDEX 0)) ; (FILL IRONCLAD::BUFFER 0 :START IRONCLAD::BUFFER-INDEX) ; (SETF IRONCLAD::BUFFER-INDEX ; (- IRONCLAD::BLOCK-SIZE IRONCLAD::+GROESTL-LENGTH-FIELD-LENGTH+)) ; (INCF IRONCLAD::BLOCK-COUNTER) ; (SETF (IRONCLAD:UB64REF/BE IRONCLAD::BUFFER IRONCLAD::BUFFER-INDEX) ; IRONCLAD::BLOCK-COUNTER) ; (FUNCALL IRONCLAD::TRANSFORM IRONCLAD::GROESTL-STATE IRONCLAD::BUFFER 0) ; (IF (= IRONCLAD::BLOCK-SIZE IRONCLAD::+GROESTL-SIZE-512+) ; (LET ((IRONCLAD::TEMP #) (IRONCLAD::Y #) (IRONCLAD::Z #)) ; (DECLARE (TYPE # IRONCLAD::TEMP IRONCLAD::Y IRONCLAD::Z) ; (DYNAMIC-EXTENT IRONCLAD::TEMP IRONCLAD::Y IRONCLAD::Z)) ; (IRONCLAD::GROESTL-RND512P IRONCLAD::TEMP IRONCLAD::Z 0) ; (LOOP IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM 1 IRONCLAD::BELOW (1- ; IRONCLAD::+GROESTL-ROUNDS-512+) IRONCLAD::BY 2 ; DO (IRONCLAD::GROESTL-RND512P IRONCLAD::Z IRONCLAD::Y ; #) (IRONCLAD::GROESTL-RND512P IRONCLAD::Y IRONCLAD::Z #)) ; (IRONCLAD::GROESTL-RND512P IRONCLAD::Z IRONCLAD::TEMP (ASH # 56)) ; (DOTIMES (IRONCLAD::I IRONCLAD::+GROESTL-COLS-512+) (SETF #))) ; (LET ((IRONCLAD::TEMP #) (IRONCLAD::Y #) (IRONCLAD::Z #)) ; (DECLARE (TYPE # IRONCLAD::TEMP IRONCLAD::Y IRONCLAD::Z) ; (DYNAMIC-EXTENT IRONCLAD::TEMP IRONCLAD::Y IRONCLAD::Z)) ; (IRONCLAD::GROESTL-RND1024P IRONCLAD::TEMP IRONCLAD::Y 0) ; (LOOP IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM 1 IRONCLAD::BELOW (1- ; IRONCLAD::+GROESTL-ROUNDS-1024+) IRONCLAD::BY 2 ; DO (IRONCLAD::GROESTL-RND1024P IRONCLAD::Y IRONCLAD::Z ; #) (IRONCLAD::GROESTL-RND1024P IRONCLAD::Z IRONCLAD::Y #)) ; (IRONCLAD::GROESTL-RND1024P IRONCLAD::Y IRONCLAD::TEMP (ASH # 56)) ; (DOTIMES (IRONCLAD::I IRONCLAD::+GROESTL-COLS-1024+) (SETF #)))) ; ...) ; ; note: doing unsigned word to integer coercion (cost 20) to BLOCK-COUNTER ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/digests/groestl-tmp5R1KP4O2.fasl ; compilation finished in 0:00:07.492 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/jh.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/jh.lisp ; in: DEFUN JH-F8 ; (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/digests/jh-tmpXQDKKJYI.fasl ; compilation finished in 0:00:00.968 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/kupyna.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/kupyna.lisp ; in: DEFUN KUPYNA-OUTPUT-TRANSFORM256 ; (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; processing (DEFUN KUPYNA-TRANSFORM256 ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/kupyna.lisp ; in: DEFUN KUPYNA-TRANSFORM256 ; (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/kupyna.lisp ; in: DEFUN KUPYNA-OUTPUT-TRANSFORM512 ; (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; processing (DEFUN KUPYNA-TRANSFORM512 ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/kupyna.lisp ; in: DEFUN KUPYNA-TRANSFORM512 ; (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; processing (DEFSTRUCT (KUPYNA # ...) ...) ; processing (DEFSTRUCT (KUPYNA/256 # ...)) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFINE-DIGEST-UPDATER KUPYNA ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/kupyna.lisp ; in: DEFINE-DIGEST-UPDATER KUPYNA ; (INCF IRONCLAD::START 64) ; --> THE ; ==> ; (+ 64 IRONCLAD::START) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (INCF IRONCLAD::START 128) ; --> THE ; ==> ; (+ 128 IRONCLAD::START) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (INCF IRONCLAD::START 64) ; --> THE ; ==> ; (+ 64 IRONCLAD::START) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (INCF IRONCLAD::START 128) ; --> THE ; ==> ; (+ 128 IRONCLAD::START) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (INCF IRONCLAD::START IRONCLAD::N) ; ; note: doing signed word to integer coercion (cost 20) to START ; processing (DEFINE-DIGEST-FINALIZER (# #) ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/kupyna.lisp ; in: DEFINE-DIGEST-FINALIZER ((KUPYNA 64) (KUPYNA/256 32)) ; (- IRONCLAD:BLOCK-LENGTH 12) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (SINGLE-FLOAT 13.0) (DOUBLE-FLOAT 13.0d0) ; (RATIONAL 13)), not a FLOAT. ; (- IRONCLAD:BLOCK-LENGTH IRONCLAD:DIGEST-LENGTH) ; ; note: unable to ; open-code float conversion in mixed 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 in mixed 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 in mixed 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 in mixed 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 in mixed 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 in mixed 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 ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (INCF IRONCLAD::TOTAL (* 8 IRONCLAD::BUFFER-INDEX)) ; --> THE ; ==> ; (+ (* 8 IRONCLAD::BUFFER-INDEX) IRONCLAD::TOTAL) ; ; note: forced to do +/UNSIGNED=>INTEGER (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a (UNSIGNED-BYTE 64), not a FIXNUM. ; The result is a (VALUES (MOD 18446744073709552640) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES (MOD 18446744073709552640) . #1#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #1#). ; etc. ; (> (+ IRONCLAD::BUFFER-INDEX 12) IRONCLAD:BLOCK-LENGTH) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The second argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (- IRONCLAD:BLOCK-LENGTH 12) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (SINGLE-FLOAT 13.0) (DOUBLE-FLOAT 13.0d0) ; (RATIONAL 13)), not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL 1) (DOUBLE-FLOAT 1.0d0) ; (SINGLE-FLOAT 1.0)) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (SINGLE-FLOAT 13.0) (DOUBLE-FLOAT 13.0d0) ; (RATIONAL 13)), not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL 1) (DOUBLE-FLOAT 1.0d0) ; (SINGLE-FLOAT 1.0)) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- IRONCLAD:BLOCK-LENGTH IRONCLAD:DIGEST-LENGTH) ; ; note: forced to do full call ; 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 T, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; . #2#). ; unable to do #1# (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 . #2#), not a (VALUES SINGLE-FLOAT . #2#). ; etc. ; (LET ((IRONCLAD:BLOCK-LENGTH (IRONCLAD:BLOCK-LENGTH IRONCLAD::STATE)) ; (IRONCLAD:DIGEST-LENGTH (IRONCLAD:DIGEST-LENGTH IRONCLAD::STATE)) ; (IRONCLAD::BUFFER (IRONCLAD::KUPYNA-BUFFER IRONCLAD::STATE)) ; (IRONCLAD::BUFFER-INDEX ; (IRONCLAD::KUPYNA-BUFFER-INDEX IRONCLAD::STATE)) ; (IRONCLAD::H (IRONCLAD::KUPYNA-H IRONCLAD::STATE)) ; (IRONCLAD::TOTAL (IRONCLAD::KUPYNA-TOTAL IRONCLAD::STATE))) ; (INCF IRONCLAD::TOTAL (* 8 IRONCLAD::BUFFER-INDEX)) ; (SETF (AREF IRONCLAD::BUFFER IRONCLAD::BUFFER-INDEX) 128) ; (INCF IRONCLAD::BUFFER-INDEX) ; (WHEN (> (+ IRONCLAD::BUFFER-INDEX 12) IRONCLAD:BLOCK-LENGTH) ; (FILL IRONCLAD::BUFFER 0 :START IRONCLAD::BUFFER-INDEX) ; (ECASE IRONCLAD:BLOCK-LENGTH ; (64 (IRONCLAD::KUPYNA-TRANSFORM256 IRONCLAD::H IRONCLAD::BUFFER 0)) ; (128 (IRONCLAD::KUPYNA-TRANSFORM512 IRONCLAD::H IRONCLAD::BUFFER 0))) ; (SETF IRONCLAD::BUFFER-INDEX 0)) ; (FILL IRONCLAD::BUFFER 0 :START IRONCLAD::BUFFER-INDEX) ; (SETF (IRONCLAD:UB64REF/LE IRONCLAD::BUFFER (- IRONCLAD:BLOCK-LENGTH 12)) ; IRONCLAD::TOTAL) ; (ECASE IRONCLAD:BLOCK-LENGTH ; (64 ; (IRONCLAD::KUPYNA-TRANSFORM256 IRONCLAD::H IRONCLAD::BUFFER 0) ; (IRONCLAD::KUPYNA-OUTPUT-TRANSFORM256 IRONCLAD::H)) ; (128 ; (IRONCLAD::KUPYNA-TRANSFORM512 IRONCLAD::H IRONCLAD::BUFFER 0) ; (IRONCLAD::KUPYNA-OUTPUT-TRANSFORM512 IRONCLAD::H))) ; (LET ((IRONCLAD::OUTPUT (MAKE-ARRAY 128 :ELEMENT-TYPE '#))) ; (DOTIMES (IRONCLAD::I 16) (SETF # #)) ; (REPLACE IRONCLAD::DIGEST IRONCLAD::OUTPUT :START1 IRONCLAD::DIGEST-START ; :START2 (- IRONCLAD:BLOCK-LENGTH IRONCLAD:DIGEST-LENGTH) :END2 ; IRONCLAD:BLOCK-LENGTH) ; IRONCLAD::DIGEST)) ; ; note: doing unsigned word to integer coercion (cost 20) to TOTAL ; processing (DEFDIGEST KUPYNA ...) ; processing (DEFDIGEST KUPYNA/256 ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/digests/kupyna-tmpGJ3P31TF.fasl ; compilation finished in 0:00:04.176 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/md2.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (IN-IRONCLAD-READTABLE) ; processing (DEFCONST +MD2-PERMUTATION+ ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL) ...) ; processing (DEFUN UPDATE-MD2-REGS ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/md2.lisp ; in: DEFUN UPDATE-MD2-REGS ; (+ IRONCLAD::I IRONCLAD::OFFSET) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The second argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The second argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The second argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DECLAIM (INLINE MD2REGS-DIGEST)) ; processing (DEFUN MD2REGS-DIGEST ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/md2.lisp ; in: DEFUN MD2REGS-DIGEST ; (+ IRONCLAD::START IRONCLAD::I) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFSTRUCT (MD2 # ...) ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFINE-DIGEST-UPDATER MD2 ...) ; processing (DEFINE-DIGEST-FINALIZER (MD2 16) ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/md2.lisp ; in: DEFINE-DIGEST-FINALIZER (MD2 16) ; (IRONCLAD::FINALIZE-REGISTERS IRONCLAD::STATE IRONCLAD::REGS) ; --> BLOCK FLET IRONCLAD::STUFF-REGISTERS BLOCK DOTIMES DO BLOCK LET TAGBODY ; --> TAGBODY SETF LET* ; ==> ; (+ IRONCLAD::START IRONCLAD::I) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFDIGEST MD2 ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/digests/md2-tmpT2P2LFJI.fasl ; compilation finished in 0:00:00.340 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/md4.lisp" (written 18 FEB 2022 01:39:10 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) ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/md4.lisp ; in: DEFINE-DIGEST-FINALIZER (MD4 16) ; (* 8 (IRONCLAD::MD4-AMOUNT IRONCLAD::STATE)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (IRONCLAD::STORE-DATA-LENGTH BLOCK IRONCLAD::TOTAL-LENGTH 14) ; --> BLOCK LET SETF PROGN SETF LET* LDB ; ==> ; 1 ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; 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) ; . #2#). ; etc. ; processing (DEFDIGEST MD4 ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/digests/md4-tmpKOV75BS9.fasl ; compilation finished in 0:00:00.252 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/md5.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (PROGN (DEFINE-DIGEST-REGISTERS # ...) ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/md5.lisp ; in: DEFUN UPDATE-MD5-BLOCK ; (1- IRONCLAD::I) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (AREF IRONCLAD::*T* (1- IRONCLAD::I)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-ARRAY. ; (1- IRONCLAD::I) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; etc. ; file: /usr/share/common-lisp/source/ironclad/src/digests/md5.lisp ; in: DEFINE-DIGEST-FINALIZER (MD5 16) ; (* 8 (IRONCLAD::MD5-AMOUNT IRONCLAD::STATE)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (IRONCLAD::STORE-DATA-LENGTH BLOCK IRONCLAD::TOTAL-LENGTH 14) ; --> BLOCK LET SETF PROGN SETF LET* LDB ; ==> ; 1 ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; 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) ; . #2#). ; etc. ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/digests/md5-tmpP07HWIXP.fasl ; compilation finished in 0:00:00.228 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/md5-lispworks-int32.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CL-USER) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/digests/md5-lispworks-int32-tmpURW0SA3C.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/ripemd-128.lisp" (written 18 FEB 2022 01:39:10 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) ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/ripemd-128.lisp ; in: DEFINE-DIGEST-FINALIZER (RIPEMD-128 16) ; (* 8 (IRONCLAD::RIPEMD-128-AMOUNT IRONCLAD::STATE)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (IRONCLAD::STORE-DATA-LENGTH BLOCK IRONCLAD::TOTAL-LENGTH 14) ; --> BLOCK LET SETF PROGN SETF LET* LDB ; ==> ; 1 ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; 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) ; . #2#). ; etc. ; processing (DEFDIGEST RIPEMD-128 ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/digests/ripemd-128-tmp627QKRZN.fasl ; compilation finished in 0:00:00.304 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/ripemd-160.lisp" (written 18 FEB 2022 01:39:10 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) ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/ripemd-160.lisp ; in: DEFINE-DIGEST-FINALIZER (RIPEMD-160 20) ; (* 8 (IRONCLAD::RIPEMD-160-AMOUNT IRONCLAD::STATE)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (IRONCLAD::STORE-DATA-LENGTH BLOCK IRONCLAD::TOTAL-LENGTH 14) ; --> BLOCK LET SETF PROGN SETF LET* LDB ; ==> ; 1 ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; 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) ; . #2#). ; etc. ; processing (DEFDIGEST RIPEMD-160 ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/digests/ripemd-160-tmpK8OFNZFV.fasl ; compilation finished in 0:00:00.648 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/sha1.lisp" (written 18 FEB 2022 01:39:10 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/sha1.lisp ; in: DEFUN UPDATE-SHA1-BLOCK ; (LOOP IRONCLAD::FOR IRONCLAD::I IRONCLAD::FROM IRONCLAD::LOW IRONCLAD::UPTO IRONCLAD::HIGH ; IRONCLAD::FOR IRONCLAD::VARS IRONCLAD::ON IRONCLAD::XVARS IRONCLAD::BY ...) ; --> LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY WHEN IF ; ==> ; (> IRONCLAD::I #:LOOP-LIMIT-1) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; --> LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY ; --> SB-LOOP::LOOP-DESETQ SETQ THE 1+ ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a REAL, not a RATIONAL. ; --> LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY WHEN IF ; ==> ; (> IRONCLAD::I #:LOOP-LIMIT-1) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: forced to do full call ; 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. ; --> LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY ; --> SB-LOOP::LOOP-DESETQ SETQ THE 1+ ; ==> ; 1 ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; --> LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY WHEN IF ; ==> ; (> IRONCLAD::I #:LOOP-LIMIT-1) ; ; note: forced to do full call ; 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 (DECLAIM (INLINE EXPAND-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) ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/sha1.lisp ; in: DEFINE-DIGEST-FINALIZER (SHA1 20) ; (* 8 (IRONCLAD::SHA1-AMOUNT IRONCLAD::STATE)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (IRONCLAD::STORE-DATA-LENGTH BLOCK IRONCLAD::TOTAL-LENGTH 14 T) ; --> BLOCK LET SETF PROGN SETF LET* LDB ; ==> ; 1 ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; 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) ; . #2#). ; etc. ; processing (DEFDIGEST SHA1 ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/digests/sha1-tmpRMCY5COB.fasl ; compilation finished in 0:00:00.344 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/sha256.lisp" (written 18 FEB 2022 01:39:10 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 (# #) ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/sha256.lisp ; in: DEFINE-DIGEST-FINALIZER ((SHA256 32) (SHA224 28)) ; (* 8 (IRONCLAD::SHA256-AMOUNT IRONCLAD::STATE)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (IRONCLAD::STORE-DATA-LENGTH BLOCK IRONCLAD::TOTAL-LENGTH 14 T) ; --> BLOCK LET SETF PROGN SETF LET* LDB ; ==> ; 1 ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; 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) ; . #2#). ; etc. ; processing (DEFDIGEST SHA256 ...) ; processing (DEFDIGEST SHA224 ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/digests/sha256-tmp9TN1FOJ6.fasl ; compilation finished in 0:00:01.180 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/sha3.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DEFTYPE KECCAK-LANE ...) ; processing (DEFTYPE KECCAK-STATE ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DEFMACRO GET-KECCAK-ROTATE-OFFSET ...) ; processing (DECLAIM (INLINE GET-KECCAK-ROUND-CONSTANT) ...) ; processing (DEFUN GET-KECCAK-ROUND-CONSTANT ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/sha3.lisp ; in: DEFUN GET-KECCAK-ROUND-CONSTANT ; (DEFUN IRONCLAD::GET-KECCAK-ROUND-CONSTANT (IRONCLAD::I) ; (DECLARE (TYPE (INTEGER 0 23) IRONCLAD::I) ; (OPTIMIZE (SPEED 3) (SPACE 0) (SAFETY 0) (DEBUG 0))) ; (LET ((IRONCLAD::CONSTANTS ; (LOAD-TIME-VALUE IRONCLAD::+KECCAK-ROUND-CONSTANTS+ T))) ; (DECLARE ; (TYPE (SIMPLE-ARRAY IRONCLAD::KECCAK-LANE #) IRONCLAD::CONSTANTS)) ; (AREF IRONCLAD::CONSTANTS IRONCLAD::I))) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA IRONCLAD::GET-KECCAK-ROUND-CONSTANT ; (IRONCLAD::I) ; (DECLARE (TYPE (INTEGER 0 23) IRONCLAD::I) ; (OPTIMIZE (SPEED 3) (SPACE 0) (SAFETY 0) (DEBUG 0))) ; (BLOCK IRONCLAD::GET-KECCAK-ROUND-CONSTANT ; (LET ((IRONCLAD::CONSTANTS #)) ; (DECLARE (TYPE # IRONCLAD::CONSTANTS)) ; (AREF IRONCLAD::CONSTANTS IRONCLAD::I)))) ; ; note: doing unsigned word to integer coercion (cost 20) to "" ; 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/sha3.lisp ; in: DEFUN KECCAK-ROUNDS ; (DEFUN IRONCLAD::KECCAK-ROUNDS (IRONCLAD::STATE) ; (DECLARE (TYPE IRONCLAD::KECCAK-STATE IRONCLAD::STATE) ; (OPTIMIZE (SPEED 3) (SPACE 0) (SAFETY 0) (DEBUG 0))) ; (IRONCLAD::WITH-KECCAK-STATE-ACCESSORS (IRONCLAD::STATE) ; (IRONCLAD::WITH-TEMP-KECCAK-STATE (IRONCLAD::B) ; (IRONCLAD::WITH-TEMP-KECCAK-ROWS (IRONCLAD::C IRONCLAD::D) ; (DOTIMES # # # # # # #)))) ; (VALUES)) ; --> SB-INT:BINDING* LET* BLOCK LET AREF ; ==> ; 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. ; file: /usr/share/common-lisp/source/ironclad/src/digests/sha3.lisp ; in: DEFUN KECCAK-ROUNDS ; (IRONCLAD::TEMP-ROW-AREF IRONCLAD::C ; (MOD (1+ IRONCLAD::X) IRONCLAD::+KECCAK-STATE-COLUMNS+)) ; ; note: doing unsigned word to integer coercion (cost 20) from #:C-1 ; ; note: doing unsigned word to integer coercion (cost 20) from #:C-2 ; ; note: doing unsigned word to integer coercion (cost 20) from #:C-3 ; ; note: doing unsigned word to integer coercion (cost 20) from #:C-4 ; ; note: doing unsigned word to integer coercion (cost 20) from #:C-0 ; (IRONCLAD::STATE-AREF IRONCLAD::STATE IRONCLAD::X IRONCLAD::Y) ; ; note: doing unsigned word to integer coercion (cost 20) from #:STATE-0-0 ; ; note: doing unsigned word to integer coercion (cost 20) from #:STATE-0-1 ; ; note: doing unsigned word to integer coercion (cost 20) from #:STATE-0-2 ; ; note: doing unsigned word to integer coercion (cost 20) from #:STATE-0-3 ; ; note: doing unsigned word to integer coercion (cost 20) from #:STATE-0-4 ; ; note: doing unsigned word to integer coercion (cost 20) from #:STATE-1-0 ; ; note: doing unsigned word to integer coercion (cost 20) from #:STATE-1-1 ; ; note: doing unsigned word to integer coercion (cost 20) from #:STATE-1-2 ; ; note: doing unsigned word to integer coercion (cost 20) from #:STATE-1-3 ; ; note: doing unsigned word to integer coercion (cost 20) from #:STATE-1-4 ; ; note: doing unsigned word to integer coercion (cost 20) from #:STATE-2-0 ; ; note: doing unsigned word to integer coercion (cost 20) from #:STATE-2-1 ; ; note: doing unsigned word to integer coercion (cost 20) from #:STATE-2-2 ; ; note: doing unsigned word to integer coercion (cost 20) from #:STATE-2-3 ; ; note: doing unsigned word to integer coercion (cost 20) from #:STATE-2-4 ; ; note: doing unsigned word to integer coercion (cost 20) from #:STATE-3-0 ; ; note: doing unsigned word to integer coercion (cost 20) from #:STATE-3-1 ; ; note: doing unsigned word to integer coercion (cost 20) from #:STATE-3-2 ; ; note: doing unsigned word to integer coercion (cost 20) from #:STATE-3-3 ; ; note: doing unsigned word to integer coercion (cost 20) from #:STATE-3-4 ; ; note: doing unsigned word to integer coercion (cost 20) from #:STATE-4-0 ; ; note: doing unsigned word to integer coercion (cost 20) from #:STATE-4-1 ; ; note: doing unsigned word to integer coercion (cost 20) from #:STATE-4-2 ; ; note: doing unsigned word to integer coercion (cost 20) from #:STATE-4-3 ; ; note: doing unsigned word to integer coercion (cost 20) from #:STATE-4-4 ; 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/sha3.lisp ; in: DEFUN SHA3-FINALIZE ; (= IRONCLAD::OUTPUT-SIZE IRONCLAD::OUTPUT-BYTE-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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (- IRONCLAD::OUTPUT-BYTE-LENGTH IRONCLAD::OUTPUT-SIZE) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (+ IRONCLAD::DIGEST-START IRONCLAD::OUTPUT-SIZE) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MIN (- IRONCLAD::OUTPUT-BYTE-LENGTH IRONCLAD::OUTPUT-SIZE) ; IRONCLAD::CHUNK-SIZE) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (INCF IRONCLAD::OUTPUT-SIZE IRONCLAD::N) ; --> THE ; ==> ; (+ IRONCLAD::N IRONCLAD::OUTPUT-SIZE) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MIN (- IRONCLAD::OUTPUT-BYTE-LENGTH IRONCLAD::OUTPUT-SIZE) ; IRONCLAD::CHUNK-SIZE) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL 0) (SINGLE-FLOAT 0.0) ; (DOUBLE-FLOAT 0.0d0)), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (- IRONCLAD::OUTPUT-BYTE-LENGTH IRONCLAD::OUTPUT-SIZE) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (MIN (- IRONCLAD::OUTPUT-BYTE-LENGTH IRONCLAD::OUTPUT-SIZE) ; IRONCLAD::CHUNK-SIZE) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (+ IRONCLAD::DIGEST-START IRONCLAD::OUTPUT-SIZE) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; etc. ; (INCF IRONCLAD::OUTPUT-SIZE IRONCLAD::N) ; --> THE ; ==> ; (+ IRONCLAD::N IRONCLAD::OUTPUT-SIZE) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The second argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/digests/sha3-tmpEID7NJG3.fasl ; compilation finished in 0:00:00.488 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/sha512.lisp" (written 18 FEB 2022 01:39:10 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/sha512.lisp ; in: DEFUN UPDATE-SHA512-BLOCK ; (IRONCLAD::SHA512-ROUND 0 IRONCLAD::A IRONCLAD::B IRONCLAD::C IRONCLAD::D ; IRONCLAD::E IRONCLAD::F IRONCLAD::G IRONCLAD::H) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 1 IRONCLAD::H IRONCLAD::A IRONCLAD::B IRONCLAD::C ; IRONCLAD::D IRONCLAD::E IRONCLAD::F IRONCLAD::G) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 2 IRONCLAD::G IRONCLAD::H IRONCLAD::A IRONCLAD::B ; IRONCLAD::C IRONCLAD::D IRONCLAD::E IRONCLAD::F) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 3 IRONCLAD::F IRONCLAD::G IRONCLAD::H IRONCLAD::A ; IRONCLAD::B IRONCLAD::C IRONCLAD::D IRONCLAD::E) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 4 IRONCLAD::E IRONCLAD::F IRONCLAD::G IRONCLAD::H ; IRONCLAD::A IRONCLAD::B IRONCLAD::C IRONCLAD::D) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 5 IRONCLAD::D IRONCLAD::E IRONCLAD::F IRONCLAD::G ; IRONCLAD::H IRONCLAD::A IRONCLAD::B IRONCLAD::C) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 6 IRONCLAD::C IRONCLAD::D IRONCLAD::E IRONCLAD::F ; IRONCLAD::G IRONCLAD::H IRONCLAD::A IRONCLAD::B) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 7 IRONCLAD::B IRONCLAD::C IRONCLAD::D IRONCLAD::E ; IRONCLAD::F IRONCLAD::G IRONCLAD::H IRONCLAD::A) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 8 IRONCLAD::A IRONCLAD::B IRONCLAD::C IRONCLAD::D ; IRONCLAD::E IRONCLAD::F IRONCLAD::G IRONCLAD::H) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 9 IRONCLAD::H IRONCLAD::A IRONCLAD::B IRONCLAD::C ; IRONCLAD::D IRONCLAD::E IRONCLAD::F IRONCLAD::G) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 10 IRONCLAD::G IRONCLAD::H IRONCLAD::A IRONCLAD::B ; IRONCLAD::C IRONCLAD::D IRONCLAD::E IRONCLAD::F) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 11 IRONCLAD::F IRONCLAD::G IRONCLAD::H IRONCLAD::A ; IRONCLAD::B IRONCLAD::C IRONCLAD::D IRONCLAD::E) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 12 IRONCLAD::E IRONCLAD::F IRONCLAD::G IRONCLAD::H ; IRONCLAD::A IRONCLAD::B IRONCLAD::C IRONCLAD::D) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 13 IRONCLAD::D IRONCLAD::E IRONCLAD::F IRONCLAD::G ; IRONCLAD::H IRONCLAD::A IRONCLAD::B IRONCLAD::C) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 14 IRONCLAD::C IRONCLAD::D IRONCLAD::E IRONCLAD::F ; IRONCLAD::G IRONCLAD::H IRONCLAD::A IRONCLAD::B) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 15 IRONCLAD::B IRONCLAD::C IRONCLAD::D IRONCLAD::E ; IRONCLAD::F IRONCLAD::G IRONCLAD::H IRONCLAD::A) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 16 IRONCLAD::A IRONCLAD::B IRONCLAD::C IRONCLAD::D ; IRONCLAD::E IRONCLAD::F IRONCLAD::G IRONCLAD::H) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 17 IRONCLAD::H IRONCLAD::A IRONCLAD::B IRONCLAD::C ; IRONCLAD::D IRONCLAD::E IRONCLAD::F IRONCLAD::G) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 18 IRONCLAD::G IRONCLAD::H IRONCLAD::A IRONCLAD::B ; IRONCLAD::C IRONCLAD::D IRONCLAD::E IRONCLAD::F) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 19 IRONCLAD::F IRONCLAD::G IRONCLAD::H IRONCLAD::A ; IRONCLAD::B IRONCLAD::C IRONCLAD::D IRONCLAD::E) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 20 IRONCLAD::E IRONCLAD::F IRONCLAD::G IRONCLAD::H ; IRONCLAD::A IRONCLAD::B IRONCLAD::C IRONCLAD::D) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 21 IRONCLAD::D IRONCLAD::E IRONCLAD::F IRONCLAD::G ; IRONCLAD::H IRONCLAD::A IRONCLAD::B IRONCLAD::C) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 22 IRONCLAD::C IRONCLAD::D IRONCLAD::E IRONCLAD::F ; IRONCLAD::G IRONCLAD::H IRONCLAD::A IRONCLAD::B) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 23 IRONCLAD::B IRONCLAD::C IRONCLAD::D IRONCLAD::E ; IRONCLAD::F IRONCLAD::G IRONCLAD::H IRONCLAD::A) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 24 IRONCLAD::A IRONCLAD::B IRONCLAD::C IRONCLAD::D ; IRONCLAD::E IRONCLAD::F IRONCLAD::G IRONCLAD::H) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 25 IRONCLAD::H IRONCLAD::A IRONCLAD::B IRONCLAD::C ; IRONCLAD::D IRONCLAD::E IRONCLAD::F IRONCLAD::G) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 26 IRONCLAD::G IRONCLAD::H IRONCLAD::A IRONCLAD::B ; IRONCLAD::C IRONCLAD::D IRONCLAD::E IRONCLAD::F) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 27 IRONCLAD::F IRONCLAD::G IRONCLAD::H IRONCLAD::A ; IRONCLAD::B IRONCLAD::C IRONCLAD::D IRONCLAD::E) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 28 IRONCLAD::E IRONCLAD::F IRONCLAD::G IRONCLAD::H ; IRONCLAD::A IRONCLAD::B IRONCLAD::C IRONCLAD::D) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 29 IRONCLAD::D IRONCLAD::E IRONCLAD::F IRONCLAD::G ; IRONCLAD::H IRONCLAD::A IRONCLAD::B IRONCLAD::C) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 30 IRONCLAD::C IRONCLAD::D IRONCLAD::E IRONCLAD::F ; IRONCLAD::G IRONCLAD::H IRONCLAD::A IRONCLAD::B) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 31 IRONCLAD::B IRONCLAD::C IRONCLAD::D IRONCLAD::E ; IRONCLAD::F IRONCLAD::G IRONCLAD::H IRONCLAD::A) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 32 IRONCLAD::A IRONCLAD::B IRONCLAD::C IRONCLAD::D ; IRONCLAD::E IRONCLAD::F IRONCLAD::G IRONCLAD::H) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 33 IRONCLAD::H IRONCLAD::A IRONCLAD::B IRONCLAD::C ; IRONCLAD::D IRONCLAD::E IRONCLAD::F IRONCLAD::G) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 34 IRONCLAD::G IRONCLAD::H IRONCLAD::A IRONCLAD::B ; IRONCLAD::C IRONCLAD::D IRONCLAD::E IRONCLAD::F) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 35 IRONCLAD::F IRONCLAD::G IRONCLAD::H IRONCLAD::A ; IRONCLAD::B IRONCLAD::C IRONCLAD::D IRONCLAD::E) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 36 IRONCLAD::E IRONCLAD::F IRONCLAD::G IRONCLAD::H ; IRONCLAD::A IRONCLAD::B IRONCLAD::C IRONCLAD::D) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 37 IRONCLAD::D IRONCLAD::E IRONCLAD::F IRONCLAD::G ; IRONCLAD::H IRONCLAD::A IRONCLAD::B IRONCLAD::C) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 38 IRONCLAD::C IRONCLAD::D IRONCLAD::E IRONCLAD::F ; IRONCLAD::G IRONCLAD::H IRONCLAD::A IRONCLAD::B) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 39 IRONCLAD::B IRONCLAD::C IRONCLAD::D IRONCLAD::E ; IRONCLAD::F IRONCLAD::G IRONCLAD::H IRONCLAD::A) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 40 IRONCLAD::A IRONCLAD::B IRONCLAD::C IRONCLAD::D ; IRONCLAD::E IRONCLAD::F IRONCLAD::G IRONCLAD::H) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 41 IRONCLAD::H IRONCLAD::A IRONCLAD::B IRONCLAD::C ; IRONCLAD::D IRONCLAD::E IRONCLAD::F IRONCLAD::G) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 42 IRONCLAD::G IRONCLAD::H IRONCLAD::A IRONCLAD::B ; IRONCLAD::C IRONCLAD::D IRONCLAD::E IRONCLAD::F) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 43 IRONCLAD::F IRONCLAD::G IRONCLAD::H IRONCLAD::A ; IRONCLAD::B IRONCLAD::C IRONCLAD::D IRONCLAD::E) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 44 IRONCLAD::E IRONCLAD::F IRONCLAD::G IRONCLAD::H ; IRONCLAD::A IRONCLAD::B IRONCLAD::C IRONCLAD::D) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 45 IRONCLAD::D IRONCLAD::E IRONCLAD::F IRONCLAD::G ; IRONCLAD::H IRONCLAD::A IRONCLAD::B IRONCLAD::C) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 46 IRONCLAD::C IRONCLAD::D IRONCLAD::E IRONCLAD::F ; IRONCLAD::G IRONCLAD::H IRONCLAD::A IRONCLAD::B) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 47 IRONCLAD::B IRONCLAD::C IRONCLAD::D IRONCLAD::E ; IRONCLAD::F IRONCLAD::G IRONCLAD::H IRONCLAD::A) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 48 IRONCLAD::A IRONCLAD::B IRONCLAD::C IRONCLAD::D ; IRONCLAD::E IRONCLAD::F IRONCLAD::G IRONCLAD::H) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 49 IRONCLAD::H IRONCLAD::A IRONCLAD::B IRONCLAD::C ; IRONCLAD::D IRONCLAD::E IRONCLAD::F IRONCLAD::G) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 50 IRONCLAD::G IRONCLAD::H IRONCLAD::A IRONCLAD::B ; IRONCLAD::C IRONCLAD::D IRONCLAD::E IRONCLAD::F) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 51 IRONCLAD::F IRONCLAD::G IRONCLAD::H IRONCLAD::A ; IRONCLAD::B IRONCLAD::C IRONCLAD::D IRONCLAD::E) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 52 IRONCLAD::E IRONCLAD::F IRONCLAD::G IRONCLAD::H ; IRONCLAD::A IRONCLAD::B IRONCLAD::C IRONCLAD::D) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 53 IRONCLAD::D IRONCLAD::E IRONCLAD::F IRONCLAD::G ; IRONCLAD::H IRONCLAD::A IRONCLAD::B IRONCLAD::C) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 54 IRONCLAD::C IRONCLAD::D IRONCLAD::E IRONCLAD::F ; IRONCLAD::G IRONCLAD::H IRONCLAD::A IRONCLAD::B) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 55 IRONCLAD::B IRONCLAD::C IRONCLAD::D IRONCLAD::E ; IRONCLAD::F IRONCLAD::G IRONCLAD::H IRONCLAD::A) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 56 IRONCLAD::A IRONCLAD::B IRONCLAD::C IRONCLAD::D ; IRONCLAD::E IRONCLAD::F IRONCLAD::G IRONCLAD::H) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 57 IRONCLAD::H IRONCLAD::A IRONCLAD::B IRONCLAD::C ; IRONCLAD::D IRONCLAD::E IRONCLAD::F IRONCLAD::G) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 58 IRONCLAD::G IRONCLAD::H IRONCLAD::A IRONCLAD::B ; IRONCLAD::C IRONCLAD::D IRONCLAD::E IRONCLAD::F) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 59 IRONCLAD::F IRONCLAD::G IRONCLAD::H IRONCLAD::A ; IRONCLAD::B IRONCLAD::C IRONCLAD::D IRONCLAD::E) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 60 IRONCLAD::E IRONCLAD::F IRONCLAD::G IRONCLAD::H ; IRONCLAD::A IRONCLAD::B IRONCLAD::C IRONCLAD::D) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 61 IRONCLAD::D IRONCLAD::E IRONCLAD::F IRONCLAD::G ; IRONCLAD::H IRONCLAD::A IRONCLAD::B IRONCLAD::C) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 62 IRONCLAD::C IRONCLAD::D IRONCLAD::E IRONCLAD::F ; IRONCLAD::G IRONCLAD::H IRONCLAD::A IRONCLAD::B) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 63 IRONCLAD::B IRONCLAD::C IRONCLAD::D IRONCLAD::E ; IRONCLAD::F IRONCLAD::G IRONCLAD::H IRONCLAD::A) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 64 IRONCLAD::A IRONCLAD::B IRONCLAD::C IRONCLAD::D ; IRONCLAD::E IRONCLAD::F IRONCLAD::G IRONCLAD::H) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 65 IRONCLAD::H IRONCLAD::A IRONCLAD::B IRONCLAD::C ; IRONCLAD::D IRONCLAD::E IRONCLAD::F IRONCLAD::G) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 66 IRONCLAD::G IRONCLAD::H IRONCLAD::A IRONCLAD::B ; IRONCLAD::C IRONCLAD::D IRONCLAD::E IRONCLAD::F) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 67 IRONCLAD::F IRONCLAD::G IRONCLAD::H IRONCLAD::A ; IRONCLAD::B IRONCLAD::C IRONCLAD::D IRONCLAD::E) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 68 IRONCLAD::E IRONCLAD::F IRONCLAD::G IRONCLAD::H ; IRONCLAD::A IRONCLAD::B IRONCLAD::C IRONCLAD::D) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 69 IRONCLAD::D IRONCLAD::E IRONCLAD::F IRONCLAD::G ; IRONCLAD::H IRONCLAD::A IRONCLAD::B IRONCLAD::C) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 70 IRONCLAD::C IRONCLAD::D IRONCLAD::E IRONCLAD::F ; IRONCLAD::G IRONCLAD::H IRONCLAD::A IRONCLAD::B) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 71 IRONCLAD::B IRONCLAD::C IRONCLAD::D IRONCLAD::E ; IRONCLAD::F IRONCLAD::G IRONCLAD::H IRONCLAD::A) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 72 IRONCLAD::A IRONCLAD::B IRONCLAD::C IRONCLAD::D ; IRONCLAD::E IRONCLAD::F IRONCLAD::G IRONCLAD::H) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 73 IRONCLAD::H IRONCLAD::A IRONCLAD::B IRONCLAD::C ; IRONCLAD::D IRONCLAD::E IRONCLAD::F IRONCLAD::G) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 74 IRONCLAD::G IRONCLAD::H IRONCLAD::A IRONCLAD::B ; IRONCLAD::C IRONCLAD::D IRONCLAD::E IRONCLAD::F) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 75 IRONCLAD::F IRONCLAD::G IRONCLAD::H IRONCLAD::A ; IRONCLAD::B IRONCLAD::C IRONCLAD::D IRONCLAD::E) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 76 IRONCLAD::E IRONCLAD::F IRONCLAD::G IRONCLAD::H ; IRONCLAD::A IRONCLAD::B IRONCLAD::C IRONCLAD::D) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 77 IRONCLAD::D IRONCLAD::E IRONCLAD::F IRONCLAD::G ; IRONCLAD::H IRONCLAD::A IRONCLAD::B IRONCLAD::C) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 78 IRONCLAD::C IRONCLAD::D IRONCLAD::E IRONCLAD::F ; IRONCLAD::G IRONCLAD::H IRONCLAD::A IRONCLAD::B) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SHA512-ROUND 79 IRONCLAD::B IRONCLAD::C IRONCLAD::D IRONCLAD::E ; IRONCLAD::F IRONCLAD::G IRONCLAD::H IRONCLAD::A) ; --> IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; --> SETF PROGN SETF SETQ THE IRONCLAD::MOD64+ LDB ; ==> ; 1 ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (DEFUN IRONCLAD::UPDATE-SHA512-BLOCK (IRONCLAD::REGS BLOCK) ; (DECLARE (TYPE IRONCLAD::SHA512-REGS IRONCLAD::REGS)) ; (DECLARE (TYPE (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (80)) BLOCK) ; (OPTIMIZE (SPEED 3) (SAFETY 0) (SPACE 0) (DEBUG 0) ; (COMPILATION-SPEED 0))) ; (LET ((IRONCLAD::A (IRONCLAD::SHA512-REGS-A IRONCLAD::REGS)) ; (IRONCLAD::B (IRONCLAD::SHA512-REGS-B IRONCLAD::REGS)) ; (IRONCLAD::C (IRONCLAD::SHA512-REGS-C IRONCLAD::REGS)) ; (IRONCLAD::D (IRONCLAD::SHA512-REGS-D IRONCLAD::REGS)) ; (IRONCLAD::E (IRONCLAD::SHA512-REGS-E IRONCLAD::REGS)) ; (IRONCLAD::F (IRONCLAD::SHA512-REGS-F IRONCLAD::REGS)) ; (IRONCLAD::G (IRONCLAD::SHA512-REGS-G IRONCLAD::REGS)) ; (IRONCLAD::H (IRONCLAD::SHA512-REGS-H IRONCLAD::REGS))) ; (FLET ((IRONCLAD::RHO # ; #)) ; (MACROLET (#) ; (PROGN # # # # # # # # # # # ...) ; (PROGN # # # # # # # #))))) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA IRONCLAD::UPDATE-SHA512-BLOCK ; (IRONCLAD::REGS BLOCK) ; (DECLARE (TYPE IRONCLAD::SHA512-REGS IRONCLAD::REGS)) ; (DECLARE (TYPE (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (80)) BLOCK) ; (OPTIMIZE (SPEED 3) (SAFETY 0) (SPACE 0) (DEBUG 0) ; (COMPILATION-SPEED 0))) ; (BLOCK IRONCLAD::UPDATE-SHA512-BLOCK ; (LET ((IRONCLAD::A #) ; (IRONCLAD::B #) ; (IRONCLAD::C #) ; (IRONCLAD::D #) ; (IRONCLAD::E #) ; (IRONCLAD::F #) ; (IRONCLAD::G #) ; (IRONCLAD::H #)) ; (FLET (#) ; (MACROLET # ; # ; #))))) ; ; note: doing unsigned word to integer coercion (cost 20) to "" ; processing (DEFUN SHA512-EXPAND-BLOCK ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/sha512.lisp ; in: DEFUN SHA512-EXPAND-BLOCK ; (IRONCLAD::SIGMA (AREF BLOCK (- IRONCLAD::I 2)) 19 61 6) ; ; note: doing unsigned word to integer coercion (cost 20) to X ; (IRONCLAD::SIGMA (AREF BLOCK (- IRONCLAD::I 15)) 1 8 7) ; ; note: doing unsigned word to integer coercion (cost 20) to X ; 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 (# #) ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/sha512.lisp ; in: DEFINE-DIGEST-FINALIZER ((SHA512 64) (SHA384 48)) ; (* 8 (IRONCLAD::SHA512-AMOUNT IRONCLAD::STATE)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; processing (DEFDIGEST SHA512 ...) ; processing (DEFDIGEST SHA384 ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/digests/sha512-tmp8CJLVG9R.fasl ; compilation finished in 0:00:02.160 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/skein.lisp" (written 18 FEB 2022 01:39:10 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/skein.lisp ; in: DEFUN SKEIN-UBI ; (FUNCALL IRONCLAD::ENCRYPTION-FUNCTION IRONCLAD::CIPHER IRONCLAD::BUFFER 0 ; IRONCLAD::CIPHERTEXT 0) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; ENCRYPTION-FUNCTION is not known to be a function ; (FUNCALL IRONCLAD::ENCRYPTION-FUNCTION IRONCLAD::CIPHER IRONCLAD::MESSAGE ; IRONCLAD::MESSAGE-START IRONCLAD::CIPHERTEXT 0) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; ENCRYPTION-FUNCTION is not known to be a function ; (MAKE-ARRAY 128 :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :INITIAL-ELEMENT 0) ; ; note: could not stack allocate: ; (MAKE-ARRAY 128 :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :INITIAL-ELEMENT 0) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/digests/skein-tmpZCJK45JG.fasl ; compilation finished in 0:00:00.760 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/sm3.lisp" (written 18 FEB 2022 01:39:10 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/sm3.lisp ; in: DEFINE-DIGEST-UPDATER SM3 ; (INCF IRONCLAD::START 64) ; --> THE ; ==> ; (+ 64 IRONCLAD::START) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (INCF IRONCLAD::START IRONCLAD::N) ; ; note: doing signed word to integer coercion (cost 20) to START ; processing (DEFINE-DIGEST-FINALIZER (SM3 32) ...) ; processing (DEFDIGEST SM3 ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/digests/sm3-tmpQC4TENAZ.fasl ; compilation finished in 0:00:02.836 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/streebog.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (IN-IRONCLAD-READTABLE) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DECLAIM (INLINE STREEBOG-AX) ...) ; processing (DEFUN STREEBOG-AX ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/streebog.lisp ; in: DEFUN STREEBOG-AX ; (DEFUN IRONCLAD::STREEBOG-AX (IRONCLAD::I IRONCLAD::J) ; (DECLARE (TYPE (INTEGER 0 7) IRONCLAD::I) ; (TYPE (INTEGER 0 255) IRONCLAD::J) ; (OPTIMIZE (SPEED 3) (SPACE 0) (SAFETY 0) (DEBUG 0))) ; (LET ((IRONCLAD::CONSTANTS (LOAD-TIME-VALUE IRONCLAD::+STREEBOG-AX+ T))) ; (DECLARE (TYPE (SIMPLE-ARRAY # #) IRONCLAD::CONSTANTS)) ; (AREF IRONCLAD::CONSTANTS IRONCLAD::I IRONCLAD::J))) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA IRONCLAD::STREEBOG-AX ; (IRONCLAD::I IRONCLAD::J) ; (DECLARE (TYPE (INTEGER 0 7) IRONCLAD::I) ; (TYPE (INTEGER 0 255) IRONCLAD::J) ; (OPTIMIZE (SPEED 3) (SPACE 0) (SAFETY 0) (DEBUG 0))) ; (BLOCK IRONCLAD::STREEBOG-AX ; (LET ((IRONCLAD::CONSTANTS #)) ; (DECLARE (TYPE # IRONCLAD::CONSTANTS)) ; (AREF IRONCLAD::CONSTANTS IRONCLAD::I IRONCLAD::J)))) ; ; note: doing unsigned word to integer coercion (cost 20) to "" ; processing (DEFMACRO STREEBOG-X ...) ; processing (DEFMACRO STREEBOG-XLPS ...) ; processing (DEFMACRO STREEBOG-ROUND ...) ; processing (DEFUN STREEBOG-ADD512 ...) ; processing (DEFUN STREEBOG-G ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/streebog.lisp ; in: DEFUN STREEBOG-G ; (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64) :INITIAL-ELEMENT 0) ; ; note: could not stack allocate: ; (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64) :INITIAL-ELEMENT 0) ; ; note: could not stack allocate: ; (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64) :INITIAL-ELEMENT 0) ; processing (DEFSTRUCT (STREEBOG # ...) ...) ; processing (DEFSTRUCT (STREEBOG/256 # ...)) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD COPY-DIGEST ...) ; processing (DEFUN STREEBOG-STAGE2 ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/streebog.lisp ; in: DEFUN STREEBOG-STAGE2 ; (+ IRONCLAD::START (* IRONCLAD::I 8)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; (+ IRONCLAD::START (* IRONCLAD::I 8)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFUN STREEBOG-PAD ...) ; processing (DEFUN STREEBOG-STAGE3 ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/streebog.lisp ; in: DEFUN STREEBOG-STAGE3 ; (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64) :INITIAL-ELEMENT 0) ; ; note: could not stack allocate: ; (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64) :INITIAL-ELEMENT 0) ; (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; processing (DEFINE-DIGEST-UPDATER STREEBOG ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/streebog.lisp ; in: DEFINE-DIGEST-UPDATER STREEBOG ; (INCF IRONCLAD::START 64) ; --> THE ; ==> ; (+ 64 IRONCLAD::START) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (INCF IRONCLAD::START IRONCLAD::N) ; ; note: doing signed word to integer coercion (cost 20) to START ; processing (DEFINE-DIGEST-FINALIZER (# #) ...) ; processing (DEFDIGEST STREEBOG ...) ; processing (DEFDIGEST STREEBOG/256 ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/digests/streebog-tmp4HJFFDY3.fasl ; compilation finished in 0:00:00.668 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/tiger.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DEFTYPE TIGER-STATE-BLOCK ...) ; processing (DEFTYPE TIGER-SBOX ...) ; processing (DEFINE-DIGEST-REGISTERS (TIGER :ENDIAN ...) ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/tiger.lisp ; in: DEFCONSTANT +TIGER-BLOCK-COPY-FN+ ; 'IRONCLAD::FILL-BLOCK-UB8-LE/64 ; ; note: deleting unreachable code ; processing (DEFCONST +PRISTINE-TIGER-REGISTERS+ ...) ; processing (DECLAIM (TYPE TIGER-SBOX ...)) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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) ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/tiger.lisp ; in: DEFINE-DIGEST-FINALIZER (TIGER 24) ; (* 8 (IRONCLAD::TIGER-AMOUNT IRONCLAD::STATE)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (IRONCLAD::STORE-DATA-LENGTH BLOCK IRONCLAD::TOTAL-LENGTH 14) ; --> BLOCK LET SETF PROGN SETF LET* LDB ; ==> ; 1 ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; 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) ; . #2#). ; etc. ; processing (DEFDIGEST TIGER ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/digests/tiger-tmp78H81ZL.fasl ; compilation finished in 0:00:00.800 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/tree-hash.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/digests/tree-hash-tmp86K6JU7V.fasl ; compilation finished in 0:00:00.320 ; compiling file "/usr/share/common-lisp/source/ironclad/src/digests/whirlpool.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DEFCONST +PRISTINE-WHIRLPOOL-REGISTERS+ ...) ; processing (DEFUN WHIRLPOOLREGS-DIGEST ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL) ...) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFCONST +RC+ ...) ; processing (DECLAIM (TYPE # ...)) ; processing (DEFCONST +C-EVEN+ ...) ; processing (DEFCONST +C-ODD+ ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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) ...) ; file: /usr/share/common-lisp/source/ironclad/src/digests/whirlpool.lisp ; in: DEFINE-DIGEST-FINALIZER (WHIRLPOOL 64) ; (* 8 (IRONCLAD::WHIRLPOOL-AMOUNT IRONCLAD::STATE)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (LDB (BYTE 32 (- 256 (* 32 (1+ IRONCLAD::I)))) IRONCLAD::TOTAL-LENGTH) ; ; 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 second argument is a (INTEGER -224 0), not a (UNSIGNED-BYTE 62). ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; unable to do #1# (cost 3) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -224 0), not a (UNSIGNED-BYTE 62). ; The result is a (VALUES INTEGER . #2#), not a (VALUES (UNSIGNED-BYTE 64) ; . #2#). ; etc. ; processing (DEFDIGEST WHIRLPOOL ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/digests/whirlpool-tmp2L6X9BVQ.fasl ; compilation finished in 0:00:00.676 ; compiling file "/usr/share/common-lisp/source/ironclad/src/macs/blake2-mac.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/macs/blake2-mac-tmpES5DCUFN.fasl ; compilation finished in 0:00:00.064 ; compiling file "/usr/share/common-lisp/source/ironclad/src/macs/blake2s-mac.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/macs/blake2s-mac-tmpDVKOEP6R.fasl ; compilation finished in 0:00:00.104 ; compiling file "/usr/share/common-lisp/source/ironclad/src/macs/cmac.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS CMAC ...) ; processing (DEFUN MAKE-CMAC ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFUN UPDATE-CMAC ...) ; file: /usr/share/common-lisp/source/ironclad/src/macs/cmac.lisp ; in: DEFUN UPDATE-CMAC ; (< 0 IRONCLAD::BUFFER-INDEX IRONCLAD:BLOCK-LENGTH) ; ; 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 (RATIONAL (0)) (SINGLE-FLOAT (0.0)) ; (DOUBLE-FLOAT (0.0d0))), not a FLOAT. ; (- IRONCLAD:BLOCK-LENGTH IRONCLAD::BUFFER-INDEX) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a (OR (RATIONAL (0) (4611686018427387900)) ; (SINGLE-FLOAT (0.0) (4.611686e18)) ; (DOUBLE-FLOAT (0.0d0) ; (4.611686018427388d18))), not a FLOAT. ; (= IRONCLAD::BUFFER-INDEX IRONCLAD:BLOCK-LENGTH) ; ; 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. ; (FUNCALL IRONCLAD::ENCRYPTION-FUNCTION IRONCLAD::CIPHER IRONCLAD::BUFFER 0 ; IRONCLAD::BUFFER 0) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; ENCRYPTION-FUNCTION is not known to be a function ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; ENCRYPTION-FUNCTION is not known to be a function ; (MIN IRONCLAD::REMAINING (- IRONCLAD:BLOCK-LENGTH IRONCLAD::BUFFER-INDEX)) ; ; note: unable to open code because: The operands might not be the same type. ; (< 0 IRONCLAD::BUFFER-INDEX IRONCLAD:BLOCK-LENGTH) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (OR (RATIONAL #1=(0)) (SINGLE-FLOAT #2=(0.0)) ; (DOUBLE-FLOAT #3=(0.0d0))), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (OR (RATIONAL #1#) (SINGLE-FLOAT #2#) ; (DOUBLE-FLOAT #3#)), not a (UNSIGNED-BYTE 64). ; etc. ; (- IRONCLAD:BLOCK-LENGTH IRONCLAD::BUFFER-INDEX) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a (OR (RATIONAL #1=(0) #2=(4611686018427387900)) ; (SINGLE-FLOAT #3=(0.0) #4=(4.611686e18)) ; (DOUBLE-FLOAT #5=(0.0d0) ; #6=(4.611686018427388d18))), not a FIXNUM. ; The result is a (VALUES ; (OR ; (DOUBLE-FLOAT -4.611686018427388d18 ; 4.611686018427388d18) ; (SINGLE-FLOAT -4.611686e18 4.611686e18) ; (RATIONAL #7=(-4611686018427387900) ; #8=(4611686018427387900))) ; . #9=(&OPTIONAL)), not a (VALUES FIXNUM . #9#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The second argument is a (OR (RATIONAL #1# #2#) (SINGLE-FLOAT #3# #4#) ; (DOUBLE-FLOAT #5# #6#)), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (OR ; (DOUBLE-FLOAT -4.611686018427388d18 ; 4.611686018427388d18) ; (SINGLE-FLOAT -4.611686e18 4.611686e18) ; (RATIONAL #7# #8#)) ; . #9#), not a (VALUES (SIGNED-BYTE 64) . #9#). ; etc. ; (MIN IRONCLAD::REMAINING (- IRONCLAD:BLOCK-LENGTH IRONCLAD::BUFFER-INDEX)) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a (OR ; (DOUBLE-FLOAT -4.611686018427388d18 ; 4.611686018427388d18) ; (SINGLE-FLOAT -4.611686e18 4.611686e18) ; (RATIONAL #1=(-4611686018427387900) ; #2=(4611686018427387900))), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (INTEGER -4611686018427387900 4611686018427387900), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (OR ; (DOUBLE-FLOAT -4.611686018427388d18 ; 4.611686018427388d18) ; (SINGLE-FLOAT -4.611686e18 4.611686e18) ; (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE 64). ; etc. ; (DECF IRONCLAD::REMAINING) ; --> THE SB-IMPL::XSUBTRACT BLOCK ; ==> ; (- SB-IMPL::B SB-IMPL::A) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER * 4611686018427387900), not a FIXNUM. ; The result is a (VALUES (INTEGER * 4611686018427387899) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER * 4611686018427387900), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES (INTEGER * 4611686018427387899) . #1#), not a (VALUES ; (SIGNED-BYTE ; 64) ; . #1#). ; etc. ; (PLUSP IRONCLAD::REMAINING) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER * 4611686018427387900), not a FIXNUM. ; (> IRONCLAD::REMAINING IRONCLAD:BLOCK-LENGTH) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER * 4611686018427387900), not a FIXNUM. ; (PLUSP IRONCLAD::REMAINING) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER * 4611686018427387900), not a FIXNUM. ; processing (DEFUN CMAC-DIGEST ...) ; processing (DEFMAC CMAC ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/macs/cmac-tmp4TWTKS75.fasl ; compilation finished in 0:00:00.080 ; compiling file "/usr/share/common-lisp/source/ironclad/src/macs/hmac.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS HMAC ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN MAKE-HMAC ...) ; processing (DEFMETHOD REINITIALIZE-INSTANCE ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; file: /usr/share/common-lisp/source/ironclad/src/macs/hmac.lisp ; in: DEFMETHOD SHARED-INITIALIZE :AFTER (HMAC T) ; (MAKE-ARRAY IRONCLAD:BLOCK-LENGTH :ELEMENT-TYPE '(UNSIGNED-BYTE 8) ; :INITIAL-ELEMENT 0) ; ; note: could not stack allocate: ; (MAKE-ARRAY BLOCK-LENGTH :ELEMENT-TYPE '(UNSIGNED-BYTE 8) ; :INITIAL-ELEMENT 0) ; (MAKE-ARRAY IRONCLAD:BLOCK-LENGTH :ELEMENT-TYPE '(UNSIGNED-BYTE 8) ; :INITIAL-ELEMENT 92) ; ; note: could not stack allocate: ; (MAKE-ARRAY BLOCK-LENGTH :ELEMENT-TYPE '(UNSIGNED-BYTE 8) ; :INITIAL-ELEMENT 92) ; (MAKE-ARRAY IRONCLAD:BLOCK-LENGTH :ELEMENT-TYPE '(UNSIGNED-BYTE 8) ; :INITIAL-ELEMENT 54) ; ; note: could not stack allocate: ; (MAKE-ARRAY BLOCK-LENGTH :ELEMENT-TYPE '(UNSIGNED-BYTE 8) ; :INITIAL-ELEMENT 54) ; processing (DEFUN UPDATE-HMAC ...) ; processing (DEFUN HMAC-DIGEST ...) ; processing (DEFMAC HMAC ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/macs/hmac-tmpXSOQ2I78.fasl ; compilation finished in 0:00:00.067 ; compiling file "/usr/share/common-lisp/source/ironclad/src/macs/gmac.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS GMAC ...) ; processing (DEFUN MAKE-GMAC ...) ; processing (DECLAIM (INLINE GMAC-SWAP-16)) ; processing (DEFUN GMAC-SWAP-16 ...) ; processing (DEFUN GHASH ...) ; file: /usr/share/common-lisp/source/ironclad/src/macs/gmac.lisp ; in: DEFUN GHASH ; (LET ((IRONCLAD::Y ; (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :INITIAL-ELEMENT 0))) ; (DOTIMES (IRONCLAD::J IRONCLAD::Q) ; (REPLACE IRONCLAD::Y IRONCLAD::X :START2 IRONCLAD::I) ; (IRONCLAD::GMAC-SWAP-16 IRONCLAD::Y) ; (IRONCLAD::XOR-BLOCK 16 IRONCLAD::Z 0 IRONCLAD::Y 0 IRONCLAD::Z 0) ; (IRONCLAD::GMAC-MUL IRONCLAD::Z IRONCLAD::H) ; (INCF IRONCLAD::I 16)) ; (IRONCLAD::GMAC-SWAP-16 IRONCLAD::Z)) ; ; note: deleting unreachable code ; processing (DEFUN J0 ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; file: /usr/share/common-lisp/source/ironclad/src/macs/gmac.lisp ; in: DEFMETHOD SHARED-INITIALIZE :AFTER (GMAC T) ; (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :INITIAL-ELEMENT 0) ; ; note: could not stack allocate: ; (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :INITIAL-ELEMENT 0) ; (LET ((IRONCLAD::CIPHER ; (IF (OR IRONCLAD::CIPHER-NAME #) ; (IRONCLAD:MAKE-CIPHER IRONCLAD::CIPHER-NAME :KEY IRONCLAD::KEY ; :MODE :ECB) ; (REINITIALIZE-INSTANCE # :KEY IRONCLAD::KEY :MODE :ECB))) ; (IRONCLAD::HKEY (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 8))) ; (IRONCLAD::IV (IRONCLAD::GMAC-IV IRONCLAD::MAC))) ; (DECLARE (TYPE (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (16)) IRONCLAD::HKEY)) ; (SETF (IRONCLAD::GMAC-KEY IRONCLAD::MAC) IRONCLAD::HKEY ; (IRONCLAD::GMAC-TOTAL-LENGTH IRONCLAD::MAC) 0 ; (IRONCLAD::GMAC-BUFFER-LENGTH IRONCLAD::MAC) 0 ; (IRONCLAD::GMAC-CIPHER IRONCLAD::MAC) IRONCLAD::CIPHER) ; (FILL (IRONCLAD::GMAC-ACCUMULATOR IRONCLAD::MAC) 0) ; (FILL IRONCLAD::HKEY 0) ; (IRONCLAD:ENCRYPT-IN-PLACE IRONCLAD::CIPHER IRONCLAD::HKEY) ; (IRONCLAD::GMAC-SWAP-16 IRONCLAD::HKEY) ; (LET ((IRONCLAD::J0 ; (IRONCLAD::J0 IRONCLAD::HKEY IRONCLAD::INITIALIZATION-VECTOR))) ; (SETF (IRONCLAD::GMAC-J0 IRONCLAD::MAC) IRONCLAD::J0) ; (REPLACE IRONCLAD::IV IRONCLAD::J0)) ; (IRONCLAD:ENCRYPT-IN-PLACE IRONCLAD::CIPHER IRONCLAD::IV) ; IRONCLAD::MAC) ; ; note: deleting unreachable code ; ; note: deleting unreachable code ; processing (DEFUN GMAC-MUL ...) ; processing (DEFUN UPDATE-GMAC ...) ; file: /usr/share/common-lisp/source/ironclad/src/macs/gmac.lisp ; in: DEFUN UPDATE-GMAC ; (IRONCLAD::GMAC-SWAP-16 IRONCLAD::BUFFER) ; ; note: deleting unreachable code ; (IRONCLAD:UB64REF/BE IRONCLAD::DATA IRONCLAD::START) ; ; note: deleting unreachable code ; (IRONCLAD:UB64REF/BE IRONCLAD::DATA (+ IRONCLAD::START 8)) ; ; note: deleting unreachable code ; (IRONCLAD::XOR-BLOCK 16 IRONCLAD::ACCUMULATOR 0 IRONCLAD::BUFFER 0 ; IRONCLAD::ACCUMULATOR 0) ; ; note: deleting unreachable code ; (SETF (IRONCLAD::GMAC-TOTAL-LENGTH IRONCLAD::MAC) IRONCLAD::TOTAL-LENGTH ; (IRONCLAD::GMAC-BUFFER-LENGTH IRONCLAD::MAC) IRONCLAD::BUFFER-LENGTH) ; --> SETF LET* ; ==> ; IRONCLAD::TOTAL-LENGTH ; ; note: doing unsigned word to integer coercion (cost 20) from TOTAL-LENGTH ; processing (DEFUN GMAC-DIGEST ...) ; file: /usr/share/common-lisp/source/ironclad/src/macs/gmac.lisp ; in: DEFUN GMAC-DIGEST ; (IRONCLAD::GMAC-SWAP-16 IRONCLAD::BUFFER) ; ; note: deleting unreachable code ; (IRONCLAD::GMAC-SWAP-16 IRONCLAD::ACCUMULATOR) ; ; note: deleting unreachable code ; processing (DEFMAC GMAC ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/macs/gmac-tmpUA03GLW1.fasl ; compilation finished in 0:00:01.252 ; compiling file "/usr/share/common-lisp/source/ironclad/src/macs/poly1305.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/macs/poly1305-tmpO0OW34V4.fasl ; compilation finished in 0:00:00.132 ; compiling file "/usr/share/common-lisp/source/ironclad/src/macs/siphash.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS SIPHASH ...) ; processing (DEFUN MAKE-SIPHASH ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFMACRO SIPHASH-ROUND ...) ; processing (DEFUN SIPHASH-COMPRESS ...) ; file: /usr/share/common-lisp/source/ironclad/src/macs/siphash.lisp ; in: DEFUN SIPHASH-COMPRESS ; (IRONCLAD::SIPHASH-ROUND IRONCLAD::V0 IRONCLAD::V1 IRONCLAD::V2 IRONCLAD::V3) ; --> PROGN SETF SETQ THE IRONCLAD::ROL64 ; ==> ; IRONCLAD::V1 ; ; note: doing unsigned word to integer coercion (cost 20) from V1 ; ==> ; IRONCLAD::V3 ; ; note: doing unsigned word to integer coercion (cost 20) from V3 ; ==> ; IRONCLAD::V0 ; ; note: doing unsigned word to integer coercion (cost 20) from V0 ; ==> ; IRONCLAD::V1 ; ; note: doing unsigned word to integer coercion (cost 20) from V1 ; ==> ; IRONCLAD::V3 ; ; note: doing unsigned word to integer coercion (cost 20) from V3 ; ==> ; IRONCLAD::V2 ; ; note: doing unsigned word to integer coercion (cost 20) from V2 ; processing (DEFUN SIPHASH-FINALIZE ...) ; file: /usr/share/common-lisp/source/ironclad/src/macs/siphash.lisp ; in: DEFUN SIPHASH-FINALIZE ; (IRONCLAD::SIPHASH-ROUND IRONCLAD::V0 IRONCLAD::V1 IRONCLAD::V2 IRONCLAD::V3) ; --> PROGN SETF SETQ THE IRONCLAD::ROL64 ; ==> ; IRONCLAD::V1 ; ; note: doing unsigned word to integer coercion (cost 20) from V1 ; ==> ; IRONCLAD::V3 ; ; note: doing unsigned word to integer coercion (cost 20) from V3 ; ==> ; IRONCLAD::V0 ; ; note: doing unsigned word to integer coercion (cost 20) from V0 ; ==> ; IRONCLAD::V1 ; ; note: doing unsigned word to integer coercion (cost 20) from V1 ; ==> ; IRONCLAD::V3 ; ; note: doing unsigned word to integer coercion (cost 20) from V3 ; ==> ; IRONCLAD::V2 ; ; note: doing unsigned word to integer coercion (cost 20) from V2 ; ==> ; IRONCLAD::V1 ; ; note: doing unsigned word to integer coercion (cost 20) from V1 ; ==> ; IRONCLAD::V3 ; ; note: doing unsigned word to integer coercion (cost 20) from V3 ; ==> ; IRONCLAD::V0 ; ; note: doing unsigned word to integer coercion (cost 20) from V0 ; ==> ; IRONCLAD::V1 ; ; note: doing unsigned word to integer coercion (cost 20) from V1 ; ==> ; IRONCLAD::V3 ; ; note: doing unsigned word to integer coercion (cost 20) from V3 ; ==> ; IRONCLAD::V2 ; ; note: doing unsigned word to integer coercion (cost 20) from V2 ; processing (DEFUN UPDATE-SIPHASH ...) ; processing (DEFUN SIPHASH-DIGEST ...) ; file: /usr/share/common-lisp/source/ironclad/src/macs/siphash.lisp ; in: DEFUN SIPHASH-DIGEST ; (LET ((IRONCLAD::BUFFER (COPY-SEQ (IRONCLAD::SIPHASH-BUFFER IRONCLAD::MAC))) ; (IRONCLAD::BUFFER-LENGTH ; (IRONCLAD::SIPHASH-BUFFER-LENGTH IRONCLAD::MAC)) ; (IRONCLAD::STATE (COPY-SEQ (IRONCLAD::SIPHASH-STATE IRONCLAD::MAC))) ; (IRONCLAD::COMPRESSION-ROUNDS ; (IRONCLAD::SIPHASH-COMPRESSION-ROUNDS IRONCLAD::MAC)) ; (IRONCLAD::FINALIZATION-ROUNDS ; (IRONCLAD::SIPHASH-FINALIZATION-ROUNDS IRONCLAD::MAC)) ; (IRONCLAD:DIGEST-LENGTH ; (IRONCLAD::SIPHASH-DIGEST-LENGTH IRONCLAD::MAC)) ; (IRONCLAD::DATA-LENGTH (IRONCLAD::SIPHASH-DATA-LENGTH IRONCLAD::MAC))) ; (DECLARE (TYPE (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (8)) IRONCLAD::BUFFER) ; (TYPE (INTEGER 0 8) IRONCLAD::BUFFER-LENGTH) ; (TYPE (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (4)) IRONCLAD::STATE) ; (TYPE FIXNUM IRONCLAD::COMPRESSION-ROUNDS ; IRONCLAD::FINALIZATION-ROUNDS IRONCLAD:DIGEST-LENGTH ; IRONCLAD::DATA-LENGTH) ; (DYNAMIC-EXTENT IRONCLAD::BUFFER IRONCLAD::STATE)) ; (FILL IRONCLAD::BUFFER 0 :START IRONCLAD::BUFFER-LENGTH) ; (SETF (AREF IRONCLAD::BUFFER 7) (MOD IRONCLAD::DATA-LENGTH 256)) ; (IRONCLAD::SIPHASH-COMPRESS IRONCLAD::STATE IRONCLAD::BUFFER 0 8 ; IRONCLAD::DATA-LENGTH IRONCLAD::COMPRESSION-ROUNDS) ; (LET ((IRONCLAD::TAG (MAKE-ARRAY IRONCLAD:DIGEST-LENGTH :ELEMENT-TYPE '#))) ; (IRONCLAD::SIPHASH-FINALIZE IRONCLAD::STATE IRONCLAD::FINALIZATION-ROUNDS ; IRONCLAD::TAG) ; IRONCLAD::TAG)) ; --> LET VALUES ; ==> ; 1 ; ; note: could not stack allocate #:G38 in: ; (LET ((BUFFER (COPY-SEQ (SIPHASH-BUFFER MAC))) ; (BUFFER-LENGTH (SIPHASH-BUFFER-LENGTH MAC)) ; (STATE (COPY-SEQ (SIPHASH-STATE MAC))) ; (COMPRESSION-ROUNDS (SIPHASH-COMPRESSION-ROUNDS MAC)) ; (FINALIZATION-ROUNDS (SIPHASH-FINALIZATION-ROUNDS MAC)) ; (DIGEST-LENGTH (SIPHASH-DIGEST-LENGTH MAC)) ; (DATA-LENGTH (SIPHASH-DATA-LENGTH MAC))) ; (DECLARE (TYPE (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (8)) BUFFER) ; (TYPE (INTEGER 0 8) BUFFER-LENGTH) ; (TYPE (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (4)) STATE) ; (TYPE FIXNUM COMPRESSION-ROUNDS FINALIZATION-ROUNDS ; DIGEST-LENGTH DATA-LENGTH) ; (DYNAMIC-EXTENT BUFFER STATE)) ; (FILL BUFFER 0 :START BUFFER-LENGTH) ; (SETF (AREF BUFFER 7) (MOD DATA-LENGTH 256)) ; (SIPHASH-COMPRESS STATE BUFFER 0 8 DATA-LENGTH COMPRESSION-ROUNDS) ; (LET ((TAG ; (MAKE-ARRAY DIGEST-LENGTH :ELEMENT-TYPE '(UNSIGNED-BYTE 8)))) ; (SIPHASH-FINALIZE STATE FINALIZATION-ROUNDS TAG) ; TAG)) ; ; note: could not stack allocate #:G34 in: ; (LET ((BUFFER (COPY-SEQ (SIPHASH-BUFFER MAC))) ; (BUFFER-LENGTH (SIPHASH-BUFFER-LENGTH MAC)) ; (STATE (COPY-SEQ (SIPHASH-STATE MAC))) ; (COMPRESSION-ROUNDS (SIPHASH-COMPRESSION-ROUNDS MAC)) ; (FINALIZATION-ROUNDS (SIPHASH-FINALIZATION-ROUNDS MAC)) ; (DIGEST-LENGTH (SIPHASH-DIGEST-LENGTH MAC)) ; (DATA-LENGTH (SIPHASH-DATA-LENGTH MAC))) ; (DECLARE (TYPE (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (8)) BUFFER) ; (TYPE (INTEGER 0 8) BUFFER-LENGTH) ; (TYPE (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (4)) STATE) ; (TYPE FIXNUM COMPRESSION-ROUNDS FINALIZATION-ROUNDS ; DIGEST-LENGTH DATA-LENGTH) ; (DYNAMIC-EXTENT BUFFER STATE)) ; (FILL BUFFER 0 :START BUFFER-LENGTH) ; (SETF (AREF BUFFER 7) (MOD DATA-LENGTH 256)) ; (SIPHASH-COMPRESS STATE BUFFER 0 8 DATA-LENGTH COMPRESSION-ROUNDS) ; (LET ((TAG ; (MAKE-ARRAY DIGEST-LENGTH :ELEMENT-TYPE '(UNSIGNED-BYTE 8)))) ; (SIPHASH-FINALIZE STATE FINALIZATION-ROUNDS TAG) ; TAG)) ; processing (DEFMAC SIPHASH ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/macs/siphash-tmpU8KQLETJ.fasl ; compilation finished in 0:00:00.104 ; compiling file "/usr/share/common-lisp/source/ironclad/src/macs/skein-mac.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/macs/skein-mac-tmpLBWGBOTB.fasl ; compilation finished in 0:00:00.092 ; compiling file "/usr/share/common-lisp/source/ironclad/src/prng/generator.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/prng/generator-tmpRX2XGI9U.fasl ; compilation finished in 0:00:00.028 ; compiling file "/usr/share/common-lisp/source/ironclad/src/prng/fortuna.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/prng/fortuna-tmpT2A3PQL9.fasl ; compilation finished in 0:00:00.048 ; compiling file "/usr/share/common-lisp/source/ironclad/src/aead/eax.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/aead/eax-tmpOVHYA3BO.fasl ; compilation finished in 0:00:00.080 ; compiling file "/usr/share/common-lisp/source/ironclad/src/aead/etm.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/aead/etm-tmpLT3TYWCE.fasl ; compilation finished in 0:00:00.096 ; compiling file "/usr/share/common-lisp/source/ironclad/src/aead/gcm.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS GCM ...) ; processing (DEFMETHOD SHARED-INITIALIZE ...) ; processing (DEFMETHOD PROCESS-ASSOCIATED-DATA ...) ; processing (DEFMETHOD PRODUCE-TAG ...) ; processing (DEFMETHOD ENCRYPT ...) ; file: /usr/share/common-lisp/source/ironclad/src/aead/gcm.lisp ; in: DEFMETHOD ENCRYPT (GCM T T) ; (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :INITIAL-ELEMENT 0) ; ; note: could not stack allocate: ; (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :INITIAL-ELEMENT 0) ; processing (DEFMETHOD DECRYPT ...) ; file: /usr/share/common-lisp/source/ironclad/src/aead/gcm.lisp ; in: DEFMETHOD DECRYPT (GCM T T) ; (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :INITIAL-ELEMENT 0) ; ; note: could not stack allocate: ; (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :INITIAL-ELEMENT 0) ; processing (DEFMETHOD ENCRYPT-MESSAGE ...) ; processing (DEFMETHOD DECRYPT-MESSAGE ...) ; processing (DEFAEAD GCM) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/aead/gcm-tmp3YF2HENI.fasl ; compilation finished in 0:00:00.100 ; compiling file "/usr/share/common-lisp/source/ironclad/src/kdf/argon2.lisp" (written 18 FEB 2022 01:39:10 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/kdf/argon2.lisp ; in: DEFUN ARGON2-G-COPY ; (MAKE-ARRAY IRONCLAD::+ARGON2-BLOCK-SIZE+ :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: ; (MAKE-ARRAY +ARGON2-BLOCK-SIZE+ :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; processing (DEFUN ARGON2-G-XOR ...) ; file: /usr/share/common-lisp/source/ironclad/src/kdf/argon2.lisp ; in: DEFUN ARGON2-G-XOR ; (MAKE-ARRAY IRONCLAD::+ARGON2-BLOCK-SIZE+ :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: ; (MAKE-ARRAY +ARGON2-BLOCK-SIZE+ :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; processing (DEFUN ARGON2-UNARY-G ...) ; file: /usr/share/common-lisp/source/ironclad/src/kdf/argon2.lisp ; in: DEFUN ARGON2-UNARY-G ; (MAKE-ARRAY IRONCLAD::+ARGON2-BLOCK-SIZE+ :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: ; (MAKE-ARRAY +ARGON2-BLOCK-SIZE+ :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/kdf/argon2.lisp ; in: DEFMETHOD DERIVE-KEY (ARGON2 T T T T) ; (MAKE-ARRAY 72 :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) ; ; note: could not stack allocate: (MAKE-ARRAY 72 :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) ; (MAKE-ARRAY IRONCLAD::+ARGON2-BLOCK-SIZE+ :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; ; note: could not stack allocate: ; (MAKE-ARRAY +ARGON2-BLOCK-SIZE+ :ELEMENT-TYPE '(UNSIGNED-BYTE 64)) ; (MAKE-ARRAY 1024 :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) ; ; note: could not stack allocate: (MAKE-ARRAY 1024 :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/kdf/argon2-tmp9EEV8FN4.fasl ; compilation finished in 0:00:02.100 ; compiling file "/usr/share/common-lisp/source/ironclad/src/kdf/bcrypt.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/kdf/bcrypt-tmpDK25NJJO.fasl ; compilation finished in 0:00:00.124 ; compiling file "/usr/share/common-lisp/source/ironclad/src/kdf/hmac.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/kdf/hmac-tmpNMZ5RT9R.fasl ; compilation finished in 0:00:00.020 ; compiling file "/usr/share/common-lisp/source/ironclad/src/kdf/pkcs5.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/kdf/pkcs5-tmp8K51P1O1.fasl ; compilation finished in 0:00:00.044 ; compiling file "/usr/share/common-lisp/source/ironclad/src/kdf/password-hash.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/kdf/password-hash-tmpXAVJ8WEV.fasl ; compilation finished in 0:00:00.028 ; compiling file "/usr/share/common-lisp/source/ironclad/src/kdf/scrypt.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS SCRYPT-KDF ...) ; processing (DEFUN SCRYPT-VECTOR-SALSA ...) ; file: /usr/share/common-lisp/source/ironclad/src/kdf/scrypt.lisp ; in: DEFUN SCRYPT-VECTOR-SALSA ; (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 32)) ; ; note: could not stack allocate: (MAKE-ARRAY 16 :ELEMENT-TYPE '(UNSIGNED-BYTE 32)) ; processing (DEFUN BLOCK-MIX ...) ; file: /usr/share/common-lisp/source/ironclad/src/kdf/scrypt.lisp ; in: DEFUN BLOCK-MIX ; (MAKE-ARRAY 64 :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) ; ; note: could not stack allocate: (MAKE-ARRAY 64 :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) ; processing (DEFUN SMIX ...) ; processing (DEFMETHOD DERIVE-KEY ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/kdf/scrypt-tmpOZHFIU2N.fasl ; compilation finished in 0:00:00.044 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/dsa.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/public-key/dsa-tmpJD9SCIW3.fasl ; compilation finished in 0:00:00.220 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/rsa.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/public-key/rsa-tmpICVK4HSI.fasl ; compilation finished in 0:00:00.212 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/elgamal.lisp" (written 18 FEB 2022 01:39:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/public-key/elgamal-tmpA5CK3QHN.fasl ; compilation finished in 0:00:00.264 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/curve25519.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS CURVE25519-PUBLIC-KEY ...) ; processing (DEFCLASS CURVE25519-PRIVATE-KEY ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/curve25519.lisp ; in: DEFUN CURVE25519-DOUBLE-AND-ADD ; (+ IRONCLAD::X1 IRONCLAD::Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::X1 IRONCLAD::Z1) IRONCLAD::+CURVE25519-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; (* IRONCLAD::T1 IRONCLAD::T1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- IRONCLAD::X1 IRONCLAD::Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (MOD (- IRONCLAD::X1 IRONCLAD::Z1) IRONCLAD::+CURVE25519-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; (* IRONCLAD::T3 IRONCLAD::T3) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- IRONCLAD::T2 IRONCLAD::T4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- IRONCLAD::T2 IRONCLAD::T4) IRONCLAD::+CURVE25519-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; (+ IRONCLAD::X2 IRONCLAD::Z2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::X2 IRONCLAD::Z2) IRONCLAD::+CURVE25519-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; (- IRONCLAD::X2 IRONCLAD::Z2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (MOD (- IRONCLAD::X2 IRONCLAD::Z2) IRONCLAD::+CURVE25519-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; (* IRONCLAD::T1 IRONCLAD::T7) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::T3 IRONCLAD::T6) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (+ IRONCLAD::T8 IRONCLAD::T9) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 115792089237316195423570985008687907853269984665640564039457584007913129639897) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 115792089237316195423570985008687907853269984665640564039457584007913129639897) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (- IRONCLAD::T8 IRONCLAD::T9) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- IRONCLAD::T8 IRONCLAD::T9) IRONCLAD::+CURVE25519-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; (* IRONCLAD::T2 IRONCLAD::T4) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::T5 IRONCLAD::+CURVE25519-A24+) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 7043980164573656116202093731033511498437972977164912432212323207953379415383793369) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 7043980164573656116202093731033511498437972977164912432212323207953379415383793369) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (+ IRONCLAD::T4 IRONCLAD::T12) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 115792089237316195423570985008687907853269984665640564039457584007913129639897) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 115792089237316195423570985008687907853269984665640564039457584007913129639897) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::T5 IRONCLAD::T13) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::T10 IRONCLAD::T10) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::T11 IRONCLAD::T11) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::X3 IRONCLAD::T14) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (* IRONCLAD::X3 IRONCLAD::T14) IRONCLAD::+CURVE25519-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; processing (DEFMETHOD EC-SCALAR-MULT ...) ; processing (DEFMETHOD EC-ENCODE-SCALAR ...) ; processing (DEFMETHOD EC-DECODE-SCALAR ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/curve25519.lisp ; in: DEFMETHOD EC-DECODE-SCALAR ((EQL :CURVE25519) T) ; (LDB (BYTE (1- IRONCLAD::+CURVE25519-BITS+) 0) ; (IRONCLAD:OCTETS-TO-INTEGER IRONCLAD::OCTETS :BIG-ENDIAN NIL)) ; ; 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). ; (SETF (LDB (BYTE 3 0) IRONCLAD::X) 0) ; --> SETQ THE DPB ; ==> ; 1 ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) ; &REST T). ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; (SETF (LDB (BYTE 1 (- IRONCLAD::+CURVE25519-BITS+ 2)) IRONCLAD::X) 1) ; --> SETQ THE DPB ; ==> ; 1 ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) ; &REST T). ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; processing (DEFMETHOD EC-ENCODE-POINT ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/curve25519.lisp ; in: DEFMETHOD EC-ENCODE-POINT (CURVE25519-POINT) ; (* IRONCLAD::X (IRONCLAD::EC-SCALAR-INV :CURVE25519 IRONCLAD::Z)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::X (IRONCLAD::EC-SCALAR-INV :CURVE25519 IRONCLAD::Z)) ; IRONCLAD::+CURVE25519-P+) ; ; 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 ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-57896044618658097711785492504343953926634992332820282019728792003956564819949) ; (57896044618658097711785492504343953926634992332820282019728792003956564819949))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-57896044618658097711785492504343953926634992332820282019728792003956564819949) ; (57896044618658097711785492504343953926634992332820282019728792003956564819949))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-57896044618658097711785492504343953926634992332820282019728792003956564819949) ; (57896044618658097711785492504343953926634992332820282019728792003956564819949))), 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. ; (* IRONCLAD::X (IRONCLAD::EC-SCALAR-INV :CURVE25519 IRONCLAD::Z)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::X (IRONCLAD::EC-SCALAR-INV :CURVE25519 IRONCLAD::Z)) ; IRONCLAD::+CURVE25519-P+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFMETHOD EC-DECODE-POINT ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/curve25519.lisp ; in: DEFMETHOD EC-DECODE-POINT ((EQL :CURVE25519) T) ; (LDB (BYTE (1- IRONCLAD::+CURVE25519-BITS+) 0) ; (IRONCLAD:OCTETS-TO-INTEGER IRONCLAD::OCTETS :BIG-ENDIAN NIL)) ; ; 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). ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/public-key/curve25519-tmp5KE6HXAY.fasl ; compilation finished in 0:00:00.072 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/curve448.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS CURVE448-PUBLIC-KEY ...) ; processing (DEFCLASS CURVE448-PRIVATE-KEY ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/curve448.lisp ; in: DEFUN CURVE448-DOUBLE-AND-ADD ; (+ IRONCLAD::X1 IRONCLAD::Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::X1 IRONCLAD::Z1) IRONCLAD::+CURVE448-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (- IRONCLAD::X1 IRONCLAD::Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (MOD (- IRONCLAD::X1 IRONCLAD::Z1) IRONCLAD::+CURVE448-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (- IRONCLAD::X2 IRONCLAD::Z2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (MOD (- IRONCLAD::X2 IRONCLAD::Z2) IRONCLAD::+CURVE448-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (* IRONCLAD::T1 IRONCLAD::T3) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (+ IRONCLAD::X2 IRONCLAD::Z2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::X2 IRONCLAD::Z2) IRONCLAD::+CURVE448-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (* IRONCLAD::T2 IRONCLAD::T5) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- IRONCLAD::T4 IRONCLAD::T6) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- IRONCLAD::T4 IRONCLAD::T6) IRONCLAD::+CURVE448-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (* IRONCLAD::T7 IRONCLAD::T7) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::X3 IRONCLAD::T8) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (* IRONCLAD::X3 IRONCLAD::T8) IRONCLAD::+CURVE448-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (+ IRONCLAD::T4 IRONCLAD::T6) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 1453677448591213781098647615776009068707282721374636120562980398361224656333461545372792767397353091860177768923687274722106996036730877) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 1453677448591213781098647615776009068707282721374636120562980398361224656333461545372792767397353091860177768923687274722106996036730877) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::T9 IRONCLAD::T9) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::T1 IRONCLAD::T1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::T2 IRONCLAD::T2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::T10 IRONCLAD::T11) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- IRONCLAD::T10 IRONCLAD::T11) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- IRONCLAD::T10 IRONCLAD::T11) IRONCLAD::+CURVE448-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (* IRONCLAD::T12 IRONCLAD::+CURVE448-A24+) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 28405584184196612889558123736071105207074658017021077113860918474177510397084005327357057071327978091493803693653311191707331756055739682479) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 28405584184196612889558123736071105207074658017021077113860918474177510397084005327357057071327978091493803693653311191707331756055739682479) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (+ IRONCLAD::T13 IRONCLAD::T10) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 1453677448591213781098647615776009068707282721374636120562980398361224656333461545372792767397353091860177768923687274722106996036730877) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 1453677448591213781098647615776009068707282721374636120562980398361224656333461545372792767397353091860177768923687274722106996036730877) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::T14 IRONCLAD::T12) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; processing (DEFMETHOD EC-SCALAR-MULT ...) ; processing (DEFMETHOD EC-ENCODE-SCALAR ...) ; processing (DEFMETHOD EC-DECODE-SCALAR ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/curve448.lisp ; in: DEFMETHOD EC-DECODE-SCALAR ((EQL :CURVE448) T) ; (LDB (BYTE IRONCLAD::+CURVE448-BITS+ 0) ; (IRONCLAD:OCTETS-TO-INTEGER IRONCLAD::OCTETS :BIG-ENDIAN NIL)) ; ; 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). ; (SETF (LDB (BYTE 2 0) IRONCLAD::X) 0) ; --> SETQ THE DPB ; ==> ; 1 ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) ; &REST T). ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; (SETF (LDB (BYTE 1 (1- IRONCLAD::+CURVE448-BITS+)) IRONCLAD::X) 1) ; --> SETQ THE DPB ; ==> ; 1 ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) ; &REST T). ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; processing (DEFMETHOD EC-ENCODE-POINT ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/curve448.lisp ; in: DEFMETHOD EC-ENCODE-POINT (CURVE448-POINT) ; (* IRONCLAD::X (IRONCLAD::EC-SCALAR-INV :CURVE448 IRONCLAD::Z)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::X (IRONCLAD::EC-SCALAR-INV :CURVE448 IRONCLAD::Z)) ; IRONCLAD::+CURVE448-P+) ; ; 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 ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439) ; (726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439) ; (726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439) ; (726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439))), 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. ; (* IRONCLAD::X (IRONCLAD::EC-SCALAR-INV :CURVE448 IRONCLAD::Z)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::X (IRONCLAD::EC-SCALAR-INV :CURVE448 IRONCLAD::Z)) ; IRONCLAD::+CURVE448-P+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFMETHOD EC-DECODE-POINT ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/curve448.lisp ; in: DEFMETHOD EC-DECODE-POINT ((EQL :CURVE448) T) ; (LDB (BYTE IRONCLAD::+CURVE448-BITS+ 0) ; (IRONCLAD:OCTETS-TO-INTEGER IRONCLAD::OCTETS :BIG-ENDIAN NIL)) ; ; 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). ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/public-key/curve448-tmp5UBS1APN.fasl ; compilation finished in 0:00:00.076 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/ed25519.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS ED25519-PUBLIC-KEY ...) ; processing (DEFCLASS ED25519-PRIVATE-KEY ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/ed25519.lisp ; in: DEFUN ED25519-RECOVER-X ; (* IRONCLAD::UV3 ; (IRONCLAD:EXPT-MOD IRONCLAD::UV7 (/ (- IRONCLAD::+ED25519-Q+ 5) 8) ; IRONCLAD::+ED25519-Q+)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD ; (* IRONCLAD::UV3 ; (IRONCLAD:EXPT-MOD IRONCLAD::UV7 (/ (- IRONCLAD::+ED25519-Q+ 5) 8) ; IRONCLAD::+ED25519-Q+)) ; IRONCLAD::+ED25519-Q+) ; ; 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 ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-57896044618658097711785492504343953926634992332820282019728792003956564819949) ; (57896044618658097711785492504343953926634992332820282019728792003956564819949))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-57896044618658097711785492504343953926634992332820282019728792003956564819949) ; (57896044618658097711785492504343953926634992332820282019728792003956564819949))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-57896044618658097711785492504343953926634992332820282019728792003956564819949) ; (57896044618658097711785492504343953926634992332820282019728792003956564819949))), 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. ; (* IRONCLAD::Y IRONCLAD::Y) ; ; note: forced to do full call ; 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 UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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 UNSIGNED-BYTE . #1#), not a (VALUES ; (SIGNED-BYTE 64) ; . #1#). ; etc. ; (1- (* IRONCLAD::Y IRONCLAD::Y)) ; ; 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 (INTEGER -1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES (INTEGER -1) . #1#), not a (VALUES ; (SIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (1- (* IRONCLAD::Y IRONCLAD::Y)) IRONCLAD::+ED25519-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; (1+ IRONCLAD::U) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (INTEGER 1 ; 57896044618658097711785492504343953926634992332820282019728792003956564819949) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER 1 ; 57896044618658097711785492504343953926634992332820282019728792003956564819949) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::V IRONCLAD::V IRONCLAD::V) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 194064761537588616893622436057812819407110752139587076392381504753256369085595993672410662147087199368837878645229193663462561604848498377274709448929113913002071147247356829369437895575864476831150950995459034595069848999419699393) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 194064761537588616893622436057812819407110752139587076392381504753256369085595993672410662147087199368837878645229193663462561604848498377274709448929113913002071147247356829369437895575864476831150950995459034595069848999419699393) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::U IRONCLAD::V3) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::UV3 IRONCLAD::V3 IRONCLAD::V) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 194064761537588616893622436057812819407110752139587076392381504753256369085595993672410662147087199368837878645229193663462561604848498377274709448929113913002071147247356829369437895575864476831150950995459034595069848999419699393) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 194064761537588616893622436057812819407110752139587076392381504753256369085595993672410662147087199368837878645229193663462561604848498377274709448929113913002071147247356829369437895575864476831150950995459034595069848999419699393) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::UV3 ; (IRONCLAD:EXPT-MOD IRONCLAD::UV7 (/ (- IRONCLAD::+ED25519-Q+ 5) 8) ; IRONCLAD::+ED25519-Q+)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD ; (* IRONCLAD::UV3 ; (IRONCLAD:EXPT-MOD IRONCLAD::UV7 (/ (- IRONCLAD::+ED25519-Q+ 5) 8) ; IRONCLAD::+ED25519-Q+)) ; IRONCLAD::+ED25519-Q+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::V IRONCLAD::X IRONCLAD::X) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 194064761537588616893622436057812819407110752139587076392381504753256369085595993672410662147087199368837878645229193663462561604848498377274709448929113913002071147247356829369437895575864476831150950995459034595069848999419699393) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 194064761537588616893622436057812819407110752139587076392381504753256369085595993672410662147087199368837878645229193663462561604848498377274709448929113913002071147247356829369437895575864476831150950995459034595069848999419699393) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (= IRONCLAD::U ; (MOD (* IRONCLAD::V IRONCLAD::X IRONCLAD::X) IRONCLAD::+ED25519-Q+)) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (UNSIGNED-BYTE ; 64). ; etc. ; processing (DEFMETHOD EC-ADD ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/ed25519.lisp ; in: DEFMETHOD EC-ADD (ED25519-POINT ED25519-POINT) ; (- IRONCLAD::Y1 IRONCLAD::X1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (- IRONCLAD::Y2 IRONCLAD::X2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (* (- IRONCLAD::Y1 IRONCLAD::X1) (- IRONCLAD::Y2 IRONCLAD::X2)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* (- IRONCLAD::Y1 IRONCLAD::X1) (- IRONCLAD::Y2 IRONCLAD::X2)) ; IRONCLAD::+ED25519-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; (+ IRONCLAD::Y1 IRONCLAD::X1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (+ IRONCLAD::Y2 IRONCLAD::X2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (* (+ IRONCLAD::Y1 IRONCLAD::X1) (+ IRONCLAD::Y2 IRONCLAD::X2)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* (+ IRONCLAD::Y1 IRONCLAD::X1) (+ IRONCLAD::Y2 IRONCLAD::X2)) ; IRONCLAD::+ED25519-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; (* IRONCLAD::W1 IRONCLAD::W2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::W1 IRONCLAD::W2) IRONCLAD::+ED25519-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; (* 2 IRONCLAD::Z1 IRONCLAD::Z2) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; 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 . #2#). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* 2 IRONCLAD::Z1 IRONCLAD::Z2) IRONCLAD::+ED25519-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; (- IRONCLAD::B IRONCLAD::A) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- IRONCLAD::B IRONCLAD::A) IRONCLAD::+ED25519-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; (- IRONCLAD::D IRONCLAD::C) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- IRONCLAD::D IRONCLAD::C) IRONCLAD::+ED25519-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; (+ IRONCLAD::D IRONCLAD::C) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 115792089237316195423570985008687907853269984665640564039457584007913129639897) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 115792089237316195423570985008687907853269984665640564039457584007913129639897) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (+ IRONCLAD::B IRONCLAD::A) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 115792089237316195423570985008687907853269984665640564039457584007913129639897) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 115792089237316195423570985008687907853269984665640564039457584007913129639897) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::E IRONCLAD::F) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::G IRONCLAD::H) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::F IRONCLAD::G) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::E IRONCLAD::H) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; processing (DEFMETHOD EC-DOUBLE ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/ed25519.lisp ; in: DEFMETHOD EC-DOUBLE (ED25519-POINT) ; (* IRONCLAD::X1 IRONCLAD::X1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::X1 IRONCLAD::X1) IRONCLAD::+ED25519-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; (* IRONCLAD::Y1 IRONCLAD::Y1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Y1 IRONCLAD::Y1) IRONCLAD::+ED25519-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; (* 2 IRONCLAD::Z1 IRONCLAD::Z1) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; 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 . #2#). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* 2 IRONCLAD::Z1 IRONCLAD::Z1) IRONCLAD::+ED25519-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; (+ IRONCLAD::X1 IRONCLAD::Y1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::X1 IRONCLAD::Y1) IRONCLAD::+ED25519-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; (* IRONCLAD::D IRONCLAD::D) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (+ IRONCLAD::A IRONCLAD::B) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 115792089237316195423570985008687907853269984665640564039457584007913129639897) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 115792089237316195423570985008687907853269984665640564039457584007913129639897) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (- IRONCLAD::H IRONCLAD::I) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- IRONCLAD::H IRONCLAD::I) IRONCLAD::+ED25519-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; (- IRONCLAD::A IRONCLAD::B) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- IRONCLAD::A IRONCLAD::B) IRONCLAD::+ED25519-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; (+ IRONCLAD::C IRONCLAD::G) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 115792089237316195423570985008687907853269984665640564039457584007913129639897) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 115792089237316195423570985008687907853269984665640564039457584007913129639897) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::E IRONCLAD::F) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::G IRONCLAD::H) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::F IRONCLAD::G) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::E IRONCLAD::H) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 3351951982485649274893506249551461531869841455148098344430890360930441007516070902415722250633254437222334206389556113020125659422197490806450149658722705) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; processing (DEFMETHOD EC-SCALAR-MULT ...) ; processing (DEFMETHOD EC-POINT-ON-CURVE-P ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/ed25519.lisp ; in: DEFMETHOD EC-POINT-ON-CURVE-P (ED25519-POINT) ; (* IRONCLAD::X IRONCLAD::X) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::X IRONCLAD::X) IRONCLAD::+ED25519-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; (* IRONCLAD::Y IRONCLAD::Y) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Y IRONCLAD::Y) IRONCLAD::+ED25519-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; (* IRONCLAD::Z IRONCLAD::Z) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z IRONCLAD::Z) IRONCLAD::+ED25519-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; (* IRONCLAD::W IRONCLAD::W) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::W IRONCLAD::W) IRONCLAD::+ED25519-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; (- IRONCLAD::YY IRONCLAD::XX) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- IRONCLAD::YY IRONCLAD::XX) IRONCLAD::+ED25519-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; (+ IRONCLAD::ZZ (* IRONCLAD::+ED25519-D+ IRONCLAD::WW)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 2147694645954241852484040567486267188178402270445892907140121793157764114386211238650957099786829249829777408518992270436843721382558176074814068640355141), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 2147694645954241852484040567486267188178402270445892907140121793157764114386269134695575757884541035322281752472918905429176541664577904866818025205175089) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (MOD ; 2147694645954241852484040567486267188178402270445892907140121793157764114386211238650957099786829249829777408518992270436843721382558176074814068640355141), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 2147694645954241852484040567486267188178402270445892907140121793157764114386269134695575757884541035322281752472918905429176541664577904866818025205175089) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (- IRONCLAD::A IRONCLAD::B) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819949), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- IRONCLAD::A IRONCLAD::B) IRONCLAD::+ED25519-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; processing (DEFMETHOD EC-POINT-EQUAL ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/ed25519.lisp ; in: DEFMETHOD EC-POINT-EQUAL (ED25519-POINT ED25519-POINT) ; (* IRONCLAD::X1 IRONCLAD::Z2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (* IRONCLAD::X2 IRONCLAD::Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (- (* IRONCLAD::X1 IRONCLAD::Z2) (* IRONCLAD::X2 IRONCLAD::Z1)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (MOD (- (* IRONCLAD::X1 IRONCLAD::Z2) (* IRONCLAD::X2 IRONCLAD::Z1)) ; IRONCLAD::+ED25519-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; (* IRONCLAD::Y1 IRONCLAD::Z2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (* IRONCLAD::Y2 IRONCLAD::Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (- (* IRONCLAD::Y1 IRONCLAD::Z2) (* IRONCLAD::Y2 IRONCLAD::Z1)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (MOD (- (* IRONCLAD::Y1 IRONCLAD::Z2) (* IRONCLAD::Y2 IRONCLAD::Z1)) ; IRONCLAD::+ED25519-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; processing (DEFMETHOD EC-ENCODE-SCALAR ...) ; processing (DEFMETHOD EC-DECODE-SCALAR ...) ; processing (DEFMETHOD EC-ENCODE-POINT ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/ed25519.lisp ; in: DEFMETHOD EC-ENCODE-POINT (ED25519-POINT) ; (SETF (LDB (BYTE 1 (- IRONCLAD::+ED25519-BITS+ 1)) IRONCLAD::Y) ; (LDB (BYTE 1 0) IRONCLAD::X)) ; --> SETQ THE DPB ; ==> ; 1 ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES (UNSIGNED-BYTE 256) &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; &REST T). ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES (UNSIGNED-BYTE 256) &OPTIONAL), not a (VALUES ; (SIGNED-BYTE ; 64) ; &REST T). ; (* IRONCLAD::X IRONCLAD::INVZ) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::X IRONCLAD::INVZ) IRONCLAD::+ED25519-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; (* IRONCLAD::Y IRONCLAD::INVZ) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Y IRONCLAD::INVZ) IRONCLAD::+ED25519-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; processing (DEFMETHOD EC-DECODE-POINT ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/ed25519.lisp ; in: DEFMETHOD EC-DECODE-POINT ((EQL :ED25519) T) ; (SETF (LDB (BYTE 1 (- IRONCLAD::+ED25519-BITS+ 1)) IRONCLAD::Y) 0) ; --> SETQ THE DPB ; ==> ; 1 ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) ; &REST T). ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; (LDB (BYTE 1 (- IRONCLAD::+ED25519-BITS+ 1)) IRONCLAD::Y) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; 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) ; . #2#). ; etc. ; (* IRONCLAD::X IRONCLAD::Y) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819950), not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 57896044618658097711785492504343953926634992332820282019728792003956564819950), 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::X IRONCLAD::Y) IRONCLAD::+ED25519-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -57896044618658097711785492504343953926634992332820282019728792003956564819948 ; 57896044618658097711785492504343953926634992332820282019728792003956564819948), not a FIXNUM. ; processing (DEFUN ED25519-HASH ...) ; processing (DEFUN ED25519-PUBLIC-KEY ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/ed25519.lisp ; in: DEFUN ED25519-PUBLIC-KEY ; (SUBSEQ IRONCLAD::H 0 (/ IRONCLAD::+ED25519-BITS+ 8)) ; ; 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. ; (SETF (LDB (BYTE 3 0) (ELT IRONCLAD::H 0)) 0) ; --> LET DPB ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS (SIMPLE-ARRAY * . #1=((*))) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * . #1#). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS (SIMPLE-ARRAY * (*)) ; SB-KERNEL:EXTENDED-SEQUENCE), not a LIST. ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) ; &REST T). ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; --> LET ; ==> ; (SB-KERNEL:%SETELT #:H0 0 #:NEW1) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS (SIMPLE-ARRAY * . #1=((*))) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * . #1#). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS (SIMPLE-ARRAY * (*)) ; SB-KERNEL:EXTENDED-SEQUENCE), not a LIST. ; (SETF (LDB (BYTE 2 6) (ELT IRONCLAD::H (- # 1))) 1) ; --> LET DPB ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS (SIMPLE-ARRAY * . #1=((*))) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * . #1#). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS (SIMPLE-ARRAY * (*)) ; SB-KERNEL:EXTENDED-SEQUENCE), not a LIST. ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) ; &REST T). ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; --> LET ; ==> ; (SB-KERNEL:%SETELT #:H2 (- (/ IRONCLAD::+ED25519-BITS+ 8) 1) #:NEW1) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS (SIMPLE-ARRAY * . #1=((*))) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * . #1#). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS (SIMPLE-ARRAY * (*)) ; SB-KERNEL:EXTENDED-SEQUENCE), not a LIST. ; processing (DEFMETHOD MAKE-SIGNATURE ...) ; processing (DEFMETHOD DESTRUCTURE-SIGNATURE ...) ; processing (DEFUN ED25519-SIGN ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/ed25519.lisp ; in: DEFUN ED25519-SIGN ; (SETF (LDB (BYTE 3 0) (ELT IRONCLAD::H 0)) 0) ; --> LET DPB ; ==> ; 1 ; ; 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. ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) ; &REST T). ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; --> LET ; ==> ; (SB-KERNEL:%SETELT #:H0 0 #:NEW1) ; ; 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. ; (SETF (LDB (BYTE 2 6) (ELT IRONCLAD::H (- # 1))) 1) ; --> LET DPB ; ==> ; 1 ; ; 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. ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) ; &REST T). ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; --> LET ; ==> ; (SB-KERNEL:%SETELT #:H2 (- (/ IRONCLAD::+ED25519-BITS+ 8) 1) #:NEW1) ; ; 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. ; (SUBSEQ IRONCLAD::H 0 (/ IRONCLAD::+ED25519-BITS+ 8)) ; ; 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. ; (SUBSEQ IRONCLAD::H (/ IRONCLAD::+ED25519-BITS+ 8) ; (/ IRONCLAD::+ED25519-BITS+ 4)) ; ; 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. ; (MOD (IRONCLAD::EC-DECODE-SCALAR :ED25519 IRONCLAD::RH) IRONCLAD::+ED25519-L+) ; ; 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. ; (MOD ; (IRONCLAD::EC-DECODE-SCALAR :ED25519 ; (IRONCLAD::ED25519-HASH IRONCLAD::RP ; IRONCLAD::PK IRONCLAD::M)) ; IRONCLAD::+ED25519-L+) ; ; 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 ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-7237005577332262213973186563042994240857116359379907606001950938285454250989) ; (7237005577332262213973186563042994240857116359379907606001950938285454250989))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-7237005577332262213973186563042994240857116359379907606001950938285454250989) ; (7237005577332262213973186563042994240857116359379907606001950938285454250989))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-7237005577332262213973186563042994240857116359379907606001950938285454250989) ; (7237005577332262213973186563042994240857116359379907606001950938285454250989))), 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. ; (MOD (IRONCLAD::EC-DECODE-SCALAR :ED25519 IRONCLAD::RH) IRONCLAD::+ED25519-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-7237005577332262213973186563042994240857116359379907606001950938285454250989) ; (7237005577332262213973186563042994240857116359379907606001950938285454250989))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-7237005577332262213973186563042994240857116359379907606001950938285454250989) ; (7237005577332262213973186563042994240857116359379907606001950938285454250989))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-7237005577332262213973186563042994240857116359379907606001950938285454250989) ; (7237005577332262213973186563042994240857116359379907606001950938285454250989))), 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. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (MOD ; (IRONCLAD::EC-DECODE-SCALAR :ED25519 ; (IRONCLAD::ED25519-HASH IRONCLAD::RP ; IRONCLAD::PK IRONCLAD::M)) ; IRONCLAD::+ED25519-L+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::K IRONCLAD::A) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 7237005577332262213973186563042994240857116359379907606001950938285454250989), not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 7237005577332262213973186563042994240857116359379907606001950938285454250989), 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) ; . #1#). ; etc. ; (+ (* IRONCLAD::K IRONCLAD::A) IRONCLAD::RI) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 7237005577332262213973186563042994240857116359379907606001950938285454250989), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a (MOD ; 7237005577332262213973186563042994240857116359379907606001950938285454250989), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ (* IRONCLAD::K IRONCLAD::A) IRONCLAD::RI) IRONCLAD::+ED25519-L+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -7237005577332262213973186563042994240857116359379907606001950938285454250988 ; 7237005577332262213973186563042994240857116359379907606001950938285454250988), not a FIXNUM. ; processing (DEFUN ED25519-VERIFY ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/ed25519.lisp ; in: DEFUN ED25519-VERIFY ; (MOD ; (IRONCLAD::EC-DECODE-SCALAR :ED25519 ; (IRONCLAD::ED25519-HASH IRONCLAD::R IRONCLAD::PK ; IRONCLAD::M)) ; IRONCLAD::+ED25519-L+) ; ; 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 ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-7237005577332262213973186563042994240857116359379907606001950938285454250989) ; (7237005577332262213973186563042994240857116359379907606001950938285454250989))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-7237005577332262213973186563042994240857116359379907606001950938285454250989) ; (7237005577332262213973186563042994240857116359379907606001950938285454250989))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-7237005577332262213973186563042994240857116359379907606001950938285454250989) ; (7237005577332262213973186563042994240857116359379907606001950938285454250989))), 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. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/public-key/ed25519-tmpSI9E4AQB.fasl ; compilation finished in 0:00:00.188 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/ed448.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS ED448-PUBLIC-KEY ...) ; processing (DEFCLASS ED448-PRIVATE-KEY ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DEFCONST +ED448-DOM+ ...) ; processing (DEFMETHOD EC-SCALAR-INV ...) ; processing (DEFUN ED448-RECOVER-X ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/ed448.lisp ; in: DEFUN ED448-RECOVER-X ; (* IRONCLAD::U3V ; (IRONCLAD:EXPT-MOD IRONCLAD::U5V3 (/ (- IRONCLAD::+ED448-Q+ 3) 4) ; IRONCLAD::+ED448-Q+)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD ; (* IRONCLAD::U3V ; (IRONCLAD:EXPT-MOD IRONCLAD::U5V3 (/ (- IRONCLAD::+ED448-Q+ 3) 4) ; IRONCLAD::+ED448-Q+)) ; IRONCLAD::+ED448-Q+) ; ; 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 ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439) ; (726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439) ; (726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439) ; (726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439))), 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. ; (* IRONCLAD::Y IRONCLAD::Y) ; ; note: forced to do full call ; 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 UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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 UNSIGNED-BYTE . #1#), not a (VALUES ; (SIGNED-BYTE 64) ; . #1#). ; etc. ; (1- (* IRONCLAD::Y IRONCLAD::Y)) ; ; 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 (INTEGER -1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64). ; The result is a (VALUES (INTEGER -1) . #1#), not a (VALUES ; (SIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (1- (* IRONCLAD::Y IRONCLAD::Y)) IRONCLAD::+ED448-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (1+ IRONCLAD::U) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (INTEGER 1 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER 1 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::+ED448-D+ (1+ IRONCLAD::U)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER 1 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -28405584184196612889558123736071105207074658017021077113860918474177510397084005327357057071327978091493803693653311191707331756055739721559 ; -39081) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (INTEGER 1 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -28405584184196612889558123736071105207074658017021077113860918474177510397084005327357057071327978091493803693653311191707331756055739721559 ; -39081) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; (1- (* IRONCLAD::+ED448-D+ (1+ IRONCLAD::U))) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -28405584184196612889558123736071105207074658017021077113860918474177510397084005327357057071327978091493803693653311191707331756055739721559 ; -39081), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -28405584184196612889558123736071105207074658017021077113860918474177510397084005327357057071327978091493803693653311191707331756055739721560 ; -39082) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER ; -28405584184196612889558123736071105207074658017021077113860918474177510397084005327357057071327978091493803693653311191707331756055739721559 ; -39081), not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER ; -28405584184196612889558123736071105207074658017021077113860918474177510397084005327357057071327978091493803693653311191707331756055739721560 ; -39082) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; (MOD (1- (* IRONCLAD::+ED448-D+ (1+ IRONCLAD::U))) IRONCLAD::+ED448-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 0), not a FIXNUM. ; (* IRONCLAD::U IRONCLAD::V) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::U IRONCLAD::U IRONCLAD::UV) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 383984923062992702193107238768305990575971314802788874095145673202033267015866160824156542228134514790183983507016891440783606607878560120446759002880024553793796781079076555940582389267580537359243311262284327013495014833399929662539661053437671746996921499531190282669815840119244221198707642915966992579932173647238953260602561484622551570055889936319200163724829307589544003296741511201335648379207673) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 383984923062992702193107238768305990575971314802788874095145673202033267015866160824156542228134514790183983507016891440783606607878560120446759002880024553793796781079076555940582389267580537359243311262284327013495014833399929662539661053437671746996921499531190282669815840119244221198707642915966992579932173647238953260602561484622551570055889936319200163724829307589544003296741511201335648379207673) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::U3V IRONCLAD::UV IRONCLAD::UV) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 383984923062992702193107238768305990575971314802788874095145673202033267015866160824156542228134514790183983507016891440783606607878560120446759002880024553793796781079076555940582389267580537359243311262284327013495014833399929662539661053437671746996921499531190282669815840119244221198707642915966992579932173647238953260602561484622551570055889936319200163724829307589544003296741511201335648379207673) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 383984923062992702193107238768305990575971314802788874095145673202033267015866160824156542228134514790183983507016891440783606607878560120446759002880024553793796781079076555940582389267580537359243311262284327013495014833399929662539661053437671746996921499531190282669815840119244221198707642915966992579932173647238953260602561484622551570055889936319200163724829307589544003296741511201335648379207673) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::U3V ; (IRONCLAD:EXPT-MOD IRONCLAD::U5V3 (/ (- IRONCLAD::+ED448-Q+ 3) 4) ; IRONCLAD::+ED448-Q+)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD ; (* IRONCLAD::U3V ; (IRONCLAD:EXPT-MOD IRONCLAD::U5V3 (/ (- IRONCLAD::+ED448-Q+ 3) 4) ; IRONCLAD::+ED448-Q+)) ; IRONCLAD::+ED448-Q+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFMETHOD EC-ADD ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/ed448.lisp ; in: DEFMETHOD EC-ADD (ED448-POINT ED448-POINT) ; (* IRONCLAD::Z1 IRONCLAD::Z2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z1 IRONCLAD::Z2) IRONCLAD::+ED448-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (* IRONCLAD::A IRONCLAD::A) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::X1 IRONCLAD::X2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::X1 IRONCLAD::X2) IRONCLAD::+ED448-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (* IRONCLAD::Y1 IRONCLAD::Y2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Y1 IRONCLAD::Y2) IRONCLAD::+ED448-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (* IRONCLAD::C IRONCLAD::D) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::+ED448-D+ IRONCLAD::K) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -28405584184196612889558123736071105207074658017021077113860918474177510397084005327357057071327978091493803693653311191707331756055739682478 ; 0) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -28405584184196612889558123736071105207074658017021077113860918474177510397084005327357057071327978091493803693653311191707331756055739682478 ; 0) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; (MOD (* IRONCLAD::+ED448-D+ IRONCLAD::K) IRONCLAD::+ED448-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 0), not a FIXNUM. ; (- IRONCLAD::B IRONCLAD::E) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- IRONCLAD::B IRONCLAD::E) IRONCLAD::+ED448-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (+ IRONCLAD::B IRONCLAD::E) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 1453677448591213781098647615776009068707282721374636120562980398361224656333461545372792767397353091860177768923687274722106996036730877) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 1453677448591213781098647615776009068707282721374636120562980398361224656333461545372792767397353091860177768923687274722106996036730877) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (+ IRONCLAD::X1 IRONCLAD::Y1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (+ IRONCLAD::X2 IRONCLAD::Y2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (* (+ IRONCLAD::X1 IRONCLAD::Y1) (+ IRONCLAD::X2 IRONCLAD::Y2)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* (+ IRONCLAD::X1 IRONCLAD::Y1) (+ IRONCLAD::X2 IRONCLAD::Y2)) ; IRONCLAD::+ED448-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (* IRONCLAD::A IRONCLAD::F) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::A IRONCLAD::G) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- IRONCLAD::H IRONCLAD::C IRONCLAD::D) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -1453677448591213781098647615776009068707282721374636120562980398361224656333461545372792767397353091860177768923687274722106996036730876 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -1453677448591213781098647615776009068707282721374636120562980398361224656333461545372792767397353091860177768923687274722106996036730876 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::I (- IRONCLAD::H IRONCLAD::C IRONCLAD::D)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (INTEGER ; -1453677448591213781098647615776009068707282721374636120562980398361224656333461545372792767397353091860177768923687274722106996036730876 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -1056589062271330492704679569833033213037694652072243044255921418053269422980479201469843346168891949555676434277992307502384960470195505587607667379354705268932983924615864005053696928706219547972793749003012586215908533357561963574307900580771586667654529483074625863688 ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931844) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (INTEGER ; -1453677448591213781098647615776009068707282721374636120562980398361224656333461545372792767397353091860177768923687274722106996036730876 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -1056589062271330492704679569833033213037694652072243044255921418053269422980479201469843346168891949555676434277992307502384960470195505587607667379354705268932983924615864005053696928706219547972793749003012586215908533357561963574307900580771586667654529483074625863688 ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931844) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::I (- IRONCLAD::H IRONCLAD::C IRONCLAD::D)) ; IRONCLAD::+ED448-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (- IRONCLAD::D IRONCLAD::C) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::J (- IRONCLAD::D IRONCLAD::C)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931844 ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931844) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931844 ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931844) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::J (- IRONCLAD::D IRONCLAD::C)) IRONCLAD::+ED448-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (* IRONCLAD::F IRONCLAD::G) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; processing (DEFMETHOD EC-DOUBLE ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/ed448.lisp ; in: DEFMETHOD EC-DOUBLE (ED448-POINT) ; (+ IRONCLAD::X1 IRONCLAD::Y1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::X1 IRONCLAD::Y1) IRONCLAD::+ED448-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (* IRONCLAD::A IRONCLAD::A) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::X1 IRONCLAD::X1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::X1 IRONCLAD::X1) IRONCLAD::+ED448-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (* IRONCLAD::Y1 IRONCLAD::Y1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Y1 IRONCLAD::Y1) IRONCLAD::+ED448-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (+ IRONCLAD::C IRONCLAD::D) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 1453677448591213781098647615776009068707282721374636120562980398361224656333461545372792767397353091860177768923687274722106996036730877) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 1453677448591213781098647615776009068707282721374636120562980398361224656333461545372792767397353091860177768923687274722106996036730877) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::Z1 IRONCLAD::Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z1 IRONCLAD::Z1) IRONCLAD::+ED448-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (* 2 IRONCLAD::F) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 1453677448591213781098647615776009068707282721374636120562980398361224656333461545372792767397353091860177768923687274722106996036730877) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 1453677448591213781098647615776009068707282721374636120562980398361224656333461545372792767397353091860177768923687274722106996036730877) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; (- IRONCLAD::E (* 2 IRONCLAD::F)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 1453677448591213781098647615776009068707282721374636120562980398361224656333461545372792767397353091860177768923687274722106996036730877), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -1453677448591213781098647615776009068707282721374636120562980398361224656333461545372792767397353091860177768923687274722106996036730876 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 1453677448591213781098647615776009068707282721374636120562980398361224656333461545372792767397353091860177768923687274722106996036730877), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -1453677448591213781098647615776009068707282721374636120562980398361224656333461545372792767397353091860177768923687274722106996036730876 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- IRONCLAD::E (* 2 IRONCLAD::F)) IRONCLAD::+ED448-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (- IRONCLAD::B IRONCLAD::E) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* (- IRONCLAD::B IRONCLAD::E) IRONCLAD::G) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931844 ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931844) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931844 ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931844) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* (- IRONCLAD::B IRONCLAD::E) IRONCLAD::G) IRONCLAD::+ED448-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (- IRONCLAD::C IRONCLAD::D) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* (- IRONCLAD::C IRONCLAD::D) IRONCLAD::E) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931844 ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931844) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931844 ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931844) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* (- IRONCLAD::C IRONCLAD::D) IRONCLAD::E) IRONCLAD::+ED448-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (* IRONCLAD::E IRONCLAD::G) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; processing (DEFMETHOD EC-SCALAR-MULT ...) ; processing (DEFMETHOD EC-POINT-ON-CURVE-P ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/ed448.lisp ; in: DEFMETHOD EC-POINT-ON-CURVE-P (ED448-POINT) ; (* IRONCLAD::X IRONCLAD::X) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::X IRONCLAD::X) IRONCLAD::+ED448-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (* IRONCLAD::Y IRONCLAD::Y) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Y IRONCLAD::Y) IRONCLAD::+ED448-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (* IRONCLAD::Z IRONCLAD::Z) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z IRONCLAD::Z) IRONCLAD::+ED448-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (* IRONCLAD::ZZ IRONCLAD::ZZ) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 528294531135665246352339784916516606518847326036121522127960709026634711490239600734921673084445974777838217138996153751192480235097752793803833689677352634466491962307932002526848464353109773986396874501506293107954266678780981787153950290385793333827264741537312931845) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (+ IRONCLAD::YY IRONCLAD::XX) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 1453677448591213781098647615776009068707282721374636120562980398361224656333461545372792767397353091860177768923687274722106996036730877) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 1453677448591213781098647615776009068707282721374636120562980398361224656333461545372792767397353091860177768923687274722106996036730877) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::ZZ (+ IRONCLAD::YY IRONCLAD::XX)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 1453677448591213781098647615776009068707282721374636120562980398361224656333461545372792767397353091860177768923687274722106996036730877), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 1056589062271330492704679569833033213037694652072243044255921418053269422980479201469843346168891949555676434277992307502384960470195505587607667379354705268932983924615864005053696928706219547972793749003012586215908533357561963574307900580771586667654529483074625863689) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 1453677448591213781098647615776009068707282721374636120562980398361224656333461545372792767397353091860177768923687274722106996036730877), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 1056589062271330492704679569833033213037694652072243044255921418053269422980479201469843346168891949555676434277992307502384960470195505587607667379354705268932983924615864005053696928706219547972793749003012586215908533357561963574307900580771586667654529483074625863689) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::+ED448-D+ IRONCLAD::XX IRONCLAD::YY) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -28405584184196612889558123736071105207074658017021077113860918474177510397084005327357057071327978091493803693653311191707331756055739682478 ; 0) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -28405584184196612889558123736071105207074658017021077113860918474177510397084005327357057071327978091493803693653311191707331756055739682478 ; 0) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -28405584184196612889558123736071105207074658017021077113860918474177510397084005327357057071327978091493803693653311191707331756055739682478 ; 0), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -20646278571312933492695791134322385499363072348817665206282832469469911159750053836321473905813233140292695364009108684750353320067855276934647624426280618307584972378956290590751764835383883077162376252393367440951960696073439549223763531298567189279303333364019726689395364 ; 0) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (INTEGER ; -28405584184196612889558123736071105207074658017021077113860918474177510397084005327357057071327978091493803693653311191707331756055739682478 ; 0), not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -20646278571312933492695791134322385499363072348817665206282832469469911159750053836321473905813233140292695364009108684750353320067855276934647624426280618307584972378956290590751764835383883077162376252393367440951960696073439549223763531298567189279303333364019726689395364 ; 0) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (+ IRONCLAD::ZZZZ (* IRONCLAD::+ED448-D+ IRONCLAD::XX IRONCLAD::YY)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (INTEGER ; -20646278571312933492695791134322385499363072348817665206282832469469911159750053836321473905813233140292695364009108684750353320067855276934647624426280618307584972378956290590751764835383883077162376252393367440951960696073439549223763531298567189279303333364019726689395364 ; 0), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -20646278571312933492695791134322385499363072348817665206282832469469911159750053836321473905813233140292695364009108684750353320067855276934647624426280618307584972378956290590751764835383883077162376252393367440951960696073439549223763531298567189279303333364019726689395364 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (INTEGER ; -20646278571312933492695791134322385499363072348817665206282832469469911159750053836321473905813233140292695364009108684750353320067855276934647624426280618307584972378956290590751764835383883077162376252393367440951960696073439549223763531298567189279303333364019726689395364 ; 0), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER ; -20646278571312933492695791134322385499363072348817665206282832469469911159750053836321473905813233140292695364009108684750353320067855276934647624426280618307584972378956290590751764835383883077162376252393367440951960696073439549223763531298567189279303333364019726689395364 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (MOD (+ IRONCLAD::ZZZZ (* IRONCLAD::+ED448-D+ IRONCLAD::XX IRONCLAD::YY)) ; IRONCLAD::+ED448-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (- IRONCLAD::A IRONCLAD::B) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- IRONCLAD::A IRONCLAD::B) IRONCLAD::+ED448-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; processing (DEFMETHOD EC-POINT-EQUAL ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/ed448.lisp ; in: DEFMETHOD EC-POINT-EQUAL (ED448-POINT ED448-POINT) ; (* IRONCLAD::X1 IRONCLAD::Z2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (* IRONCLAD::X2 IRONCLAD::Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (- (* IRONCLAD::X1 IRONCLAD::Z2) (* IRONCLAD::X2 IRONCLAD::Z1)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (MOD (- (* IRONCLAD::X1 IRONCLAD::Z2) (* IRONCLAD::X2 IRONCLAD::Z1)) ; IRONCLAD::+ED448-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; (* IRONCLAD::Y1 IRONCLAD::Z2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (* IRONCLAD::Y2 IRONCLAD::Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (- (* IRONCLAD::Y1 IRONCLAD::Z2) (* IRONCLAD::Y2 IRONCLAD::Z1)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (MOD (- (* IRONCLAD::Y1 IRONCLAD::Z2) (* IRONCLAD::Y2 IRONCLAD::Z1)) ; IRONCLAD::+ED448-Q+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438 ; 726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365438), not a FIXNUM. ; processing (DEFMETHOD EC-ENCODE-SCALAR ...) ; processing (DEFMETHOD EC-DECODE-SCALAR ...) ; processing (DEFMETHOD EC-ENCODE-POINT ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/ed448.lisp ; in: DEFMETHOD EC-ENCODE-POINT (ED448-POINT) ; (* IRONCLAD::X IRONCLAD::INVZ) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::X IRONCLAD::INVZ) IRONCLAD::+ED448-Q+) ; ; 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. ; (* IRONCLAD::Y IRONCLAD::INVZ) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::Y IRONCLAD::INVZ) IRONCLAD::+ED448-Q+) ; ; 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. ; (SETF (LDB (BYTE 1 (- IRONCLAD::+ED448-BITS+ 1)) IRONCLAD::Y) ; (LDB (BYTE 1 0) IRONCLAD::X)) ; --> SETQ THE DPB ; ==> ; 1 ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) ; &REST T). ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; (MOD (* IRONCLAD::Y IRONCLAD::INVZ) IRONCLAD::+ED448-Q+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439) ; (726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439) ; (726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439) ; (726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439))), 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. ; (MOD (* IRONCLAD::X IRONCLAD::INVZ) IRONCLAD::+ED448-Q+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439) ; (726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439) ; (726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439) ; (726838724295606890549323807888004534353641360687318060281490199180612328166730772686396383698676545930088884461843637361053498018365439))), 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. ; (* IRONCLAD::X IRONCLAD::INVZ) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::X IRONCLAD::INVZ) IRONCLAD::+ED448-Q+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::Y IRONCLAD::INVZ) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::Y IRONCLAD::INVZ) IRONCLAD::+ED448-Q+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFMETHOD EC-DECODE-POINT ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/ed448.lisp ; in: DEFMETHOD EC-DECODE-POINT ((EQL :ED448) T) ; (SETF (LDB (BYTE 1 (- IRONCLAD::+ED448-BITS+ 1)) IRONCLAD::Y) 0) ; --> SETQ THE DPB ; ==> ; 1 ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) ; &REST T). ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; (LDB (BYTE 1 (- IRONCLAD::+ED448-BITS+ 1)) IRONCLAD::Y) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; 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) ; . #2#). ; etc. ; processing (DEFUN ED448-HASH ...) ; processing (DEFUN ED448-PUBLIC-KEY ...) ; processing (DEFMETHOD MAKE-SIGNATURE ...) ; processing (DEFMETHOD DESTRUCTURE-SIGNATURE ...) ; processing (DEFUN ED448-SIGN ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/ed448.lisp ; in: DEFUN ED448-SIGN ; (SETF (LDB (BYTE 2 0) (ELT IRONCLAD::H 0)) 0) ; --> LET DPB ; ==> ; 1 ; ; 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. ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) ; &REST T). ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; --> LET ; ==> ; (SB-KERNEL:%SETELT #:H0 0 #:NEW1) ; ; 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. ; (SETF (LDB (BYTE 1 7) (ELT IRONCLAD::H (- # 2))) 1) ; --> LET DPB ; ==> ; 1 ; ; 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. ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) ; &REST T). ; ; note: unable to ; convert to inline logical operations ; due to type uncertainty: ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) ; &REST T). ; --> LET ; ==> ; (SB-KERNEL:%SETELT #:H2 (- (CEILING IRONCLAD::+ED448-BITS+ 8) 2) #:NEW1) ; ; 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. ; (SETF (ELT IRONCLAD::H (- (CEILING IRONCLAD::+ED448-BITS+ 8) 1)) 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. ; (SUBSEQ IRONCLAD::H 0 (CEILING IRONCLAD::+ED448-BITS+ 8)) ; ; 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. ; (SUBSEQ IRONCLAD::H (CEILING IRONCLAD::+ED448-BITS+ 8) ; (CEILING IRONCLAD::+ED448-BITS+ 4)) ; ; 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. ; (MOD (IRONCLAD::EC-DECODE-SCALAR :ED448 IRONCLAD::RH) IRONCLAD::+ED448-L+) ; ; 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. ; (MOD ; (IRONCLAD::EC-DECODE-SCALAR :ED448 ; (IRONCLAD::ED448-HASH IRONCLAD::+ED448-DOM+ ; IRONCLAD::RP IRONCLAD::PK IRONCLAD::M)) ; IRONCLAD::+ED448-L+) ; ; 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. ; (* IRONCLAD::K IRONCLAD::A) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779))), not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779))), not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779))), not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779))), not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779))), not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779))), not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (+ (* IRONCLAD::K IRONCLAD::A) IRONCLAD::RI) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779))), not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779))), not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779))), not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779))), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779))), not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779))), not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (+ (* IRONCLAD::K IRONCLAD::A) IRONCLAD::RI) IRONCLAD::+ED448-L+) ; ; 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 ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779) ; (181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779) ; (181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779) ; (181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779))), 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. ; (MOD ; (IRONCLAD::EC-DECODE-SCALAR :ED448 ; (IRONCLAD::ED448-HASH IRONCLAD::+ED448-DOM+ ; IRONCLAD::RP IRONCLAD::PK IRONCLAD::M)) ; IRONCLAD::+ED448-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779) ; (181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779) ; (181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779) ; (181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779))), 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. ; (MOD (IRONCLAD::EC-DECODE-SCALAR :ED448 IRONCLAD::RH) IRONCLAD::+ED448-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779) ; (181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779) ; (181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779) ; (181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779))), 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. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (MOD ; (IRONCLAD::EC-DECODE-SCALAR :ED448 ; (IRONCLAD::ED448-HASH IRONCLAD::+ED448-DOM+ ; IRONCLAD::RP IRONCLAD::PK IRONCLAD::M)) ; IRONCLAD::+ED448-L+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::K IRONCLAD::A) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; #1=(181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779))), not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (OR FLOAT (RATIONAL 0 #1#)), not a (SIGNED-BYTE ; 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #2#), not a (VALUES (SIGNED-BYTE 64) ; . #2#). ; etc. ; (+ (* IRONCLAD::K IRONCLAD::A) IRONCLAD::RI) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; #1=(181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779))), not a FIXNUM. ; The result is a (VALUES REAL . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a (OR FLOAT (RATIONAL 0 #1#)), not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #2#), not a (VALUES SINGLE-FLOAT . #2#). ; etc. ; (MOD (+ (* IRONCLAD::K IRONCLAD::A) IRONCLAD::RI) IRONCLAD::+ED448-L+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFUN ED448-VERIFY ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/ed448.lisp ; in: DEFUN ED448-VERIFY ; (MOD ; (IRONCLAD::EC-DECODE-SCALAR :ED448 ; (IRONCLAD::ED448-HASH IRONCLAD::+ED448-DOM+ ; IRONCLAD::R IRONCLAD::PK IRONCLAD::M)) ; IRONCLAD::+ED448-L+) ; ; 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 ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779) ; (181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779) ; (181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779) ; (181709681073901722637330951972001133588410340171829515070372549795146003961539585716195755291692375963310293709091662304773755859649779))), 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. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/public-key/ed448-tmpID7X8UGC.fasl ; compilation finished in 0:00:00.200 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/secp256k1.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS SECP256K1-PUBLIC-KEY ...) ; processing (DEFCLASS SECP256K1-PRIVATE-KEY ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp256k1.lisp ; in: DEFMETHOD EC-POINT-EQUAL (SECP256K1-POINT SECP256K1-POINT) ; (* IRONCLAD::Z1 IRONCLAD::Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z1 IRONCLAD::Z1) IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662), not a FIXNUM. ; (* IRONCLAD::Z2 IRONCLAD::Z2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z2 IRONCLAD::Z2) IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662), not a FIXNUM. ; (* IRONCLAD::X1 IRONCLAD::Z2Z2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (* IRONCLAD::X2 IRONCLAD::Z1Z1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (- (* IRONCLAD::X1 IRONCLAD::Z2Z2) (* IRONCLAD::X2 IRONCLAD::Z1Z1)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (MOD (- (* IRONCLAD::X1 IRONCLAD::Z2Z2) (* IRONCLAD::X2 IRONCLAD::Z1Z1)) ; IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (* IRONCLAD::Y1 IRONCLAD::Z2Z2 IRONCLAD::Z2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (* IRONCLAD::Y2 IRONCLAD::Z1Z1 IRONCLAD::Z1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (- (* IRONCLAD::Y1 IRONCLAD::Z2Z2 IRONCLAD::Z2) ; (* IRONCLAD::Y2 IRONCLAD::Z1Z1 IRONCLAD::Z1)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (MOD ; (- (* IRONCLAD::Y1 IRONCLAD::Z2Z2 IRONCLAD::Z2) ; (* IRONCLAD::Y2 IRONCLAD::Z1Z1 IRONCLAD::Z1)) ; IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; processing (DEFMETHOD EC-DOUBLE ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp256k1.lisp ; in: DEFMETHOD EC-DOUBLE (SECP256K1-POINT) ; (* IRONCLAD::X1 IRONCLAD::X1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::X1 IRONCLAD::X1) IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662), not a FIXNUM. ; (* IRONCLAD::Y1 IRONCLAD::Y1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Y1 IRONCLAD::Y1) IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662), not a FIXNUM. ; (* IRONCLAD::B IRONCLAD::B) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842245) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842245) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (+ IRONCLAD::X1 IRONCLAD::B) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::X1 IRONCLAD::B) IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (* IRONCLAD::X1+B IRONCLAD::X1+B) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842245) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842245) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- (* IRONCLAD::X1+B IRONCLAD::X1+B) IRONCLAD::A IRONCLAD::C) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842245), not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842245), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244), not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -231584178474632390847141970017375815706539969331281128078915168015817669343324 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -231584178474632390847141970017375815706539969331281128078915168015817669343324 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 2 (- (* IRONCLAD::X1+B IRONCLAD::X1+B) IRONCLAD::A IRONCLAD::C)) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (INTEGER ; -231584178474632390847141970017375815706539969331281128078915168015817669343324 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -463168356949264781694283940034751631413079938662562256157830336031635338686648 ; 26815615859885194199148049996411692254958731641184786755447122887441538766748476153938746110844209878665674796247790530825760023193962470159365950691684488) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER ; -231584178474632390847141970017375815706539969331281128078915168015817669343324 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -463168356949264781694283940034751631413079938662562256157830336031635338686648 ; 26815615859885194199148049996411692254958731641184786755447122887441538766748476153938746110844209878665674796247790530825760023193962470159365950691684488) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; (MOD (* 2 (- (* IRONCLAD::X1+B IRONCLAD::X1+B) IRONCLAD::A IRONCLAD::C)) ; IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -463168356949264781694283940034751631413079938662562256157830336031635338686648 ; 26815615859885194199148049996411692254958731641184786755447122887441538766748476153938746110844209878665674796247790530825760023193962470159365950691684488), not a FIXNUM. ; (* 3 IRONCLAD::A) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 347376267711948586270712955026063723559809953996921692118372752023726504014987) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 347376267711948586270712955026063723559809953996921692118372752023726504014987) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::E IRONCLAD::E) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842245) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842245) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 2 IRONCLAD::D) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 231584178474632390847141970017375815706539969331281128078915168015817669343325) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 231584178474632390847141970017375815706539969331281128078915168015817669343325) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; (- IRONCLAD::F (* 2 IRONCLAD::D)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The second argument is a (MOD ; 231584178474632390847141970017375815706539969331281128078915168015817669343325), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -231584178474632390847141970017375815706539969331281128078915168015817669343324 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 231584178474632390847141970017375815706539969331281128078915168015817669343325), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -231584178474632390847141970017375815706539969331281128078915168015817669343324 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- IRONCLAD::F (* 2 IRONCLAD::D)) IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -231584178474632390847141970017375815706539969331281128078915168015817669343324 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662), not a FIXNUM. ; (- IRONCLAD::D IRONCLAD::X2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::E (- IRONCLAD::D IRONCLAD::X2)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The second argument is a (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The second argument is a (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 8 IRONCLAD::C) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 926336713898529563388567880069503262826159877325124512315660672063270677373297) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 926336713898529563388567880069503262826159877325124512315660672063270677373297) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; (- (* IRONCLAD::E (- IRONCLAD::D IRONCLAD::X2)) (* 8 IRONCLAD::C)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244), not a FIXNUM. ; The second argument is a (MOD ; 926336713898529563388567880069503262826159877325124512315660672063270677373297), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -13407807929942597099574024998205846127479365820592393377723561443720769383375164413683271584985493507212906901386721425290205136109296895751746246023215540 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER ; -13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 926336713898529563388567880069503262826159877325124512315660672063270677373297), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -13407807929942597099574024998205846127479365820592393377723561443720769383375164413683271584985493507212906901386721425290205136109296895751746246023215540 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- (* IRONCLAD::E (- IRONCLAD::D IRONCLAD::X2)) (* 8 IRONCLAD::C)) ; IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -13407807929942597099574024998205846127479365820592393377723561443720769383375164413683271584985493507212906901386721425290205136109296895751746246023215540 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244), not a FIXNUM. ; (* 2 IRONCLAD::Y1 IRONCLAD::Z1) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; 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 . #2#). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* 2 IRONCLAD::Y1 IRONCLAD::Z1) IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662), not a FIXNUM. ; processing (DEFMETHOD EC-ADD ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp256k1.lisp ; in: DEFMETHOD EC-ADD (SECP256K1-POINT SECP256K1-POINT) ; (* IRONCLAD::Z1 IRONCLAD::Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z1 IRONCLAD::Z1) IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662), not a FIXNUM. ; (* IRONCLAD::Z2 IRONCLAD::Z2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z2 IRONCLAD::Z2) IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662), not a FIXNUM. ; (* IRONCLAD::X1 IRONCLAD::Z2Z2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (* IRONCLAD::X1 IRONCLAD::Z2Z2) IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (* IRONCLAD::X2 IRONCLAD::Z1Z1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (* IRONCLAD::X2 IRONCLAD::Z1Z1) IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (* IRONCLAD::Y1 IRONCLAD::Z2 IRONCLAD::Z2Z2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Y1 IRONCLAD::Z2 IRONCLAD::Z2Z2) IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (* IRONCLAD::Y2 IRONCLAD::Z1 IRONCLAD::Z1Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Y2 IRONCLAD::Z1 IRONCLAD::Z1Z1) IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (= IRONCLAD::U1 IRONCLAD::U2) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (UNSIGNED-BYTE ; 64). ; etc. ; (= IRONCLAD::S1 IRONCLAD::S2) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (UNSIGNED-BYTE ; 64). ; etc. ; (- IRONCLAD::U2 IRONCLAD::U1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- IRONCLAD::U2 IRONCLAD::U1) IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662), not a FIXNUM. ; (* 4 IRONCLAD::H IRONCLAD::H) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 463168356949264781694283940034751631413079938662562256157830336031635338686649) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 463168356949264781694283940034751631413079938662562256157830336031635338686649) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 463168356949264781694283940034751631413079938662562256157830336031635338686649), not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 53631231719770388398296099992823384509917463282369573510894245774883077533496952307877492221688419757331349592495581061651520046387924940318731901383368977) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 463168356949264781694283940034751631413079938662562256157830336031635338686649), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 53631231719770388398296099992823384509917463282369573510894245774883077533496952307877492221688419757331349592495581061651520046387924940318731901383368977) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::H IRONCLAD::I) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842245) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842245) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- IRONCLAD::S2 IRONCLAD::S1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 2 (- IRONCLAD::S2 IRONCLAD::S1)) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -231584178474632390847141970017375815706539969331281128078915168015817669343324 ; 231584178474632390847141970017375815706539969331281128078915168015817669343324) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -231584178474632390847141970017375815706539969331281128078915168015817669343324 ; 231584178474632390847141970017375815706539969331281128078915168015817669343324) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; (MOD (* 2 (- IRONCLAD::S2 IRONCLAD::S1)) IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -231584178474632390847141970017375815706539969331281128078915168015817669343324 ; 231584178474632390847141970017375815706539969331281128078915168015817669343324), not a FIXNUM. ; (* IRONCLAD::U1 IRONCLAD::I) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842245) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842245) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::R IRONCLAD::R) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842245) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842245) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- (* IRONCLAD::R IRONCLAD::R) IRONCLAD::J (* 2 IRONCLAD::V)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842245), not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842245), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 2 IRONCLAD::V) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 231584178474632390847141970017375815706539969331281128078915168015817669343325) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 231584178474632390847141970017375815706539969331281128078915168015817669343325) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; (- (* IRONCLAD::R IRONCLAD::R) IRONCLAD::J (* 2 IRONCLAD::V)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244), not a FIXNUM. ; The second argument is a (MOD ; 231584178474632390847141970017375815706539969331281128078915168015817669343325), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -347376267711948586270712955026063723559809953996921692118372752023726504014986 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 231584178474632390847141970017375815706539969331281128078915168015817669343325), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -347376267711948586270712955026063723559809953996921692118372752023726504014986 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- (* IRONCLAD::R IRONCLAD::R) IRONCLAD::J (* 2 IRONCLAD::V)) ; IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -347376267711948586270712955026063723559809953996921692118372752023726504014986 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244), not a FIXNUM. ; (- IRONCLAD::V IRONCLAD::X3) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::R (- IRONCLAD::V IRONCLAD::X3)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The second argument is a (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The second argument is a (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 2 IRONCLAD::S1 IRONCLAD::J) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 231584178474632390847141970017375815706539969331281128078915168015817669343325) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 231584178474632390847141970017375815706539969331281128078915168015817669343325) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 231584178474632390847141970017375815706539969331281128078915168015817669343325), not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 26815615859885194199148049996411692254958731641184786755447122887441538766748476153938746110844209878665674796247790530825760023193962470159365950691684489) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 231584178474632390847141970017375815706539969331281128078915168015817669343325), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 26815615859885194199148049996411692254958731641184786755447122887441538766748476153938746110844209878665674796247790530825760023193962470159365950691684489) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- (* IRONCLAD::R (- IRONCLAD::V IRONCLAD::X3)) ; (* 2 IRONCLAD::S1 IRONCLAD::J)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244), not a FIXNUM. ; The second argument is a (MOD ; 26815615859885194199148049996411692254958731641184786755447122887441538766748476153938746110844209878665674796247790530825760023193962470159365950691684489), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -40223423789827791298722074994617538382438097461777180133170684331162308150122714230908119166266314817998512194371685796238640034790943705239048926037526732 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER ; -13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 26815615859885194199148049996411692254958731641184786755447122887441538766748476153938746110844209878665674796247790530825760023193962470159365950691684489), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -40223423789827791298722074994617538382438097461777180133170684331162308150122714230908119166266314817998512194371685796238640034790943705239048926037526732 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD ; (- (* IRONCLAD::R (- IRONCLAD::V IRONCLAD::X3)) ; (* 2 IRONCLAD::S1 IRONCLAD::J)) ; IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -40223423789827791298722074994617538382438097461777180133170684331162308150122714230908119166266314817998512194371685796238640034790943705239048926037526732 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244), not a FIXNUM. ; (+ IRONCLAD::Z1 IRONCLAD::Z2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::Z1 IRONCLAD::Z2) IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662), not a FIXNUM. ; (* IRONCLAD::Z1+Z2 IRONCLAD::Z1+Z2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842245) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842245) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- (* IRONCLAD::Z1+Z2 IRONCLAD::Z1+Z2) IRONCLAD::Z1Z1 IRONCLAD::Z2Z2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842245), not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842245), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244), not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -231584178474632390847141970017375815706539969331281128078915168015817669343324 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -231584178474632390847141970017375815706539969331281128078915168015817669343324 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* (- (* IRONCLAD::Z1+Z2 IRONCLAD::Z1+Z2) IRONCLAD::Z1Z1 IRONCLAD::Z2Z2) ; IRONCLAD::H) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -231584178474632390847141970017375815706539969331281128078915168015817669343324 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244), not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -26815615859885194199148049996411692254958731641184786755447122887441538766748476153938746110844209878665674796247790530825760023193962470159365950691684488 ; 1552518092300708935148979488462502555256886017116696611139052038025878194357327919123326904259801146902371181789763820289842428859885596960430872532398902802048848099563624248617810692556287115773373882875915134104881484722589289528) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (INTEGER ; -231584178474632390847141970017375815706539969331281128078915168015817669343324 ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842244), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -26815615859885194199148049996411692254958731641184786755447122887441538766748476153938746110844209878665674796247790530825760023193962470159365950691684488 ; 1552518092300708935148979488462502555256886017116696611139052038025878194357327919123326904259801146902371181789763820289842428859885596960430872532398902802048848099563624248617810692556287115773373882875915134104881484722589289528) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD ; (* (- (* IRONCLAD::Z1+Z2 IRONCLAD::Z1+Z2) IRONCLAD::Z1Z1 IRONCLAD::Z2Z2) ; IRONCLAD::H) ; IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -26815615859885194199148049996411692254958731641184786755447122887441538766748476153938746110844209878665674796247790530825760023193962470159365950691684488 ; 1552518092300708935148979488462502555256886017116696611139052038025878194357327919123326904259801146902371181789763820289842428859885596960430872532398902802048848099563624248617810692556287115773373882875915134104881484722589289528), not a FIXNUM. ; processing (DEFMETHOD EC-SCALAR-MULT ...) ; processing (DEFMETHOD EC-POINT-ON-CURVE-P ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp256k1.lisp ; in: DEFMETHOD EC-POINT-ON-CURVE-P (SECP256K1-POINT) ; (* IRONCLAD::Y IRONCLAD::Y) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Y IRONCLAD::Y) IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662), not a FIXNUM. ; (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662), not a FIXNUM. ; (* IRONCLAD::Z IRONCLAD::Z IRONCLAD::Z) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z IRONCLAD::Z IRONCLAD::Z) IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662), not a FIXNUM. ; (* IRONCLAD::Z3 IRONCLAD::Z3) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842245) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 13407807929942597099574024998205846127479365820592393377723561443720769383374238076969373055422104939332837398123895265412880011596981235079682975345842245) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::+SECP256K1-B+ IRONCLAD::Z6) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 810544624661213367964996895060815354972889892659483948276203088055361842701635) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 810544624661213367964996895060815354972889892659483948276203088055361842701635) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (+ IRONCLAD::X3 (* IRONCLAD::+SECP256K1-B+ IRONCLAD::Z6)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The second argument is a (MOD ; 810544624661213367964996895060815354972889892659483948276203088055361842701635), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 926336713898529563388567880069503262826159877325124512315660672063270677373297) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (MOD ; 810544624661213367964996895060815354972889892659483948276203088055361842701635), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 926336713898529563388567880069503262826159877325124512315660672063270677373297) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (- IRONCLAD::Y2 IRONCLAD::A) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089237316195423570985008687907853269984665640564039457584007908834671663), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- IRONCLAD::Y2 IRONCLAD::A) IRONCLAD::+SECP256K1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089237316195423570985008687907853269984665640564039457584007908834671662 ; 115792089237316195423570985008687907853269984665640564039457584007908834671662), not a FIXNUM. ; processing (DEFMETHOD EC-ENCODE-SCALAR ...) ; processing (DEFMETHOD EC-DECODE-SCALAR ...) ; processing (DEFMETHOD EC-ENCODE-POINT ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp256k1.lisp ; in: DEFMETHOD EC-ENCODE-POINT (SECP256K1-POINT) ; (* IRONCLAD::INVZ IRONCLAD::INVZ) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::INVZ IRONCLAD::INVZ) IRONCLAD::+SECP256K1-P+) ; ; 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. ; (* IRONCLAD::INVZ2 IRONCLAD::INVZ) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089237316195423570985008687907853269984665640564039457584007908834671663))), not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089237316195423570985008687907853269984665640564039457584007908834671663))), not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089237316195423570985008687907853269984665640564039457584007908834671663))), not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089237316195423570985008687907853269984665640564039457584007908834671663))), not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089237316195423570985008687907853269984665640564039457584007908834671663))), not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089237316195423570985008687907853269984665640564039457584007908834671663))), not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::INVZ2 IRONCLAD::INVZ) IRONCLAD::+SECP256K1-P+) ; ; 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. ; (* IRONCLAD::X IRONCLAD::INVZ2) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089237316195423570985008687907853269984665640564039457584007908834671663))), not a FLOAT. ; (MOD (* IRONCLAD::X IRONCLAD::INVZ2) IRONCLAD::+SECP256K1-P+) ; ; 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. ; (* IRONCLAD::Y IRONCLAD::INVZ3) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089237316195423570985008687907853269984665640564039457584007908834671663))), not a FLOAT. ; (MOD (* IRONCLAD::Y IRONCLAD::INVZ3) IRONCLAD::+SECP256K1-P+) ; ; 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 ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907853269984665640564039457584007908834671663) ; (115792089237316195423570985008687907853269984665640564039457584007908834671663))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907853269984665640564039457584007908834671663) ; (115792089237316195423570985008687907853269984665640564039457584007908834671663))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907853269984665640564039457584007908834671663) ; (115792089237316195423570985008687907853269984665640564039457584007908834671663))), 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. ; (MOD (* IRONCLAD::X IRONCLAD::INVZ2) IRONCLAD::+SECP256K1-P+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907853269984665640564039457584007908834671663) ; (115792089237316195423570985008687907853269984665640564039457584007908834671663))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907853269984665640564039457584007908834671663) ; (115792089237316195423570985008687907853269984665640564039457584007908834671663))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907853269984665640564039457584007908834671663) ; (115792089237316195423570985008687907853269984665640564039457584007908834671663))), 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. ; (MOD (* IRONCLAD::INVZ2 IRONCLAD::INVZ) IRONCLAD::+SECP256K1-P+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907853269984665640564039457584007908834671663) ; (115792089237316195423570985008687907853269984665640564039457584007908834671663))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907853269984665640564039457584007908834671663) ; (115792089237316195423570985008687907853269984665640564039457584007908834671663))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907853269984665640564039457584007908834671663) ; (115792089237316195423570985008687907853269984665640564039457584007908834671663))), 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. ; (MOD (* IRONCLAD::INVZ IRONCLAD::INVZ) IRONCLAD::+SECP256K1-P+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907853269984665640564039457584007908834671663) ; (115792089237316195423570985008687907853269984665640564039457584007908834671663))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907853269984665640564039457584007908834671663) ; (115792089237316195423570985008687907853269984665640564039457584007908834671663))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907853269984665640564039457584007908834671663) ; (115792089237316195423570985008687907853269984665640564039457584007908834671663))), 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. ; (* IRONCLAD::INVZ IRONCLAD::INVZ) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::INVZ IRONCLAD::INVZ) IRONCLAD::+SECP256K1-P+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::INVZ2 IRONCLAD::INVZ) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; #1=(115792089237316195423570985008687907853269984665640564039457584007908834671663))), not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (OR FLOAT (RATIONAL 0 #1#)), not a (SIGNED-BYTE ; 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #2#), not a (VALUES (SIGNED-BYTE 64) . #2#). ; etc. ; (MOD (* IRONCLAD::INVZ2 IRONCLAD::INVZ) IRONCLAD::+SECP256K1-P+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::X IRONCLAD::INVZ2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; #1=(115792089237316195423570985008687907853269984665640564039457584007908834671663))), not a FIXNUM. ; The result is a (VALUES REAL . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (OR FLOAT (RATIONAL 0 #1#)), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES REAL . #2#), not a (VALUES (SIGNED-BYTE 64) . #2#). ; etc. ; (MOD (* IRONCLAD::X IRONCLAD::INVZ2) IRONCLAD::+SECP256K1-P+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::Y IRONCLAD::INVZ3) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; #1=(115792089237316195423570985008687907853269984665640564039457584007908834671663))), not a FIXNUM. ; The result is a (VALUES REAL . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (OR FLOAT (RATIONAL 0 #1#)), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES REAL . #2#), not a (VALUES (SIGNED-BYTE 64) . #2#). ; etc. ; (MOD (* IRONCLAD::Y IRONCLAD::INVZ3) IRONCLAD::+SECP256K1-P+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFMETHOD EC-DECODE-POINT ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp256k1.lisp ; in: DEFMETHOD EC-DECODE-POINT ((EQL :SECP256K1) T) ; (AREF IRONCLAD::OCTETS 0) ; ; 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. ; (- (AREF IRONCLAD::OCTETS 0) 2) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (+ (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) IRONCLAD::+SECP256K1-B+) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (MOD (+ (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) IRONCLAD::+SECP256K1-B+) ; IRONCLAD::+SECP256K1-P+) ; ; 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. ; (= (LOGAND IRONCLAD::Y 1) IRONCLAD::Y-SIGN) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (MOD (+ (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) IRONCLAD::+SECP256K1-B+) ; IRONCLAD::+SECP256K1-P+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907853269984665640564039457584007908834671663) ; (115792089237316195423570985008687907853269984665640564039457584007908834671663))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907853269984665640564039457584007908834671663) ; (115792089237316195423570985008687907853269984665640564039457584007908834671663))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907853269984665640564039457584007908834671663) ; (115792089237316195423570985008687907853269984665640564039457584007908834671663))), 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. ; (- (AREF IRONCLAD::OCTETS 0) 2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (+ (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) IRONCLAD::+SECP256K1-B+) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) IRONCLAD::+SECP256K1-B+) ; IRONCLAD::+SECP256K1-P+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFUN SECP256K1-PUBLIC-KEY ...) ; processing (DEFMETHOD MAKE-SIGNATURE ...) ; processing (DEFMETHOD DESTRUCTURE-SIGNATURE ...) ; processing (DEFMETHOD GENERATE-SIGNATURE-NONCE ...) ; processing (DEFMETHOD SIGN-MESSAGE ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp256k1.lisp ; in: DEFMETHOD SIGN-MESSAGE (SECP256K1-PRIVATE-KEY T) ; (LENGTH IRONCLAD::MESSAGE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (SUBSEQ (IRONCLAD::EC-ENCODE-POINT IRONCLAD::R) 1 ; (1+ (/ IRONCLAD::+SECP256K1-BITS+ 8))) ; ; 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. ; (MOD IRONCLAD::R IRONCLAD::+SECP256K1-L+) ; ; 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. ; (SUBSEQ IRONCLAD::MESSAGE IRONCLAD::START IRONCLAD::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. ; (* IRONCLAD::SK IRONCLAD::R) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089237316195423570985008687907852837564279074904382605163141518161494337))), not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089237316195423570985008687907852837564279074904382605163141518161494337))), not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089237316195423570985008687907852837564279074904382605163141518161494337))), not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089237316195423570985008687907852837564279074904382605163141518161494337))), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089237316195423570985008687907852837564279074904382605163141518161494337))), not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089237316195423570985008687907852837564279074904382605163141518161494337))), not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (* IRONCLAD::INVK (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R))) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::INVK (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R))) ; IRONCLAD::+SECP256K1-L+) ; ; 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. ; (ZEROP IRONCLAD::R) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089237316195423570985008687907852837564279074904382605163141518161494337))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (MOD (* IRONCLAD::INVK (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R))) ; IRONCLAD::+SECP256K1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907852837564279074904382605163141518161494337) ; (115792089237316195423570985008687907852837564279074904382605163141518161494337))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907852837564279074904382605163141518161494337) ; (115792089237316195423570985008687907852837564279074904382605163141518161494337))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907852837564279074904382605163141518161494337) ; (115792089237316195423570985008687907852837564279074904382605163141518161494337))), 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. ; (MOD IRONCLAD::R IRONCLAD::+SECP256K1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907852837564279074904382605163141518161494337) ; (115792089237316195423570985008687907852837564279074904382605163141518161494337))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907852837564279074904382605163141518161494337) ; (115792089237316195423570985008687907852837564279074904382605163141518161494337))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907852837564279074904382605163141518161494337) ; (115792089237316195423570985008687907852837564279074904382605163141518161494337))), not a RATIONAL. ; (MIN (OR IRONCLAD::END (LENGTH IRONCLAD::MESSAGE)) ; (/ IRONCLAD::+SECP256K1-BITS+ 8)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL 32) (SINGLE-FLOAT 32.0) ; (DOUBLE-FLOAT 32.0d0)), 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. ; (MOD IRONCLAD::R IRONCLAD::+SECP256K1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (ZEROP IRONCLAD::S) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089237316195423570985008687907852837564279074904382605163141518161494337))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (MIN (OR IRONCLAD::END (LENGTH IRONCLAD::MESSAGE)) ; (/ IRONCLAD::+SECP256K1-BITS+ 8)) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (MOD IRONCLAD::R IRONCLAD::+SECP256K1-L+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::SK IRONCLAD::R) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; #1=(115792089237316195423570985008687907852837564279074904382605163141518161494337))), not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a (OR FLOAT (RATIONAL 0 #1#)), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES NUMBER . #2#), not a (VALUES (SIGNED-BYTE 64) ; . #2#). ; etc. ; (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (* IRONCLAD::INVK (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R))) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::INVK (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R))) ; IRONCLAD::+SECP256K1-L+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFMETHOD VERIFY-SIGNATURE ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp256k1.lisp ; in: DEFMETHOD VERIFY-SIGNATURE (SECP256K1-PUBLIC-KEY T T) ; (LENGTH IRONCLAD::SIGNATURE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (LENGTH IRONCLAD::MESSAGE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (SUBSEQ IRONCLAD::MESSAGE IRONCLAD::START IRONCLAD::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. ; (* IRONCLAD::E IRONCLAD::W) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::E IRONCLAD::W) IRONCLAD::+SECP256K1-L+) ; ; 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. ; (* IRONCLAD::R IRONCLAD::W) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::R IRONCLAD::W) IRONCLAD::+SECP256K1-L+) ; ; 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. ; (SUBSEQ (IRONCLAD::EC-ENCODE-POINT IRONCLAD::RP) 1 ; (1+ (/ IRONCLAD::+SECP256K1-BITS+ 8))) ; ; 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. ; (MOD IRONCLAD::V IRONCLAD::+SECP256K1-L+) ; ; 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. ; (< IRONCLAD::R IRONCLAD::+SECP256K1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (MOD IRONCLAD::V IRONCLAD::+SECP256K1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907852837564279074904382605163141518161494337) ; (115792089237316195423570985008687907852837564279074904382605163141518161494337))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907852837564279074904382605163141518161494337) ; (115792089237316195423570985008687907852837564279074904382605163141518161494337))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907852837564279074904382605163141518161494337) ; (115792089237316195423570985008687907852837564279074904382605163141518161494337))), 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. ; (MOD (* IRONCLAD::R IRONCLAD::W) IRONCLAD::+SECP256K1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907852837564279074904382605163141518161494337) ; (115792089237316195423570985008687907852837564279074904382605163141518161494337))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907852837564279074904382605163141518161494337) ; (115792089237316195423570985008687907852837564279074904382605163141518161494337))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907852837564279074904382605163141518161494337) ; (115792089237316195423570985008687907852837564279074904382605163141518161494337))), 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. ; (MOD (* IRONCLAD::E IRONCLAD::W) IRONCLAD::+SECP256K1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907852837564279074904382605163141518161494337) ; (115792089237316195423570985008687907852837564279074904382605163141518161494337))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907852837564279074904382605163141518161494337) ; (115792089237316195423570985008687907852837564279074904382605163141518161494337))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089237316195423570985008687907852837564279074904382605163141518161494337) ; (115792089237316195423570985008687907852837564279074904382605163141518161494337))), not a RATIONAL. ; (MIN (OR IRONCLAD::END (LENGTH IRONCLAD::MESSAGE)) ; (/ IRONCLAD::+SECP256K1-BITS+ 8)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL 32) (SINGLE-FLOAT 32.0) ; (DOUBLE-FLOAT 32.0d0)), 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. ; (MOD (* IRONCLAD::E IRONCLAD::W) IRONCLAD::+SECP256K1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (< IRONCLAD::S IRONCLAD::+SECP256K1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (= IRONCLAD::V IRONCLAD::R) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089237316195423570985008687907852837564279074904382605163141518161494337))), not a SINGLE-FLOAT. ; The second argument is a (OR ; (RATIONAL * ; (115792089237316195423570985008687907852837564279074904382605163141518161494337)) ; SINGLE-FLOAT ; (DOUBLE-FLOAT * ; (1.157920892373162d77))), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089237316195423570985008687907852837564279074904382605163141518161494337))), not a DOUBLE-FLOAT. ; The second argument is a (OR ; (RATIONAL * ; (115792089237316195423570985008687907852837564279074904382605163141518161494337)) ; SINGLE-FLOAT ; (DOUBLE-FLOAT * ; (1.157920892373162d77))), not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089237316195423570985008687907852837564279074904382605163141518161494337))), not a FLOAT. ; The second argument is a (OR ; (RATIONAL * ; (115792089237316195423570985008687907852837564279074904382605163141518161494337)) ; SINGLE-FLOAT ; (DOUBLE-FLOAT * ; (1.157920892373162d77))), not a RATIONAL. ; ; note: unable to open code because: The operands might not be the same type. ; (MIN (OR IRONCLAD::END (LENGTH IRONCLAD::MESSAGE)) ; (/ IRONCLAD::+SECP256K1-BITS+ 8)) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::E IRONCLAD::W) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::E IRONCLAD::W) IRONCLAD::+SECP256K1-L+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::R IRONCLAD::W) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::R IRONCLAD::W) IRONCLAD::+SECP256K1-L+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (MOD IRONCLAD::V IRONCLAD::+SECP256K1-L+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (= IRONCLAD::V IRONCLAD::R) ; ; note: forced to do full call ; unable to do #1=inline float comparison (cost 3) because: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; #2=(115792089237316195423570985008687907852837564279074904382605163141518161494337))), not a SINGLE-FLOAT. ; The second argument is a (OR ; (RATIONAL * ; #3=(115792089237316195423570985008687907852837564279074904382605163141518161494337)) ; SINGLE-FLOAT ; (DOUBLE-FLOAT * #4=(1.157920892373162d77))), not a SINGLE-FLOAT. ; unable to do #1# (cost 3) because: ; The first argument is a (OR FLOAT (RATIONAL 0 #2#)), not a DOUBLE-FLOAT. ; The second argument is a (OR (RATIONAL * #3#) SINGLE-FLOAT ; (DOUBLE-FLOAT * #4#)), not a DOUBLE-FLOAT. ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/public-key/secp256k1-tmpFYN8G5D1.fasl ; compilation finished in 0:00:00.252 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/secp256r1.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS SECP256R1-PUBLIC-KEY ...) ; processing (DEFCLASS SECP256R1-PRIVATE-KEY ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp256r1.lisp ; in: DEFMETHOD EC-POINT-EQUAL (SECP256R1-POINT SECP256R1-POINT) ; (* IRONCLAD::Z1 IRONCLAD::Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z1 IRONCLAD::Z1) IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950), not a FIXNUM. ; (* IRONCLAD::Z2 IRONCLAD::Z2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z2 IRONCLAD::Z2) IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950), not a FIXNUM. ; (* IRONCLAD::X1 IRONCLAD::Z2Z2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (* IRONCLAD::X2 IRONCLAD::Z1Z1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (- (* IRONCLAD::X1 IRONCLAD::Z2Z2) (* IRONCLAD::X2 IRONCLAD::Z1Z1)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (MOD (- (* IRONCLAD::X1 IRONCLAD::Z2Z2) (* IRONCLAD::X2 IRONCLAD::Z1Z1)) ; IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (* IRONCLAD::Y1 IRONCLAD::Z2Z2 IRONCLAD::Z2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (* IRONCLAD::Y2 IRONCLAD::Z1Z1 IRONCLAD::Z1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (- (* IRONCLAD::Y1 IRONCLAD::Z2Z2 IRONCLAD::Z2) ; (* IRONCLAD::Y2 IRONCLAD::Z1Z1 IRONCLAD::Z1)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (MOD ; (- (* IRONCLAD::Y1 IRONCLAD::Z2Z2 IRONCLAD::Z2) ; (* IRONCLAD::Y2 IRONCLAD::Z1Z1 IRONCLAD::Z1)) ; IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; processing (DEFMETHOD EC-DOUBLE ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp256r1.lisp ; in: DEFMETHOD EC-DOUBLE (SECP256R1-POINT) ; (* IRONCLAD::X1 IRONCLAD::X1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::X1 IRONCLAD::X1) IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950), not a FIXNUM. ; (* IRONCLAD::Y1 IRONCLAD::Y1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Y1 IRONCLAD::Y1) IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950), not a FIXNUM. ; (* IRONCLAD::YY IRONCLAD::YY) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::Z1 IRONCLAD::Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z1 IRONCLAD::Z1) IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950), not a FIXNUM. ; (+ IRONCLAD::X1 IRONCLAD::YY) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::X1 IRONCLAD::YY) IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (+ IRONCLAD::Y1 IRONCLAD::Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::Y1 IRONCLAD::Z1) IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950), not a FIXNUM. ; (* IRONCLAD::X1+YY IRONCLAD::X1+YY) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- (* IRONCLAD::X1+YY IRONCLAD::X1+YY) IRONCLAD::XX IRONCLAD::YYYY) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -231584178420712497525394893898815147060172286830580628391067262617734195707900 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -231584178420712497525394893898815147060172286830580628391067262617734195707900 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 2 (- (* IRONCLAD::X1+YY IRONCLAD::X1+YY) IRONCLAD::XX IRONCLAD::YYYY)) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (INTEGER ; -231584178420712497525394893898815147060172286830580628391067262617734195707900 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -463168356841424995050789787797630294120344573661161256782134525235468391415800 ; 26815615847398200002245113415982023367119598712621145051755384179590888202529249817484977881878654977544402909161125413206429311258373043243049391061205000) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER ; -231584178420712497525394893898815147060172286830580628391067262617734195707900 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -463168356841424995050789787797630294120344573661161256782134525235468391415800 ; 26815615847398200002245113415982023367119598712621145051755384179590888202529249817484977881878654977544402909161125413206429311258373043243049391061205000) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; (MOD ; (* 2 (- (* IRONCLAD::X1+YY IRONCLAD::X1+YY) IRONCLAD::XX IRONCLAD::YYYY)) ; IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -463168356841424995050789787797630294120344573661161256782134525235468391415800 ; 26815615847398200002245113415982023367119598712621145051755384179590888202529249817484977881878654977544402909161125413206429311258373043243049391061205000), not a FIXNUM. ; (* IRONCLAD::ZZ IRONCLAD::ZZ) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- IRONCLAD::XX (* IRONCLAD::ZZ IRONCLAD::ZZ)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The second argument is a (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 3 (- IRONCLAD::XX (* IRONCLAD::ZZ IRONCLAD::ZZ))) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -40223423771097300003367670123973035050679398068931717577633076269386332303793874726227466822817982466316604363741688119809643966887559564864574086591807500 ; 347376267631068746288092340848222720590258430245870942586600893926601293561850) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (INTEGER ; -13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -40223423771097300003367670123973035050679398068931717577633076269386332303793874726227466822817982466316604363741688119809643966887559564864574086591807500 ; 347376267631068746288092340848222720590258430245870942586600893926601293561850) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* 3 (- IRONCLAD::XX (* IRONCLAD::ZZ IRONCLAD::ZZ))) ; IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -40223423771097300003367670123973035050679398068931717577633076269386332303793874726227466822817982466316604363741688119809643966887559564864574086591807500 ; 347376267631068746288092340848222720590258430245870942586600893926601293561850), not a FIXNUM. ; (* IRONCLAD::M IRONCLAD::M) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 2 IRONCLAD::S) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 231584178420712497525394893898815147060172286830580628391067262617734195707901) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 231584178420712497525394893898815147060172286830580628391067262617734195707901) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; (- (* IRONCLAD::M IRONCLAD::M) (* 2 IRONCLAD::S)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501), not a FIXNUM. ; The second argument is a (MOD ; 231584178420712497525394893898815147060172286830580628391067262617734195707901), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -231584178420712497525394893898815147060172286830580628391067262617734195707900 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 231584178420712497525394893898815147060172286830580628391067262617734195707901), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -231584178420712497525394893898815147060172286830580628391067262617734195707900 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- (* IRONCLAD::M IRONCLAD::M) (* 2 IRONCLAD::S)) ; IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -231584178420712497525394893898815147060172286830580628391067262617734195707900 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500), not a FIXNUM. ; (- IRONCLAD::S IRONCLAD::U) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::M (- IRONCLAD::S IRONCLAD::U)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The second argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The second argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 8 IRONCLAD::YYYY) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 926336713682849990101579575595260588240689147322322513564269050470936782831601) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 926336713682849990101579575595260588240689147322322513564269050470936782831601) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; (- (* IRONCLAD::M (- IRONCLAD::S IRONCLAD::U)) (* 8 IRONCLAD::YYYY)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500), not a FIXNUM. ; The second argument is a (MOD ; 926336713682849990101579575595260588240689147322322513564269050470936782831601), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -13407807923699100001122556707991011683559799356310572525877692089795444101265551245456171790929429068347796715168803395750536978142750790671995632313434100 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER ; -13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 926336713682849990101579575595260588240689147322322513564269050470936782831601), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -13407807923699100001122556707991011683559799356310572525877692089795444101265551245456171790929429068347796715168803395750536978142750790671995632313434100 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- (* IRONCLAD::M (- IRONCLAD::S IRONCLAD::U)) (* 8 IRONCLAD::YYYY)) ; IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -13407807923699100001122556707991011683559799356310572525877692089795444101265551245456171790929429068347796715168803395750536978142750790671995632313434100 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500), not a FIXNUM. ; (* IRONCLAD::Y1+Z1 IRONCLAD::Y1+Z1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- (* IRONCLAD::Y1+Z1 IRONCLAD::Y1+Z1) IRONCLAD::YY IRONCLAD::ZZ) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -231584178420712497525394893898815147060172286830580628391067262617734195707900 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -231584178420712497525394893898815147060172286830580628391067262617734195707900 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- (* IRONCLAD::Y1+Z1 IRONCLAD::Y1+Z1) IRONCLAD::YY IRONCLAD::ZZ) ; IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -231584178420712497525394893898815147060172286830580628391067262617734195707900 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500), not a FIXNUM. ; processing (DEFMETHOD EC-ADD ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp256r1.lisp ; in: DEFMETHOD EC-ADD (SECP256R1-POINT SECP256R1-POINT) ; (* IRONCLAD::Z1 IRONCLAD::Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z1 IRONCLAD::Z1) IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950), not a FIXNUM. ; (* IRONCLAD::Z2 IRONCLAD::Z2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z2 IRONCLAD::Z2) IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950), not a FIXNUM. ; (* IRONCLAD::X1 IRONCLAD::Z2Z2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (* IRONCLAD::X1 IRONCLAD::Z2Z2) IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (* IRONCLAD::X2 IRONCLAD::Z1Z1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (* IRONCLAD::X2 IRONCLAD::Z1Z1) IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (* IRONCLAD::Y1 IRONCLAD::Z2 IRONCLAD::Z2Z2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Y1 IRONCLAD::Z2 IRONCLAD::Z2Z2) IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (* IRONCLAD::Y2 IRONCLAD::Z1 IRONCLAD::Z1Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Y2 IRONCLAD::Z1 IRONCLAD::Z1Z1) IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (= IRONCLAD::U1 IRONCLAD::U2) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (UNSIGNED-BYTE ; 64). ; etc. ; (= IRONCLAD::S1 IRONCLAD::S2) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (UNSIGNED-BYTE ; 64). ; etc. ; (- IRONCLAD::U2 IRONCLAD::U1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- IRONCLAD::U2 IRONCLAD::U1) IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950), not a FIXNUM. ; (* 4 IRONCLAD::H IRONCLAD::H) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 463168356841424995050789787797630294120344573661161256782134525235468391415801) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 463168356841424995050789787797630294120344573661161256782134525235468391415801) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 463168356841424995050789787797630294120344573661161256782134525235468391415801), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 53631231694796400004490226831964046734239197425242290103510768359181776405058499634969955763757309955088805818322250826412858622516746086486098782122410001) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 463168356841424995050789787797630294120344573661161256782134525235468391415801), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 53631231694796400004490226831964046734239197425242290103510768359181776405058499634969955763757309955088805818322250826412858622516746086486098782122410001) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::H IRONCLAD::I) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- IRONCLAD::S2 IRONCLAD::S1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 2 (- IRONCLAD::S2 IRONCLAD::S1)) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -231584178420712497525394893898815147060172286830580628391067262617734195707900 ; 231584178420712497525394893898815147060172286830580628391067262617734195707900) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -231584178420712497525394893898815147060172286830580628391067262617734195707900 ; 231584178420712497525394893898815147060172286830580628391067262617734195707900) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; (MOD (* 2 (- IRONCLAD::S2 IRONCLAD::S1)) IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -231584178420712497525394893898815147060172286830580628391067262617734195707900 ; 231584178420712497525394893898815147060172286830580628391067262617734195707900), not a FIXNUM. ; (* IRONCLAD::U1 IRONCLAD::I) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::R IRONCLAD::R) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- (* IRONCLAD::R IRONCLAD::R) IRONCLAD::J (* 2 IRONCLAD::V)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 2 IRONCLAD::V) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 231584178420712497525394893898815147060172286830580628391067262617734195707901) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 231584178420712497525394893898815147060172286830580628391067262617734195707901) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; (- (* IRONCLAD::R IRONCLAD::R) IRONCLAD::J (* 2 IRONCLAD::V)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500), not a FIXNUM. ; The second argument is a (MOD ; 231584178420712497525394893898815147060172286830580628391067262617734195707901), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -347376267631068746288092340848222720590258430245870942586600893926601293561850 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 231584178420712497525394893898815147060172286830580628391067262617734195707901), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -347376267631068746288092340848222720590258430245870942586600893926601293561850 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- (* IRONCLAD::R IRONCLAD::R) IRONCLAD::J (* 2 IRONCLAD::V)) ; IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -347376267631068746288092340848222720590258430245870942586600893926601293561850 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500), not a FIXNUM. ; (- IRONCLAD::V IRONCLAD::X3) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::R (- IRONCLAD::V IRONCLAD::X3)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The second argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The second argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 2 IRONCLAD::S1 IRONCLAD::J) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 231584178420712497525394893898815147060172286830580628391067262617734195707901) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 231584178420712497525394893898815147060172286830580628391067262617734195707901) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 231584178420712497525394893898815147060172286830580628391067262617734195707901), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 26815615847398200002245113415982023367119598712621145051755384179590888202529249817484977881878654977544402909161125413206429311258373043243049391061205001) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 231584178420712497525394893898815147060172286830580628391067262617734195707901), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 26815615847398200002245113415982023367119598712621145051755384179590888202529249817484977881878654977544402909161125413206429311258373043243049391061205001) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- (* IRONCLAD::R (- IRONCLAD::V IRONCLAD::X3)) ; (* 2 IRONCLAD::S1 IRONCLAD::J)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500), not a FIXNUM. ; The second argument is a (MOD ; 26815615847398200002245113415982023367119598712621145051755384179590888202529249817484977881878654977544402909161125413206429311258373043243049391061205001), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -40223423771097300003367670123973035050679398068931717577633076269386332303793874726227466822817982466316604363741688119809643966887559564864574086591807500 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER ; -13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 26815615847398200002245113415982023367119598712621145051755384179590888202529249817484977881878654977544402909161125413206429311258373043243049391061205001), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -40223423771097300003367670123973035050679398068931717577633076269386332303793874726227466822817982466316604363741688119809643966887559564864574086591807500 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD ; (- (* IRONCLAD::R (- IRONCLAD::V IRONCLAD::X3)) ; (* 2 IRONCLAD::S1 IRONCLAD::J)) ; IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -40223423771097300003367670123973035050679398068931717577633076269386332303793874726227466822817982466316604363741688119809643966887559564864574086591807500 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500), not a FIXNUM. ; (+ IRONCLAD::Z1 IRONCLAD::Z2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::Z1 IRONCLAD::Z2) IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950), not a FIXNUM. ; (* IRONCLAD::Z1+Z2 IRONCLAD::Z1+Z2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- (* IRONCLAD::Z1+Z2 IRONCLAD::Z1+Z2) IRONCLAD::Z1Z1 IRONCLAD::Z2Z2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -231584178420712497525394893898815147060172286830580628391067262617734195707900 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -231584178420712497525394893898815147060172286830580628391067262617734195707900 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* (- (* IRONCLAD::Z1+Z2 IRONCLAD::Z1+Z2) IRONCLAD::Z1Z1 IRONCLAD::Z2Z2) ; IRONCLAD::H) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -231584178420712497525394893898815147060172286830580628391067262617734195707900 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -26815615847398200002245113415982023367119598712621145051755384179590888202529249817484977881878654977544402909161125413206429311258373043243049391061205000 ; 1552518091216287575509997016045519883874413001817462420952243358319381311981552516218821248992487553429028716151972263135050472406590473520502256999630780789960399351157211211886562356228292661589244886765074003724582584300504875000) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (INTEGER ; -231584178420712497525394893898815147060172286830580628391067262617734195707900 ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602500), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -26815615847398200002245113415982023367119598712621145051755384179590888202529249817484977881878654977544402909161125413206429311258373043243049391061205000 ; 1552518091216287575509997016045519883874413001817462420952243358319381311981552516218821248992487553429028716151972263135050472406590473520502256999630780789960399351157211211886562356228292661589244886765074003724582584300504875000) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD ; (* (- (* IRONCLAD::Z1+Z2 IRONCLAD::Z1+Z2) IRONCLAD::Z1Z1 IRONCLAD::Z2Z2) ; IRONCLAD::H) ; IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -26815615847398200002245113415982023367119598712621145051755384179590888202529249817484977881878654977544402909161125413206429311258373043243049391061205000 ; 1552518091216287575509997016045519883874413001817462420952243358319381311981552516218821248992487553429028716151972263135050472406590473520502256999630780789960399351157211211886562356228292661589244886765074003724582584300504875000), not a FIXNUM. ; processing (DEFMETHOD EC-SCALAR-MULT ...) ; processing (DEFMETHOD EC-POINT-ON-CURVE-P ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp256r1.lisp ; in: DEFMETHOD EC-POINT-ON-CURVE-P (SECP256R1-POINT) ; (* IRONCLAD::Y IRONCLAD::Y) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Y IRONCLAD::Y) IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950), not a FIXNUM. ; (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950), not a FIXNUM. ; (* IRONCLAD::Z IRONCLAD::Z) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z IRONCLAD::Z) IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950), not a FIXNUM. ; (* IRONCLAD::Z2 IRONCLAD::Z2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::Z4 IRONCLAD::Z2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 13407807923699100001122556707991011683559799356310572525877692089795444101264624908742488940939327488772201454580562706603214655629186521621524695530602501) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* -3 IRONCLAD::X IRONCLAD::Z4) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (+ IRONCLAD::X3 (* -3 IRONCLAD::X IRONCLAD::Z4) ; (* IRONCLAD::+SECP256R1-B+ IRONCLAD::Z6)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (UNSIGNED-BYTE ; 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 4754233715294071753536997766098265397605321291568756963789803770565338829955226958282817707719945690448174040500929197932238602174421086657888409559449451), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a (MOD ; 4754233715294071753536997766098265397605321291568756963789803770565338829955226958282817707719945690448174040500929197932238602174421086657888409559449451), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD ; (+ IRONCLAD::X3 (* -3 IRONCLAD::X IRONCLAD::Z4) ; (* IRONCLAD::+SECP256R1-B+ IRONCLAD::Z6)) ; IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950), not a FIXNUM. ; (- IRONCLAD::Y2 IRONCLAD::A) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 115792089210356248762697446949407573530086143415290314195533631308867097853951), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- IRONCLAD::Y2 IRONCLAD::A) IRONCLAD::+SECP256R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -115792089210356248762697446949407573530086143415290314195533631308867097853950 ; 115792089210356248762697446949407573530086143415290314195533631308867097853950), not a FIXNUM. ; processing (DEFMETHOD EC-ENCODE-SCALAR ...) ; processing (DEFMETHOD EC-DECODE-SCALAR ...) ; processing (DEFMETHOD EC-ENCODE-POINT ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp256r1.lisp ; in: DEFMETHOD EC-ENCODE-POINT (SECP256R1-POINT) ; (* IRONCLAD::INVZ IRONCLAD::INVZ) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::INVZ IRONCLAD::INVZ) IRONCLAD::+SECP256R1-P+) ; ; 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. ; (* IRONCLAD::INVZ2 IRONCLAD::INVZ) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089210356248762697446949407573530086143415290314195533631308867097853951))), not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089210356248762697446949407573530086143415290314195533631308867097853951))), not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089210356248762697446949407573530086143415290314195533631308867097853951))), not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089210356248762697446949407573530086143415290314195533631308867097853951))), not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089210356248762697446949407573530086143415290314195533631308867097853951))), not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089210356248762697446949407573530086143415290314195533631308867097853951))), not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::INVZ2 IRONCLAD::INVZ) IRONCLAD::+SECP256R1-P+) ; ; 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. ; (* IRONCLAD::X IRONCLAD::INVZ2) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089210356248762697446949407573530086143415290314195533631308867097853951))), not a FLOAT. ; (MOD (* IRONCLAD::X IRONCLAD::INVZ2) IRONCLAD::+SECP256R1-P+) ; ; 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. ; (* IRONCLAD::Y IRONCLAD::INVZ3) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089210356248762697446949407573530086143415290314195533631308867097853951))), not a FLOAT. ; (MOD (* IRONCLAD::Y IRONCLAD::INVZ3) IRONCLAD::+SECP256R1-P+) ; ; 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 ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573530086143415290314195533631308867097853951) ; (115792089210356248762697446949407573530086143415290314195533631308867097853951))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573530086143415290314195533631308867097853951) ; (115792089210356248762697446949407573530086143415290314195533631308867097853951))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573530086143415290314195533631308867097853951) ; (115792089210356248762697446949407573530086143415290314195533631308867097853951))), 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. ; (MOD (* IRONCLAD::X IRONCLAD::INVZ2) IRONCLAD::+SECP256R1-P+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573530086143415290314195533631308867097853951) ; (115792089210356248762697446949407573530086143415290314195533631308867097853951))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573530086143415290314195533631308867097853951) ; (115792089210356248762697446949407573530086143415290314195533631308867097853951))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573530086143415290314195533631308867097853951) ; (115792089210356248762697446949407573530086143415290314195533631308867097853951))), 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. ; (MOD (* IRONCLAD::INVZ2 IRONCLAD::INVZ) IRONCLAD::+SECP256R1-P+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573530086143415290314195533631308867097853951) ; (115792089210356248762697446949407573530086143415290314195533631308867097853951))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573530086143415290314195533631308867097853951) ; (115792089210356248762697446949407573530086143415290314195533631308867097853951))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573530086143415290314195533631308867097853951) ; (115792089210356248762697446949407573530086143415290314195533631308867097853951))), 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. ; (MOD (* IRONCLAD::INVZ IRONCLAD::INVZ) IRONCLAD::+SECP256R1-P+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573530086143415290314195533631308867097853951) ; (115792089210356248762697446949407573530086143415290314195533631308867097853951))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573530086143415290314195533631308867097853951) ; (115792089210356248762697446949407573530086143415290314195533631308867097853951))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573530086143415290314195533631308867097853951) ; (115792089210356248762697446949407573530086143415290314195533631308867097853951))), 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. ; (* IRONCLAD::INVZ IRONCLAD::INVZ) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::INVZ IRONCLAD::INVZ) IRONCLAD::+SECP256R1-P+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::INVZ2 IRONCLAD::INVZ) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; #1=(115792089210356248762697446949407573530086143415290314195533631308867097853951))), not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (OR FLOAT (RATIONAL 0 #1#)), not a (SIGNED-BYTE ; 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #2#), not a (VALUES (SIGNED-BYTE 64) . #2#). ; etc. ; (MOD (* IRONCLAD::INVZ2 IRONCLAD::INVZ) IRONCLAD::+SECP256R1-P+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::X IRONCLAD::INVZ2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; #1=(115792089210356248762697446949407573530086143415290314195533631308867097853951))), not a FIXNUM. ; The result is a (VALUES REAL . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (OR FLOAT (RATIONAL 0 #1#)), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES REAL . #2#), not a (VALUES (SIGNED-BYTE 64) . #2#). ; etc. ; (MOD (* IRONCLAD::X IRONCLAD::INVZ2) IRONCLAD::+SECP256R1-P+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::Y IRONCLAD::INVZ3) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; #1=(115792089210356248762697446949407573530086143415290314195533631308867097853951))), not a FIXNUM. ; The result is a (VALUES REAL . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (OR FLOAT (RATIONAL 0 #1#)), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES REAL . #2#), not a (VALUES (SIGNED-BYTE 64) . #2#). ; etc. ; (MOD (* IRONCLAD::Y IRONCLAD::INVZ3) IRONCLAD::+SECP256R1-P+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFMETHOD EC-DECODE-POINT ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp256r1.lisp ; in: DEFMETHOD EC-DECODE-POINT ((EQL :SECP256R1) T) ; (AREF IRONCLAD::OCTETS 0) ; ; 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. ; (- (AREF IRONCLAD::OCTETS 0) 2) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (* -3 IRONCLAD::X) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate */(* /) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (+ (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) (* -3 IRONCLAD::X) ; IRONCLAD::+SECP256R1-B+) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (MOD ; (+ (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) (* -3 IRONCLAD::X) ; IRONCLAD::+SECP256R1-B+) ; IRONCLAD::+SECP256R1-P+) ; ; 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. ; (= (LOGAND IRONCLAD::Y 1) IRONCLAD::Y-SIGN) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (MOD ; (+ (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) (* -3 IRONCLAD::X) ; IRONCLAD::+SECP256R1-B+) ; IRONCLAD::+SECP256R1-P+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573530086143415290314195533631308867097853951) ; (115792089210356248762697446949407573530086143415290314195533631308867097853951))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573530086143415290314195533631308867097853951) ; (115792089210356248762697446949407573530086143415290314195533631308867097853951))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573530086143415290314195533631308867097853951) ; (115792089210356248762697446949407573530086143415290314195533631308867097853951))), 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. ; (- (AREF IRONCLAD::OCTETS 0) 2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (* -3 IRONCLAD::X) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; (+ (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) (* -3 IRONCLAD::X) ; IRONCLAD::+SECP256R1-B+) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (MOD ; (+ (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) (* -3 IRONCLAD::X) ; IRONCLAD::+SECP256R1-B+) ; IRONCLAD::+SECP256R1-P+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFUN SECP256R1-PUBLIC-KEY ...) ; processing (DEFMETHOD MAKE-SIGNATURE ...) ; processing (DEFMETHOD DESTRUCTURE-SIGNATURE ...) ; processing (DEFMETHOD GENERATE-SIGNATURE-NONCE ...) ; processing (DEFMETHOD SIGN-MESSAGE ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp256r1.lisp ; in: DEFMETHOD SIGN-MESSAGE (SECP256R1-PRIVATE-KEY T) ; (LENGTH IRONCLAD::MESSAGE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (SUBSEQ (IRONCLAD::EC-ENCODE-POINT IRONCLAD::R) 1 ; (1+ (/ IRONCLAD::+SECP256R1-BITS+ 8))) ; ; 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. ; (MOD IRONCLAD::R IRONCLAD::+SECP256R1-L+) ; ; 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. ; (SUBSEQ IRONCLAD::MESSAGE IRONCLAD::START IRONCLAD::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. ; (* IRONCLAD::SK IRONCLAD::R) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089210356248762697446949407573529996955224135760342422259061068512044369))), not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089210356248762697446949407573529996955224135760342422259061068512044369))), not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089210356248762697446949407573529996955224135760342422259061068512044369))), not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089210356248762697446949407573529996955224135760342422259061068512044369))), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089210356248762697446949407573529996955224135760342422259061068512044369))), not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089210356248762697446949407573529996955224135760342422259061068512044369))), not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (* IRONCLAD::INVK (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R))) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::INVK (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R))) ; IRONCLAD::+SECP256R1-L+) ; ; 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. ; (ZEROP IRONCLAD::R) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089210356248762697446949407573529996955224135760342422259061068512044369))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (MOD (* IRONCLAD::INVK (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R))) ; IRONCLAD::+SECP256R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573529996955224135760342422259061068512044369) ; (115792089210356248762697446949407573529996955224135760342422259061068512044369))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573529996955224135760342422259061068512044369) ; (115792089210356248762697446949407573529996955224135760342422259061068512044369))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573529996955224135760342422259061068512044369) ; (115792089210356248762697446949407573529996955224135760342422259061068512044369))), 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. ; (MOD IRONCLAD::R IRONCLAD::+SECP256R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573529996955224135760342422259061068512044369) ; (115792089210356248762697446949407573529996955224135760342422259061068512044369))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573529996955224135760342422259061068512044369) ; (115792089210356248762697446949407573529996955224135760342422259061068512044369))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573529996955224135760342422259061068512044369) ; (115792089210356248762697446949407573529996955224135760342422259061068512044369))), not a RATIONAL. ; (MIN (OR IRONCLAD::END (LENGTH IRONCLAD::MESSAGE)) ; (/ IRONCLAD::+SECP256R1-BITS+ 8)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL 32) (SINGLE-FLOAT 32.0) ; (DOUBLE-FLOAT 32.0d0)), 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. ; (MOD IRONCLAD::R IRONCLAD::+SECP256R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (ZEROP IRONCLAD::S) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089210356248762697446949407573529996955224135760342422259061068512044369))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (MIN (OR IRONCLAD::END (LENGTH IRONCLAD::MESSAGE)) ; (/ IRONCLAD::+SECP256R1-BITS+ 8)) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (MOD IRONCLAD::R IRONCLAD::+SECP256R1-L+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::SK IRONCLAD::R) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; #1=(115792089210356248762697446949407573529996955224135760342422259061068512044369))), not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a (OR FLOAT (RATIONAL 0 #1#)), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES NUMBER . #2#), not a (VALUES (SIGNED-BYTE 64) ; . #2#). ; etc. ; (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (* IRONCLAD::INVK (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R))) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::INVK (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R))) ; IRONCLAD::+SECP256R1-L+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFMETHOD VERIFY-SIGNATURE ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp256r1.lisp ; in: DEFMETHOD VERIFY-SIGNATURE (SECP256R1-PUBLIC-KEY T T) ; (LENGTH IRONCLAD::SIGNATURE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (LENGTH IRONCLAD::MESSAGE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (SUBSEQ IRONCLAD::MESSAGE IRONCLAD::START IRONCLAD::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. ; (* IRONCLAD::E IRONCLAD::W) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::E IRONCLAD::W) IRONCLAD::+SECP256R1-L+) ; ; 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. ; (* IRONCLAD::R IRONCLAD::W) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::R IRONCLAD::W) IRONCLAD::+SECP256R1-L+) ; ; 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. ; (SUBSEQ (IRONCLAD::EC-ENCODE-POINT IRONCLAD::RP) 1 ; (1+ (/ IRONCLAD::+SECP256R1-BITS+ 8))) ; ; 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. ; (MOD IRONCLAD::V IRONCLAD::+SECP256R1-L+) ; ; 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. ; (< IRONCLAD::R IRONCLAD::+SECP256R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (MOD IRONCLAD::V IRONCLAD::+SECP256R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573529996955224135760342422259061068512044369) ; (115792089210356248762697446949407573529996955224135760342422259061068512044369))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573529996955224135760342422259061068512044369) ; (115792089210356248762697446949407573529996955224135760342422259061068512044369))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573529996955224135760342422259061068512044369) ; (115792089210356248762697446949407573529996955224135760342422259061068512044369))), 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. ; (MOD (* IRONCLAD::R IRONCLAD::W) IRONCLAD::+SECP256R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573529996955224135760342422259061068512044369) ; (115792089210356248762697446949407573529996955224135760342422259061068512044369))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573529996955224135760342422259061068512044369) ; (115792089210356248762697446949407573529996955224135760342422259061068512044369))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573529996955224135760342422259061068512044369) ; (115792089210356248762697446949407573529996955224135760342422259061068512044369))), 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. ; (MOD (* IRONCLAD::E IRONCLAD::W) IRONCLAD::+SECP256R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573529996955224135760342422259061068512044369) ; (115792089210356248762697446949407573529996955224135760342422259061068512044369))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573529996955224135760342422259061068512044369) ; (115792089210356248762697446949407573529996955224135760342422259061068512044369))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-115792089210356248762697446949407573529996955224135760342422259061068512044369) ; (115792089210356248762697446949407573529996955224135760342422259061068512044369))), not a RATIONAL. ; (MIN (OR IRONCLAD::END (LENGTH IRONCLAD::MESSAGE)) ; (/ IRONCLAD::+SECP256R1-BITS+ 8)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL 32) (SINGLE-FLOAT 32.0) ; (DOUBLE-FLOAT 32.0d0)), 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. ; (MOD (* IRONCLAD::E IRONCLAD::W) IRONCLAD::+SECP256R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (< IRONCLAD::S IRONCLAD::+SECP256R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (= IRONCLAD::V IRONCLAD::R) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089210356248762697446949407573529996955224135760342422259061068512044369))), not a SINGLE-FLOAT. ; The second argument is a (OR ; (RATIONAL * ; (115792089210356248762697446949407573529996955224135760342422259061068512044369)) ; SINGLE-FLOAT ; (DOUBLE-FLOAT * ; (1.1579208921035625d77))), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089210356248762697446949407573529996955224135760342422259061068512044369))), not a DOUBLE-FLOAT. ; The second argument is a (OR ; (RATIONAL * ; (115792089210356248762697446949407573529996955224135760342422259061068512044369)) ; SINGLE-FLOAT ; (DOUBLE-FLOAT * ; (1.1579208921035625d77))), not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (115792089210356248762697446949407573529996955224135760342422259061068512044369))), not a FLOAT. ; The second argument is a (OR ; (RATIONAL * ; (115792089210356248762697446949407573529996955224135760342422259061068512044369)) ; SINGLE-FLOAT ; (DOUBLE-FLOAT * ; (1.1579208921035625d77))), not a RATIONAL. ; ; note: unable to open code because: The operands might not be the same type. ; (MIN (OR IRONCLAD::END (LENGTH IRONCLAD::MESSAGE)) ; (/ IRONCLAD::+SECP256R1-BITS+ 8)) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::E IRONCLAD::W) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::E IRONCLAD::W) IRONCLAD::+SECP256R1-L+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::R IRONCLAD::W) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::R IRONCLAD::W) IRONCLAD::+SECP256R1-L+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (MOD IRONCLAD::V IRONCLAD::+SECP256R1-L+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (= IRONCLAD::V IRONCLAD::R) ; ; note: forced to do full call ; unable to do #1=inline float comparison (cost 3) because: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; #2=(115792089210356248762697446949407573529996955224135760342422259061068512044369))), not a SINGLE-FLOAT. ; The second argument is a (OR ; (RATIONAL * ; #3=(115792089210356248762697446949407573529996955224135760342422259061068512044369)) ; SINGLE-FLOAT ; (DOUBLE-FLOAT * #4=(1.1579208921035625d77))), not a SINGLE-FLOAT. ; unable to do #1# (cost 3) because: ; The first argument is a (OR FLOAT (RATIONAL 0 #2#)), not a DOUBLE-FLOAT. ; The second argument is a (OR (RATIONAL * #3#) SINGLE-FLOAT ; (DOUBLE-FLOAT * #4#)), not a DOUBLE-FLOAT. ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/public-key/secp256r1-tmpG1VNK6NW.fasl ; compilation finished in 0:00:00.940 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/secp384r1.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS SECP384R1-PUBLIC-KEY ...) ; processing (DEFCLASS SECP384R1-PRIVATE-KEY ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp384r1.lisp ; in: DEFMETHOD EC-POINT-EQUAL (SECP384R1-POINT SECP384R1-POINT) ; (* IRONCLAD::Z1 IRONCLAD::Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z1 IRONCLAD::Z1) IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318), not a FIXNUM. ; (* IRONCLAD::Z2 IRONCLAD::Z2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z2 IRONCLAD::Z2) IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318), not a FIXNUM. ; (* IRONCLAD::X1 IRONCLAD::Z2Z2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (* IRONCLAD::X2 IRONCLAD::Z1Z1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (- (* IRONCLAD::X1 IRONCLAD::Z2Z2) (* IRONCLAD::X2 IRONCLAD::Z1Z1)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (MOD (- (* IRONCLAD::X1 IRONCLAD::Z2Z2) (* IRONCLAD::X2 IRONCLAD::Z1Z1)) ; IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (* IRONCLAD::Y1 IRONCLAD::Z2Z2 IRONCLAD::Z2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (* IRONCLAD::Y2 IRONCLAD::Z1Z1 IRONCLAD::Z1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (- (* IRONCLAD::Y1 IRONCLAD::Z2Z2 IRONCLAD::Z2) ; (* IRONCLAD::Y2 IRONCLAD::Z1Z1 IRONCLAD::Z1)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (MOD ; (- (* IRONCLAD::Y1 IRONCLAD::Z2Z2 IRONCLAD::Z2) ; (* IRONCLAD::Y2 IRONCLAD::Z1Z1 IRONCLAD::Z1)) ; IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; processing (DEFMETHOD EC-DOUBLE ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp384r1.lisp ; in: DEFMETHOD EC-DOUBLE (SECP384R1-POINT) ; (* IRONCLAD::X1 IRONCLAD::X1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::X1 IRONCLAD::X1) IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318), not a FIXNUM. ; (* IRONCLAD::Y1 IRONCLAD::Y1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Y1 IRONCLAD::Y1) IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318), not a FIXNUM. ; (* IRONCLAD::YY IRONCLAD::YY) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::Z1 IRONCLAD::Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z1 IRONCLAD::Z1) IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318), not a FIXNUM. ; (+ IRONCLAD::X1 IRONCLAD::YY) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::X1 IRONCLAD::YY) IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (+ IRONCLAD::Y1 IRONCLAD::Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::Y1 IRONCLAD::Z1) IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318), not a FIXNUM. ; (* IRONCLAD::X1+YY IRONCLAD::X1+YY) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- (* IRONCLAD::X1+YY IRONCLAD::X1+YY) IRONCLAD::XX IRONCLAD::YYYY) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224636 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224636 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 2 (- (* IRONCLAD::X1+YY IRONCLAD::X1+YY) IRONCLAD::XX IRONCLAD::YYYY)) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (INTEGER ; -78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224636 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -157608024785577916849116160400574455220318957081861786671793173616982887085987481316189064353035752007446427892449272 ; 3105036184601417870297958976925005110513772034233393222278104076052101905372700141430024560274693395832057788542144782282353551727589801977734234003608481621184985731633745906459241153960995688116812978434126637816813345998886666248) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER ; -78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224636 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -157608024785577916849116160400574455220318957081861786671793173616982887085987481316189064353035752007446427892449272 ; 3105036184601417870297958976925005110513772034233393222278104076052101905372700141430024560274693395832057788542144782282353551727589801977734234003608481621184985731633745906459241153960995688116812978434126637816813345998886666248) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; (MOD ; (* 2 (- (* IRONCLAD::X1+YY IRONCLAD::X1+YY) IRONCLAD::XX IRONCLAD::YYYY)) ; IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -157608024785577916849116160400574455220318957081861786671793173616982887085987481316189064353035752007446427892449272 ; 3105036184601417870297958976925005110513772034233393222278104076052101905372700141430024560274693395832057788542144782282353551727589801977734234003608481621184985731633745906459241153960995688116812978434126637816813345998886666248), not a FIXNUM. ; (* IRONCLAD::ZZ IRONCLAD::ZZ) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- IRONCLAD::XX (* IRONCLAD::ZZ IRONCLAD::ZZ)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The second argument is a (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 3 (- IRONCLAD::XX (* IRONCLAD::ZZ IRONCLAD::ZZ))) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -4657554276902126805446938465387507665770658051350089833417156114078152858059050212145036840412040093748086682813217173423530327591384702966601351005412722431777478597450618859688861730941493532175219467651189956725220018998329999372 ; 118206018589183437636837120300430841415239217811396340003844880212737165314490610987141798264776814005584820919336954) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (INTEGER ; -1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -4657554276902126805446938465387507665770658051350089833417156114078152858059050212145036840412040093748086682813217173423530327591384702966601351005412722431777478597450618859688861730941493532175219467651189956725220018998329999372 ; 118206018589183437636837120300430841415239217811396340003844880212737165314490610987141798264776814005584820919336954) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* 3 (- IRONCLAD::XX (* IRONCLAD::ZZ IRONCLAD::ZZ))) ; IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -4657554276902126805446938465387507665770658051350089833417156114078152858059050212145036840412040093748086682813217173423530327591384702966601351005412722431777478597450618859688861730941493532175219467651189956725220018998329999372 ; 118206018589183437636837120300430841415239217811396340003844880212737165314490610987141798264776814005584820919336954), not a FIXNUM. ; (* IRONCLAD::M IRONCLAD::M) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 2 IRONCLAD::S) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224637) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224637) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; (- (* IRONCLAD::M IRONCLAD::M) (* 2 IRONCLAD::S)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125), not a FIXNUM. ; The second argument is a (MOD ; 78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224637), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224636 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224637), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224636 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- (* IRONCLAD::M IRONCLAD::M) (* 2 IRONCLAD::S)) ; IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224636 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124), not a FIXNUM. ; (- IRONCLAD::S IRONCLAD::U) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::M (- IRONCLAD::S IRONCLAD::U)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The second argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The second argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 8 IRONCLAD::YYYY) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 315216049571155833698232320801148910440637914163723573343586347233965774171974962632378128706071504014892855784898545) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 315216049571155833698232320801148910440637914163723573343586347233965774171974962632378128706071504014892855784898545) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; (- (* IRONCLAD::M (- IRONCLAD::S IRONCLAD::U)) (* 8 IRONCLAD::YYYY)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124), not a FIXNUM. ; The second argument is a (MOD ; 315216049571155833698232320801148910440637914163723573343586347233965774171974962632378128706071504014892855784898545), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072706357226347019628599221187918150714681448506656589390216539576854542754669819021038867345769390412421565855228231668 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER ; -1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 315216049571155833698232320801148910440637914163723573343586347233965774171974962632378128706071504014892855784898545), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072706357226347019628599221187918150714681448506656589390216539576854542754669819021038867345769390412421565855228231668 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- (* IRONCLAD::M (- IRONCLAD::S IRONCLAD::U)) (* 8 IRONCLAD::YYYY)) ; IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072706357226347019628599221187918150714681448506656589390216539576854542754669819021038867345769390412421565855228231668 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124), not a FIXNUM. ; (* IRONCLAD::Y1+Z1 IRONCLAD::Y1+Z1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- (* IRONCLAD::Y1+Z1 IRONCLAD::Y1+Z1) IRONCLAD::YY IRONCLAD::ZZ) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224636 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224636 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- (* IRONCLAD::Y1+Z1 IRONCLAD::Y1+Z1) IRONCLAD::YY IRONCLAD::ZZ) ; IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224636 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124), not a FIXNUM. ; processing (DEFMETHOD EC-ADD ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp384r1.lisp ; in: DEFMETHOD EC-ADD (SECP384R1-POINT SECP384R1-POINT) ; (* IRONCLAD::Z1 IRONCLAD::Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z1 IRONCLAD::Z1) IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318), not a FIXNUM. ; (* IRONCLAD::Z2 IRONCLAD::Z2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z2 IRONCLAD::Z2) IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318), not a FIXNUM. ; (* IRONCLAD::X1 IRONCLAD::Z2Z2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (* IRONCLAD::X1 IRONCLAD::Z2Z2) IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (* IRONCLAD::X2 IRONCLAD::Z1Z1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (* IRONCLAD::X2 IRONCLAD::Z1Z1) IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (* IRONCLAD::Y1 IRONCLAD::Z2 IRONCLAD::Z2Z2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Y1 IRONCLAD::Z2 IRONCLAD::Z2Z2) IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (* IRONCLAD::Y2 IRONCLAD::Z1 IRONCLAD::Z1Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Y2 IRONCLAD::Z1 IRONCLAD::Z1Z1) IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (= IRONCLAD::U1 IRONCLAD::U2) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (UNSIGNED-BYTE ; 64). ; etc. ; (= IRONCLAD::S1 IRONCLAD::S2) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (UNSIGNED-BYTE ; 64). ; etc. ; (- IRONCLAD::U2 IRONCLAD::U1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- IRONCLAD::U2 IRONCLAD::U1) IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318), not a FIXNUM. ; (* 4 IRONCLAD::H IRONCLAD::H) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 157608024785577916849116160400574455220318957081861786671793173616982887085987481316189064353035752007446427892449273) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 157608024785577916849116160400574455220318957081861786671793173616982887085987481316189064353035752007446427892449273) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 157608024785577916849116160400574455220318957081861786671793173616982887085987481316189064353035752007446427892449273), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 6210072369202835740595917953850010221027544068466786444556208152104203810745400282860049120549386791664115577084289564564707103455179603955468468007216963242369971463267491812918482307921991376233625956868253275633626691997773332497) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 157608024785577916849116160400574455220318957081861786671793173616982887085987481316189064353035752007446427892449273), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 6210072369202835740595917953850010221027544068466786444556208152104203810745400282860049120549386791664115577084289564564707103455179603955468468007216963242369971463267491812918482307921991376233625956868253275633626691997773332497) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::H IRONCLAD::I) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- IRONCLAD::S2 IRONCLAD::S1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 2 (- IRONCLAD::S2 IRONCLAD::S1)) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224636 ; 78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224636) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224636 ; 78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224636) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; (MOD (* 2 (- IRONCLAD::S2 IRONCLAD::S1)) IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224636 ; 78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224636), not a FIXNUM. ; (* IRONCLAD::U1 IRONCLAD::I) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::R IRONCLAD::R) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- (* IRONCLAD::R IRONCLAD::R) IRONCLAD::J (* 2 IRONCLAD::V)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 2 IRONCLAD::V) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224637) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224637) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; (- (* IRONCLAD::R IRONCLAD::R) IRONCLAD::J (* 2 IRONCLAD::V)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124), not a FIXNUM. ; The second argument is a (MOD ; 78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224637), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -118206018589183437636837120300430841415239217811396340003844880212737165314490610987141798264776814005584820919336954 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224637), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -118206018589183437636837120300430841415239217811396340003844880212737165314490610987141798264776814005584820919336954 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- (* IRONCLAD::R IRONCLAD::R) IRONCLAD::J (* 2 IRONCLAD::V)) ; IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -118206018589183437636837120300430841415239217811396340003844880212737165314490610987141798264776814005584820919336954 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124), not a FIXNUM. ; (- IRONCLAD::V IRONCLAD::X3) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::R (- IRONCLAD::V IRONCLAD::X3)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The second argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The second argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 2 IRONCLAD::S1 IRONCLAD::J) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224637) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224637) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224637), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 3105036184601417870297958976925005110513772034233393222278104076052101905372700141430024560274693395832057788542144782282353551727589801977734234003608481621184985731633745906459241153960995688116812978434126637816813345998886666249) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224637), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 3105036184601417870297958976925005110513772034233393222278104076052101905372700141430024560274693395832057788542144782282353551727589801977734234003608481621184985731633745906459241153960995688116812978434126637816813345998886666249) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- (* IRONCLAD::R (- IRONCLAD::V IRONCLAD::X3)) ; (* 2 IRONCLAD::S1 IRONCLAD::J)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124), not a FIXNUM. ; The second argument is a (MOD ; 3105036184601417870297958976925005110513772034233393222278104076052101905372700141430024560274693395832057788542144782282353551727589801977734234003608481621184985731633745906459241153960995688116812978434126637816813345998886666249), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -4657554276902126805446938465387507665770658051350089833417156114078152858059050212145036840412040093748086682813217173423530327591384702966601351005412722431777478597450618859688861730941493532175219467651189956725220018998329999372 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER ; -1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 3105036184601417870297958976925005110513772034233393222278104076052101905372700141430024560274693395832057788542144782282353551727589801977734234003608481621184985731633745906459241153960995688116812978434126637816813345998886666249), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -4657554276902126805446938465387507665770658051350089833417156114078152858059050212145036840412040093748086682813217173423530327591384702966601351005412722431777478597450618859688861730941493532175219467651189956725220018998329999372 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD ; (- (* IRONCLAD::R (- IRONCLAD::V IRONCLAD::X3)) ; (* 2 IRONCLAD::S1 IRONCLAD::J)) ; IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -4657554276902126805446938465387507665770658051350089833417156114078152858059050212145036840412040093748086682813217173423530327591384702966601351005412722431777478597450618859688861730941493532175219467651189956725220018998329999372 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124), not a FIXNUM. ; (+ IRONCLAD::Z1 IRONCLAD::Z2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::Z1 IRONCLAD::Z2) IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318), not a FIXNUM. ; (* IRONCLAD::Z1+Z2 IRONCLAD::Z1+Z2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- (* IRONCLAD::Z1+Z2 IRONCLAD::Z1+Z2) IRONCLAD::Z1Z1 IRONCLAD::Z2Z2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224636 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224636 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* (- (* IRONCLAD::Z1+Z2 IRONCLAD::Z1+Z2) IRONCLAD::Z1Z1 IRONCLAD::Z2Z2) ; IRONCLAD::H) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224636 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -3105036184601417870297958976925005110513772034233393222278104076052101905372700141430024560274693395832057788542144782282353551727589801977734234003608481621184985731633745906459241153960995688116812978434126637816813345998886666248 ; 61172327492847069472032393719205726809135813743440799050195397570919697796090373438193087932951745364335411418754192158027371883482871393221879462331321106336775708560918647649541641604232637072055046695989901089216659016884039006326354228973932344229259162402188271721529352380657325954679977318277520211348882541876885333111266759951749941821432) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (INTEGER ; -78804012392788958424558080200287227610159478540930893335896586808491443542993740658094532176517876003723213946224636 ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333124), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -3105036184601417870297958976925005110513772034233393222278104076052101905372700141430024560274693395832057788542144782282353551727589801977734234003608481621184985731633745906459241153960995688116812978434126637816813345998886666248 ; 61172327492847069472032393719205726809135813743440799050195397570919697796090373438193087932951745364335411418754192158027371883482871393221879462331321106336775708560918647649541641604232637072055046695989901089216659016884039006326354228973932344229259162402188271721529352380657325954679977318277520211348882541876885333111266759951749941821432) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD ; (* (- (* IRONCLAD::Z1+Z2 IRONCLAD::Z1+Z2) IRONCLAD::Z1Z1 IRONCLAD::Z2Z2) ; IRONCLAD::H) ; IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -3105036184601417870297958976925005110513772034233393222278104076052101905372700141430024560274693395832057788542144782282353551727589801977734234003608481621184985731633745906459241153960995688116812978434126637816813345998886666248 ; 61172327492847069472032393719205726809135813743440799050195397570919697796090373438193087932951745364335411418754192158027371883482871393221879462331321106336775708560918647649541641604232637072055046695989901089216659016884039006326354228973932344229259162402188271721529352380657325954679977318277520211348882541876885333111266759951749941821432), not a FIXNUM. ; processing (DEFMETHOD EC-SCALAR-MULT ...) ; processing (DEFMETHOD EC-POINT-ON-CURVE-P ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp384r1.lisp ; in: DEFMETHOD EC-POINT-ON-CURVE-P (SECP384R1-POINT) ; (* IRONCLAD::Y IRONCLAD::Y) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Y IRONCLAD::Y) IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318), not a FIXNUM. ; (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318), not a FIXNUM. ; (* IRONCLAD::Z IRONCLAD::Z) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z IRONCLAD::Z) IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318), not a FIXNUM. ; (* IRONCLAD::Z2 IRONCLAD::Z2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::Z4 IRONCLAD::Z2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 1552518092300708935148979488462502555256886017116696611139052038026050952686350070715012280137346697916028894271072391141176775863794900988867117001804240810592492865816872953229620576980497844058406489217063318908406672999443333125) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* -3 IRONCLAD::X IRONCLAD::Z4) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (+ IRONCLAD::X3 (* -3 IRONCLAD::X IRONCLAD::Z4) ; (* IRONCLAD::+SECP384R1-B+ IRONCLAD::Z6)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (UNSIGNED-BYTE ; 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 1086714957547291441539380743186883691325052640168535502985634527585716824737423997330458424652672228621187160777634281319450819776407920055319325979067815022545612052681671576296126271714236782641033750695114220282292143901370722851), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a (MOD ; 1086714957547291441539380743186883691325052640168535502985634527585716824737423997330458424652672228621187160777634281319450819776407920055319325979067815022545612052681671576296126271714236782641033750695114220282292143901370722851), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD ; (+ IRONCLAD::X3 (* -3 IRONCLAD::X IRONCLAD::Z4) ; (* IRONCLAD::+SECP384R1-B+ IRONCLAD::Z6)) ; IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318), not a FIXNUM. ; (- IRONCLAD::Y2 IRONCLAD::A) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- IRONCLAD::Y2 IRONCLAD::A) IRONCLAD::+SECP384R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318 ; 39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112318), not a FIXNUM. ; processing (DEFMETHOD EC-ENCODE-SCALAR ...) ; processing (DEFMETHOD EC-DECODE-SCALAR ...) ; processing (DEFMETHOD EC-ENCODE-POINT ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp384r1.lisp ; in: DEFMETHOD EC-ENCODE-POINT (SECP384R1-POINT) ; (* IRONCLAD::INVZ IRONCLAD::INVZ) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::INVZ IRONCLAD::INVZ) IRONCLAD::+SECP384R1-P+) ; ; 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. ; (* IRONCLAD::INVZ2 IRONCLAD::INVZ) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319))), not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319))), not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319))), not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319))), not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319))), not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319))), not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::INVZ2 IRONCLAD::INVZ) IRONCLAD::+SECP384R1-P+) ; ; 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. ; (* IRONCLAD::X IRONCLAD::INVZ2) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319))), not a FLOAT. ; (MOD (* IRONCLAD::X IRONCLAD::INVZ2) IRONCLAD::+SECP384R1-P+) ; ; 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. ; (* IRONCLAD::Y IRONCLAD::INVZ3) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319))), not a FLOAT. ; (MOD (* IRONCLAD::Y IRONCLAD::INVZ3) IRONCLAD::+SECP384R1-P+) ; ; 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 ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319) ; (39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319) ; (39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319) ; (39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319))), 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. ; (MOD (* IRONCLAD::X IRONCLAD::INVZ2) IRONCLAD::+SECP384R1-P+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319) ; (39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319) ; (39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319) ; (39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319))), 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. ; (MOD (* IRONCLAD::INVZ2 IRONCLAD::INVZ) IRONCLAD::+SECP384R1-P+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319) ; (39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319) ; (39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319) ; (39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319))), 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. ; (MOD (* IRONCLAD::INVZ IRONCLAD::INVZ) IRONCLAD::+SECP384R1-P+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319) ; (39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319) ; (39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319) ; (39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319))), 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. ; (* IRONCLAD::INVZ IRONCLAD::INVZ) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::INVZ IRONCLAD::INVZ) IRONCLAD::+SECP384R1-P+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::INVZ2 IRONCLAD::INVZ) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; #1=(39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319))), not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (OR FLOAT (RATIONAL 0 #1#)), not a (SIGNED-BYTE ; 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #2#), not a (VALUES (SIGNED-BYTE 64) . #2#). ; etc. ; (MOD (* IRONCLAD::INVZ2 IRONCLAD::INVZ) IRONCLAD::+SECP384R1-P+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::X IRONCLAD::INVZ2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; #1=(39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319))), not a FIXNUM. ; The result is a (VALUES REAL . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (OR FLOAT (RATIONAL 0 #1#)), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES REAL . #2#), not a (VALUES (SIGNED-BYTE 64) . #2#). ; etc. ; (MOD (* IRONCLAD::X IRONCLAD::INVZ2) IRONCLAD::+SECP384R1-P+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::Y IRONCLAD::INVZ3) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; #1=(39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319))), not a FIXNUM. ; The result is a (VALUES REAL . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (OR FLOAT (RATIONAL 0 #1#)), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES REAL . #2#), not a (VALUES (SIGNED-BYTE 64) . #2#). ; etc. ; (MOD (* IRONCLAD::Y IRONCLAD::INVZ3) IRONCLAD::+SECP384R1-P+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFMETHOD EC-DECODE-POINT ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp384r1.lisp ; in: DEFMETHOD EC-DECODE-POINT ((EQL :SECP384R1) T) ; (AREF IRONCLAD::OCTETS 0) ; ; 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. ; (- (AREF IRONCLAD::OCTETS 0) 2) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (* -3 IRONCLAD::X) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate */(* /) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (+ (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) (* -3 IRONCLAD::X) ; IRONCLAD::+SECP384R1-B+) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (MOD ; (+ (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) (* -3 IRONCLAD::X) ; IRONCLAD::+SECP384R1-B+) ; IRONCLAD::+SECP384R1-P+) ; ; 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. ; (= (LOGAND IRONCLAD::Y 1) IRONCLAD::Y-SIGN) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (MOD ; (+ (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) (* -3 IRONCLAD::X) ; IRONCLAD::+SECP384R1-B+) ; IRONCLAD::+SECP384R1-P+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319) ; (39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319) ; (39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319) ; (39402006196394479212279040100143613805079739270465446667948293404245721771496870329047266088258938001861606973112319))), 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. ; (- (AREF IRONCLAD::OCTETS 0) 2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (* -3 IRONCLAD::X) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; (+ (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) (* -3 IRONCLAD::X) ; IRONCLAD::+SECP384R1-B+) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (MOD ; (+ (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) (* -3 IRONCLAD::X) ; IRONCLAD::+SECP384R1-B+) ; IRONCLAD::+SECP384R1-P+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFUN SECP384R1-PUBLIC-KEY ...) ; processing (DEFMETHOD MAKE-SIGNATURE ...) ; processing (DEFMETHOD DESTRUCTURE-SIGNATURE ...) ; processing (DEFMETHOD GENERATE-SIGNATURE-NONCE ...) ; processing (DEFMETHOD SIGN-MESSAGE ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp384r1.lisp ; in: DEFMETHOD SIGN-MESSAGE (SECP384R1-PRIVATE-KEY T) ; (LENGTH IRONCLAD::MESSAGE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (SUBSEQ (IRONCLAD::EC-ENCODE-POINT IRONCLAD::R) 1 ; (1+ (/ IRONCLAD::+SECP384R1-BITS+ 8))) ; ; 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. ; (MOD IRONCLAD::R IRONCLAD::+SECP384R1-L+) ; ; 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. ; (SUBSEQ IRONCLAD::MESSAGE IRONCLAD::START IRONCLAD::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. ; (* IRONCLAD::SK IRONCLAD::R) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (* IRONCLAD::INVK (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R))) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::INVK (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R))) ; IRONCLAD::+SECP384R1-L+) ; ; 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. ; (ZEROP IRONCLAD::R) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (MOD (* IRONCLAD::INVK (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R))) ; IRONCLAD::+SECP384R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643) ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643) ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643) ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), 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. ; (MOD IRONCLAD::R IRONCLAD::+SECP384R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643) ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643) ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643) ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), not a RATIONAL. ; (MIN (OR IRONCLAD::END (LENGTH IRONCLAD::MESSAGE)) ; (/ IRONCLAD::+SECP384R1-BITS+ 8)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL 48) (SINGLE-FLOAT 48.0) ; (DOUBLE-FLOAT 48.0d0)), 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. ; (MOD IRONCLAD::R IRONCLAD::+SECP384R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (ZEROP IRONCLAD::S) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (MIN (OR IRONCLAD::END (LENGTH IRONCLAD::MESSAGE)) ; (/ IRONCLAD::+SECP384R1-BITS+ 8)) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (MOD IRONCLAD::R IRONCLAD::+SECP384R1-L+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::SK IRONCLAD::R) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; #1=(39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a (OR FLOAT (RATIONAL 0 #1#)), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES NUMBER . #2#), not a (VALUES (SIGNED-BYTE 64) ; . #2#). ; etc. ; (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (* IRONCLAD::INVK (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R))) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::INVK (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R))) ; IRONCLAD::+SECP384R1-L+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFMETHOD VERIFY-SIGNATURE ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp384r1.lisp ; in: DEFMETHOD VERIFY-SIGNATURE (SECP384R1-PUBLIC-KEY T T) ; (LENGTH IRONCLAD::SIGNATURE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (LENGTH IRONCLAD::MESSAGE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (SUBSEQ IRONCLAD::MESSAGE IRONCLAD::START IRONCLAD::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. ; (* IRONCLAD::E IRONCLAD::W) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::E IRONCLAD::W) IRONCLAD::+SECP384R1-L+) ; ; 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. ; (* IRONCLAD::R IRONCLAD::W) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::R IRONCLAD::W) IRONCLAD::+SECP384R1-L+) ; ; 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. ; (SUBSEQ (IRONCLAD::EC-ENCODE-POINT IRONCLAD::RP) 1 ; (1+ (/ IRONCLAD::+SECP384R1-BITS+ 8))) ; ; 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. ; (MOD IRONCLAD::V IRONCLAD::+SECP384R1-L+) ; ; 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. ; (< IRONCLAD::R IRONCLAD::+SECP384R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (MOD IRONCLAD::V IRONCLAD::+SECP384R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643) ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643) ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643) ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), 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. ; (MOD (* IRONCLAD::R IRONCLAD::W) IRONCLAD::+SECP384R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643) ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643) ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643) ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), 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. ; (MOD (* IRONCLAD::E IRONCLAD::W) IRONCLAD::+SECP384R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643) ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643) ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643) ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), not a RATIONAL. ; (MIN (OR IRONCLAD::END (LENGTH IRONCLAD::MESSAGE)) ; (/ IRONCLAD::+SECP384R1-BITS+ 8)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL 48) (SINGLE-FLOAT 48.0) ; (DOUBLE-FLOAT 48.0d0)), 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. ; (MOD (* IRONCLAD::E IRONCLAD::W) IRONCLAD::+SECP384R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (< IRONCLAD::S IRONCLAD::+SECP384R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (= IRONCLAD::V IRONCLAD::R) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), not a SINGLE-FLOAT. ; The second argument is a (OR ; (RATIONAL * ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643)) ; SINGLE-FLOAT ; (DOUBLE-FLOAT * ; (3.940200619639448d115))), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), not a DOUBLE-FLOAT. ; The second argument is a (OR ; (RATIONAL * ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643)) ; SINGLE-FLOAT ; (DOUBLE-FLOAT * ; (3.940200619639448d115))), not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), not a FLOAT. ; The second argument is a (OR ; (RATIONAL * ; (39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643)) ; SINGLE-FLOAT ; (DOUBLE-FLOAT * ; (3.940200619639448d115))), not a RATIONAL. ; ; note: unable to open code because: The operands might not be the same type. ; (MIN (OR IRONCLAD::END (LENGTH IRONCLAD::MESSAGE)) ; (/ IRONCLAD::+SECP384R1-BITS+ 8)) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::E IRONCLAD::W) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::E IRONCLAD::W) IRONCLAD::+SECP384R1-L+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::R IRONCLAD::W) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::R IRONCLAD::W) IRONCLAD::+SECP384R1-L+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (MOD IRONCLAD::V IRONCLAD::+SECP384R1-L+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (= IRONCLAD::V IRONCLAD::R) ; ; note: forced to do full call ; unable to do #1=inline float comparison (cost 3) because: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; #2=(39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643))), not a SINGLE-FLOAT. ; The second argument is a (OR ; (RATIONAL * ; #3=(39402006196394479212279040100143613805079739270465446667946905279627659399113263569398956308152294913554433653942643)) ; SINGLE-FLOAT ; (DOUBLE-FLOAT * #4=(3.940200619639448d115))), not a SINGLE-FLOAT. ; unable to do #1# (cost 3) because: ; The first argument is a (OR FLOAT (RATIONAL 0 #2#)), not a DOUBLE-FLOAT. ; The second argument is a (OR (RATIONAL * #3#) SINGLE-FLOAT ; (DOUBLE-FLOAT * #4#)), not a DOUBLE-FLOAT. ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/public-key/secp384r1-tmpV4YWE7CS.fasl ; compilation finished in 0:00:00.740 ; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/secp521r1.lisp" (written 18 FEB 2022 01:39:10 AM): ; processing (IN-PACKAGE :CRYPTO) ; processing (DEFCLASS SECP521R1-PUBLIC-KEY ...) ; processing (DEFCLASS SECP521R1-PRIVATE-KEY ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp521r1.lisp ; in: DEFMETHOD EC-POINT-EQUAL (SECP521R1-POINT SECP521R1-POINT) ; (* IRONCLAD::Z1 IRONCLAD::Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z1 IRONCLAD::Z1) IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150), not a FIXNUM. ; (* IRONCLAD::Z2 IRONCLAD::Z2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z2 IRONCLAD::Z2) IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150), not a FIXNUM. ; (* IRONCLAD::X1 IRONCLAD::Z2Z2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (* IRONCLAD::X2 IRONCLAD::Z1Z1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (- (* IRONCLAD::X1 IRONCLAD::Z2Z2) (* IRONCLAD::X2 IRONCLAD::Z1Z1)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (MOD (- (* IRONCLAD::X1 IRONCLAD::Z2Z2) (* IRONCLAD::X2 IRONCLAD::Z1Z1)) ; IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (* IRONCLAD::Y1 IRONCLAD::Z2Z2 IRONCLAD::Z2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (* IRONCLAD::Y2 IRONCLAD::Z1Z1 IRONCLAD::Z1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (- (* IRONCLAD::Y1 IRONCLAD::Z2Z2 IRONCLAD::Z2) ; (* IRONCLAD::Y2 IRONCLAD::Z1Z1 IRONCLAD::Z1)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (MOD ; (- (* IRONCLAD::Y1 IRONCLAD::Z2Z2 IRONCLAD::Z2) ; (* IRONCLAD::Y2 IRONCLAD::Z1Z1 IRONCLAD::Z1)) ; IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; processing (DEFMETHOD EC-DOUBLE ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp521r1.lisp ; in: DEFMETHOD EC-DOUBLE (SECP521R1-POINT) ; (* IRONCLAD::X1 IRONCLAD::X1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::X1 IRONCLAD::X1) IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150), not a FIXNUM. ; (* IRONCLAD::Y1 IRONCLAD::Y1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Y1 IRONCLAD::Y1) IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150), not a FIXNUM. ; (* IRONCLAD::YY IRONCLAD::YY) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::Z1 IRONCLAD::Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z1 IRONCLAD::Z1) IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150), not a FIXNUM. ; (+ IRONCLAD::X1 IRONCLAD::YY) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::X1 IRONCLAD::YY) IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (+ IRONCLAD::Y1 IRONCLAD::Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::Y1 IRONCLAD::Z1) IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150), not a FIXNUM. ; (* IRONCLAD::X1+YY IRONCLAD::X1+YY) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- (* IRONCLAD::X1+YY IRONCLAD::X1+YY) IRONCLAD::XX IRONCLAD::YYYY) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114300 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114300 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 2 (- (* IRONCLAD::X1+YY IRONCLAD::X1+YY) IRONCLAD::XX IRONCLAD::YYYY)) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (INTEGER ; -13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114300 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -27459190640522438859927603196325572869077741200573221637577853836742172733590624208490238562645818219909185245565923432148487951998866575250296113164460228600 ; 94250893829069388263158195986839619953910191433570402840572110390025349132714488958921462158410402245441022265850013080700211570312172862173529993715108609666852792026890997824686731717646966455544335553636300229376908671459619712020946539918752105226262272727429889999778597381617749504296368798753798895532245000) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER ; -13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114300 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -27459190640522438859927603196325572869077741200573221637577853836742172733590624208490238562645818219909185245565923432148487951998866575250296113164460228600 ; 94250893829069388263158195986839619953910191433570402840572110390025349132714488958921462158410402245441022265850013080700211570312172862173529993715108609666852792026890997824686731717646966455544335553636300229376908671459619712020946539918752105226262272727429889999778597381617749504296368798753798895532245000) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; (MOD ; (* 2 (- (* IRONCLAD::X1+YY IRONCLAD::X1+YY) IRONCLAD::XX IRONCLAD::YYYY)) ; IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -27459190640522438859927603196325572869077741200573221637577853836742172733590624208490238562645818219909185245565923432148487951998866575250296113164460228600 ; 94250893829069388263158195986839619953910191433570402840572110390025349132714488958921462158410402245441022265850013080700211570312172862173529993715108609666852792026890997824686731717646966455544335553636300229376908671459619712020946539918752105226262272727429889999778597381617749504296368798753798895532245000), not a FIXNUM. ; (* IRONCLAD::ZZ IRONCLAD::ZZ) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- IRONCLAD::XX (* IRONCLAD::ZZ IRONCLAD::ZZ)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The second argument is a (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 3 (- IRONCLAD::XX (* IRONCLAD::ZZ IRONCLAD::ZZ))) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -141376340743604082394737293980259429930865287150355604260858165585038023699071733438382193237615603368161533398775019621050317355468259293260294990572662914500279188040336496737030097576470449683316503330454450344065363007189429568031419809878128157839393409091144834999667896072426624256444553198130698343298367500 ; 20594392980391829144945702397244179651808305900429916228183390377556629550192968156367678921984363664931888934174442574111365963999149931437722084873345171450) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (INTEGER ; -47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -141376340743604082394737293980259429930865287150355604260858165585038023699071733438382193237615603368161533398775019621050317355468259293260294990572662914500279188040336496737030097576470449683316503330454450344065363007189429568031419809878128157839393409091144834999667896072426624256444553198130698343298367500 ; 20594392980391829144945702397244179651808305900429916228183390377556629550192968156367678921984363664931888934174442574111365963999149931437722084873345171450) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* 3 (- IRONCLAD::XX (* IRONCLAD::ZZ IRONCLAD::ZZ))) ; IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -141376340743604082394737293980259429930865287150355604260858165585038023699071733438382193237615603368161533398775019621050317355468259293260294990572662914500279188040336496737030097576470449683316503330454450344065363007189429568031419809878128157839393409091144834999667896072426624256444553198130698343298367500 ; 20594392980391829144945702397244179651808305900429916228183390377556629550192968156367678921984363664931888934174442574111365963999149931437722084873345171450), not a FIXNUM. ; (* IRONCLAD::M IRONCLAD::M) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 2 IRONCLAD::S) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114301) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114301) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; (- (* IRONCLAD::M IRONCLAD::M) (* 2 IRONCLAD::S)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501), not a FIXNUM. ; The second argument is a (MOD ; 13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114301), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114300 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114301), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114300 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- (* IRONCLAD::M IRONCLAD::M) (* 2 IRONCLAD::S)) ; IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114300 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500), not a FIXNUM. ; (- IRONCLAD::S IRONCLAD::U) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::M (- IRONCLAD::S IRONCLAD::U)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The second argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The second argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 8 IRONCLAD::YYYY) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 54918381281044877719855206392651145738155482401146443275155707673484345467181248416980477125291636439818370491131846864296975903997733150500592226328920457201) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 54918381281044877719855206392651145738155482401146443275155707673484345467181248416980477125291636439818370491131846864296975903997733150500592226328920457201) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; (- (* IRONCLAD::M (- IRONCLAD::S IRONCLAD::U)) (* 8 IRONCLAD::YYYY)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500), not a FIXNUM. ; The second argument is a (MOD ; 54918381281044877719855206392651145738155482401146443275155707673484345467181248416980477125291636439818370491131846864296975903997733150500592226328920457201), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304888344777294490376632198572251474628965927650177964593389844162009214155323191721686939853177904767576182085436131736162987784778749881334899969125776686579700 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER ; -47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 54918381281044877719855206392651145738155482401146443275155707673484345467181248416980477125291636439818370491131846864296975903997733150500592226328920457201), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304888344777294490376632198572251474628965927650177964593389844162009214155323191721686939853177904767576182085436131736162987784778749881334899969125776686579700 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- (* IRONCLAD::M (- IRONCLAD::S IRONCLAD::U)) (* 8 IRONCLAD::YYYY)) ; IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304888344777294490376632198572251474628965927650177964593389844162009214155323191721686939853177904767576182085436131736162987784778749881334899969125776686579700 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500), not a FIXNUM. ; (* IRONCLAD::Y1+Z1 IRONCLAD::Y1+Z1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- (* IRONCLAD::Y1+Z1 IRONCLAD::Y1+Z1) IRONCLAD::YY IRONCLAD::ZZ) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114300 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114300 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- (* IRONCLAD::Y1+Z1 IRONCLAD::Y1+Z1) IRONCLAD::YY IRONCLAD::ZZ) ; IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114300 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500), not a FIXNUM. ; processing (DEFMETHOD EC-ADD ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp521r1.lisp ; in: DEFMETHOD EC-ADD (SECP521R1-POINT SECP521R1-POINT) ; (* IRONCLAD::Z1 IRONCLAD::Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z1 IRONCLAD::Z1) IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150), not a FIXNUM. ; (* IRONCLAD::Z2 IRONCLAD::Z2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z2 IRONCLAD::Z2) IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150), not a FIXNUM. ; (* IRONCLAD::X1 IRONCLAD::Z2Z2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (* IRONCLAD::X1 IRONCLAD::Z2Z2) IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (* IRONCLAD::X2 IRONCLAD::Z1Z1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (* IRONCLAD::X2 IRONCLAD::Z1Z1) IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (* IRONCLAD::Y1 IRONCLAD::Z2 IRONCLAD::Z2Z2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Y1 IRONCLAD::Z2 IRONCLAD::Z2Z2) IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (* IRONCLAD::Y2 IRONCLAD::Z1 IRONCLAD::Z1Z1) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Y2 IRONCLAD::Z1 IRONCLAD::Z1Z1) IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (= IRONCLAD::U1 IRONCLAD::U2) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (UNSIGNED-BYTE ; 64). ; etc. ; (= IRONCLAD::S1 IRONCLAD::S2) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (UNSIGNED-BYTE ; 64). ; etc. ; (- IRONCLAD::U2 IRONCLAD::U1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- IRONCLAD::U2 IRONCLAD::U1) IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150), not a FIXNUM. ; (* 4 IRONCLAD::H IRONCLAD::H) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 27459190640522438859927603196325572869077741200573221637577853836742172733590624208490238562645818219909185245565923432148487951998866575250296113164460228601) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 27459190640522438859927603196325572869077741200573221637577853836742172733590624208490238562645818219909185245565923432148487951998866575250296113164460228601) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 27459190640522438859927603196325572869077741200573221637577853836742172733590624208490238562645818219909185245565923432148487951998866575250296113164460228601), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 188501787658138776526316391973679239907820382867140805681144220780050698265428977917842924316820804490882044531700026161400423140624345724347059987430217219333705584053781995649373463435293932911088671107272600458753817342919239424041893079837504210452524545454859779999557194763235499008592737597507597791064490001) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 27459190640522438859927603196325572869077741200573221637577853836742172733590624208490238562645818219909185245565923432148487951998866575250296113164460228601), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 188501787658138776526316391973679239907820382867140805681144220780050698265428977917842924316820804490882044531700026161400423140624345724347059987430217219333705584053781995649373463435293932911088671107272600458753817342919239424041893079837504210452524545454859779999557194763235499008592737597507597791064490001) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::H IRONCLAD::I) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- IRONCLAD::S2 IRONCLAD::S1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 2 (- IRONCLAD::S2 IRONCLAD::S1)) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114300 ; 13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114300) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114300 ; 13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114300) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; (MOD (* 2 (- IRONCLAD::S2 IRONCLAD::S1)) IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114300 ; 13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114300), not a FIXNUM. ; (* IRONCLAD::U1 IRONCLAD::I) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::R IRONCLAD::R) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- (* IRONCLAD::R IRONCLAD::R) IRONCLAD::J (* 2 IRONCLAD::V)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 2 IRONCLAD::V) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114301) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114301) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; (- (* IRONCLAD::R IRONCLAD::R) IRONCLAD::J (* 2 IRONCLAD::V)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500), not a FIXNUM. ; The second argument is a (MOD ; 13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114301), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -20594392980391829144945702397244179651808305900429916228183390377556629550192968156367678921984363664931888934174442574111365963999149931437722084873345171450 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114301), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -20594392980391829144945702397244179651808305900429916228183390377556629550192968156367678921984363664931888934174442574111365963999149931437722084873345171450 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- (* IRONCLAD::R IRONCLAD::R) IRONCLAD::J (* 2 IRONCLAD::V)) ; IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -20594392980391829144945702397244179651808305900429916228183390377556629550192968156367678921984363664931888934174442574111365963999149931437722084873345171450 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500), not a FIXNUM. ; (- IRONCLAD::V IRONCLAD::X3) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::R (- IRONCLAD::V IRONCLAD::X3)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The second argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The second argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* 2 IRONCLAD::S1 IRONCLAD::J) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114301) ; . #2=(&OPTIONAL)), not a (VALUES FIXNUM . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114301) ; . #2#), not a (VALUES FIXNUM . #2#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114301), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 94250893829069388263158195986839619953910191433570402840572110390025349132714488958921462158410402245441022265850013080700211570312172862173529993715108609666852792026890997824686731717646966455544335553636300229376908671459619712020946539918752105226262272727429889999778597381617749504296368798753798895532245001) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114301), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 94250893829069388263158195986839619953910191433570402840572110390025349132714488958921462158410402245441022265850013080700211570312172862173529993715108609666852792026890997824686731717646966455544335553636300229376908671459619712020946539918752105226262272727429889999778597381617749504296368798753798895532245001) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- (* IRONCLAD::R (- IRONCLAD::V IRONCLAD::X3)) ; (* 2 IRONCLAD::S1 IRONCLAD::J)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500), not a FIXNUM. ; The second argument is a (MOD ; 94250893829069388263158195986839619953910191433570402840572110390025349132714488958921462158410402245441022265850013080700211570312172862173529993715108609666852792026890997824686731717646966455544335553636300229376908671459619712020946539918752105226262272727429889999778597381617749504296368798753798895532245001), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -141376340743604082394737293980259429930865287150355604260858165585038023699071733438382193237615603368161533398775019621050317355468259293260294990572662914500279188040336496737030097576470449683316503330454450344065363007189429568031419809878128157839393409091144834999667896072426624256444553198130698343298367500 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER ; -47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 94250893829069388263158195986839619953910191433570402840572110390025349132714488958921462158410402245441022265850013080700211570312172862173529993715108609666852792026890997824686731717646966455544335553636300229376908671459619712020946539918752105226262272727429889999778597381617749504296368798753798895532245001), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -141376340743604082394737293980259429930865287150355604260858165585038023699071733438382193237615603368161533398775019621050317355468259293260294990572662914500279188040336496737030097576470449683316503330454450344065363007189429568031419809878128157839393409091144834999667896072426624256444553198130698343298367500 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD ; (- (* IRONCLAD::R (- IRONCLAD::V IRONCLAD::X3)) ; (* 2 IRONCLAD::S1 IRONCLAD::J)) ; IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -141376340743604082394737293980259429930865287150355604260858165585038023699071733438382193237615603368161533398775019621050317355468259293260294990572662914500279188040336496737030097576470449683316503330454450344065363007189429568031419809878128157839393409091144834999667896072426624256444553198130698343298367500 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500), not a FIXNUM. ; (+ IRONCLAD::Z1 IRONCLAD::Z2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ IRONCLAD::Z1 IRONCLAD::Z2) IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150), not a FIXNUM. ; (* IRONCLAD::Z1+Z2 IRONCLAD::Z1+Z2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- (* IRONCLAD::Z1+Z2 IRONCLAD::Z1+Z2) IRONCLAD::Z1Z1 IRONCLAD::Z2Z2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114300 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114300 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* (- (* IRONCLAD::Z1+Z2 IRONCLAD::Z1+Z2) IRONCLAD::Z1Z1 IRONCLAD::Z2Z2) ; IRONCLAD::H) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER ; -13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114300 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -94250893829069388263158195986839619953910191433570402840572110390025349132714488958921462158410402245441022265850013080700211570312172862173529993715108609666852792026890997824686731717646966455544335553636300229376908671459619712020946539918752105226262272727429889999778597381617749504296368798753798895532245000 ; 323506657711507029453181996836191423905396619463411038446198094561650090834658129016932671774513214895603258054623797825080015583482483484232107124273991285595557946679886497826749103320711322052528368706114976541287213729802118735079263806492268073748703604020759669694249097481800780470115074570825703566287612472605957916899534347533818426664998835338294071500789521188679927290659570626952894517682587436359707625191202872228989641967995942405768892668191421400875000) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (INTEGER ; -13729595320261219429963801598162786434538870600286610818788926918371086366795312104245119281322909109954592622782961716074243975999433287625148056582230114300 ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122500), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -94250893829069388263158195986839619953910191433570402840572110390025349132714488958921462158410402245441022265850013080700211570312172862173529993715108609666852792026890997824686731717646966455544335553636300229376908671459619712020946539918752105226262272727429889999778597381617749504296368798753798895532245000 ; 323506657711507029453181996836191423905396619463411038446198094561650090834658129016932671774513214895603258054623797825080015583482483484232107124273991285595557946679886497826749103320711322052528368706114976541287213729802118735079263806492268073748703604020759669694249097481800780470115074570825703566287612472605957916899534347533818426664998835338294071500789521188679927290659570626952894517682587436359707625191202872228989641967995942405768892668191421400875000) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD ; (* (- (* IRONCLAD::Z1+Z2 IRONCLAD::Z1+Z2) IRONCLAD::Z1Z1 IRONCLAD::Z2Z2) ; IRONCLAD::H) ; IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -94250893829069388263158195986839619953910191433570402840572110390025349132714488958921462158410402245441022265850013080700211570312172862173529993715108609666852792026890997824686731717646966455544335553636300229376908671459619712020946539918752105226262272727429889999778597381617749504296368798753798895532245000 ; 323506657711507029453181996836191423905396619463411038446198094561650090834658129016932671774513214895603258054623797825080015583482483484232107124273991285595557946679886497826749103320711322052528368706114976541287213729802118735079263806492268073748703604020759669694249097481800780470115074570825703566287612472605957916899534347533818426664998835338294071500789521188679927290659570626952894517682587436359707625191202872228989641967995942405768892668191421400875000), not a FIXNUM. ; processing (DEFMETHOD EC-SCALAR-MULT ...) ; processing (DEFMETHOD EC-POINT-ON-CURVE-P ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp521r1.lisp ; in: DEFMETHOD EC-POINT-ON-CURVE-P (SECP521R1-POINT) ; (* IRONCLAD::Y IRONCLAD::Y) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Y IRONCLAD::Y) IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150), not a FIXNUM. ; (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150), not a FIXNUM. ; (* IRONCLAD::Z IRONCLAD::Z) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (MOD (* IRONCLAD::Z IRONCLAD::Z) IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150), not a FIXNUM. ; (* IRONCLAD::Z2 IRONCLAD::Z2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* IRONCLAD::Z4 IRONCLAD::Z2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (MOD ; 47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304833426396013445498912343365858823483227772167776818150114688454335729809856010473269959376052613131136363714944999889298690808874752148184399376899447766122501) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (* -3 IRONCLAD::X IRONCLAD::Z4) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (+ IRONCLAD::X3 (* -3 IRONCLAD::X IRONCLAD::Z4) ; (* IRONCLAD::+SECP521R1-B+ IRONCLAD::Z6)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (UNSIGNED-BYTE ; 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (MOD ; 7509052317104689266221718773197879358824997841303921778022934628560891681178716185992316901383281939388722899667008339423247323322262598318844851232229404578616146770570011358819916291506176207588497241970009430275979183224789671278182396703835216413712162605475020184622768221244312921726542116999523306208985601), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a (MOD ; 7509052317104689266221718773197879358824997841303921778022934628560891681178716185992316901383281939388722899667008339423247323322262598318844851232229404578616146770570011358819916291506176207588497241970009430275979183224789671278182396703835216413712162605475020184622768221244312921726542116999523306208985601), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD ; (+ IRONCLAD::X3 (* -3 IRONCLAD::X IRONCLAD::Z4) ; (* IRONCLAD::+SECP521R1-B+ IRONCLAD::Z6)) ; IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150), not a FIXNUM. ; (- IRONCLAD::Y2 IRONCLAD::A) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a FIXNUM. ; The result is a (VALUES ; (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The second argument is a (MOD ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (- IRONCLAD::Y2 IRONCLAD::A) IRONCLAD::+SECP521R1-P+) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER ; -6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150 ; 6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057150), not a FIXNUM. ; processing (DEFMETHOD EC-ENCODE-SCALAR ...) ; processing (DEFMETHOD EC-DECODE-SCALAR ...) ; processing (DEFMETHOD EC-ENCODE-POINT ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp521r1.lisp ; in: DEFMETHOD EC-ENCODE-POINT (SECP521R1-POINT) ; (* IRONCLAD::INVZ IRONCLAD::INVZ) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::INVZ IRONCLAD::INVZ) IRONCLAD::+SECP521R1-P+) ; ; 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. ; (* IRONCLAD::INVZ2 IRONCLAD::INVZ) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151))), not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151))), not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151))), not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151))), not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151))), not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151))), not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::INVZ2 IRONCLAD::INVZ) IRONCLAD::+SECP521R1-P+) ; ; 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. ; (* IRONCLAD::X IRONCLAD::INVZ2) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151))), not a FLOAT. ; (MOD (* IRONCLAD::X IRONCLAD::INVZ2) IRONCLAD::+SECP521R1-P+) ; ; 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. ; (* IRONCLAD::Y IRONCLAD::INVZ3) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151))), not a FLOAT. ; (MOD (* IRONCLAD::Y IRONCLAD::INVZ3) IRONCLAD::+SECP521R1-P+) ; ; 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 ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151))), 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. ; (MOD (* IRONCLAD::X IRONCLAD::INVZ2) IRONCLAD::+SECP521R1-P+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151))), 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. ; (MOD (* IRONCLAD::INVZ2 IRONCLAD::INVZ) IRONCLAD::+SECP521R1-P+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151))), 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. ; (MOD (* IRONCLAD::INVZ IRONCLAD::INVZ) IRONCLAD::+SECP521R1-P+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151))), 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. ; (* IRONCLAD::INVZ IRONCLAD::INVZ) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::INVZ IRONCLAD::INVZ) IRONCLAD::+SECP521R1-P+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::INVZ2 IRONCLAD::INVZ) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; #1=(6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151))), not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (OR FLOAT (RATIONAL 0 #1#)), not a (SIGNED-BYTE ; 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #2#), not a (VALUES (SIGNED-BYTE 64) . #2#). ; etc. ; (MOD (* IRONCLAD::INVZ2 IRONCLAD::INVZ) IRONCLAD::+SECP521R1-P+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::X IRONCLAD::INVZ2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; #1=(6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151))), not a FIXNUM. ; The result is a (VALUES REAL . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (OR FLOAT (RATIONAL 0 #1#)), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES REAL . #2#), not a (VALUES (SIGNED-BYTE 64) . #2#). ; etc. ; (MOD (* IRONCLAD::X IRONCLAD::INVZ2) IRONCLAD::+SECP521R1-P+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::Y IRONCLAD::INVZ3) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; #1=(6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151))), not a FIXNUM. ; The result is a (VALUES REAL . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 64). ; The second argument is a (OR FLOAT (RATIONAL 0 #1#)), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES REAL . #2#), not a (VALUES (SIGNED-BYTE 64) . #2#). ; etc. ; (MOD (* IRONCLAD::Y IRONCLAD::INVZ3) IRONCLAD::+SECP521R1-P+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFMETHOD EC-DECODE-POINT ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp521r1.lisp ; in: DEFMETHOD EC-DECODE-POINT ((EQL :SECP521R1) T) ; (AREF IRONCLAD::OCTETS 0) ; ; 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. ; (- (AREF IRONCLAD::OCTETS 0) 2) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (* -3 IRONCLAD::X) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate */(* /) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (+ (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) (* -3 IRONCLAD::X) ; IRONCLAD::+SECP521R1-B+) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (MOD ; (+ (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) (* -3 IRONCLAD::X) ; IRONCLAD::+SECP521R1-B+) ; IRONCLAD::+SECP521R1-P+) ; ; 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. ; (= (LOGAND IRONCLAD::Y 1) IRONCLAD::Y-SIGN) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (MOD ; (+ (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) (* -3 IRONCLAD::X) ; IRONCLAD::+SECP521R1-B+) ; IRONCLAD::+SECP521R1-P+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397656052122559640661454554977296311391480858037121987999716643812574028291115057151))), 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. ; (- (AREF IRONCLAD::OCTETS 0) 2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (* -3 IRONCLAD::X) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; (+ (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) (* -3 IRONCLAD::X) ; IRONCLAD::+SECP521R1-B+) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (MOD ; (+ (* IRONCLAD::X IRONCLAD::X IRONCLAD::X) (* -3 IRONCLAD::X) ; IRONCLAD::+SECP521R1-B+) ; IRONCLAD::+SECP521R1-P+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFUN SECP521R1-PUBLIC-KEY ...) ; processing (DEFMETHOD MAKE-SIGNATURE ...) ; processing (DEFMETHOD DESTRUCTURE-SIGNATURE ...) ; processing (DEFMETHOD GENERATE-SIGNATURE-NONCE ...) ; processing (DEFMETHOD SIGN-MESSAGE ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp521r1.lisp ; in: DEFMETHOD SIGN-MESSAGE (SECP521R1-PRIVATE-KEY T) ; (LENGTH IRONCLAD::MESSAGE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (SUBSEQ (IRONCLAD::EC-ENCODE-POINT IRONCLAD::R) 1 ; (1+ (CEILING IRONCLAD::+SECP521R1-BITS+ 8))) ; ; 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. ; (MOD IRONCLAD::R IRONCLAD::+SECP521R1-L+) ; ; 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. ; (SUBSEQ IRONCLAD::MESSAGE IRONCLAD::START IRONCLAD::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. ; (* IRONCLAD::SK IRONCLAD::R) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (* IRONCLAD::INVK (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R))) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::INVK (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R))) ; IRONCLAD::+SECP521R1-L+) ; ; 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. ; (ZEROP IRONCLAD::R) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (MOD (* IRONCLAD::INVK (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R))) ; IRONCLAD::+SECP521R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), 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. ; (MOD IRONCLAD::R IRONCLAD::+SECP521R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), not a RATIONAL. ; (MIN (OR IRONCLAD::END (LENGTH IRONCLAD::MESSAGE)) ; (CEILING IRONCLAD::+SECP521R1-BITS+ 8)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL 66) (SINGLE-FLOAT 66.0) ; (DOUBLE-FLOAT 66.0d0)), 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. ; (MOD IRONCLAD::R IRONCLAD::+SECP521R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (ZEROP IRONCLAD::S) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (MIN (OR IRONCLAD::END (LENGTH IRONCLAD::MESSAGE)) ; (CEILING IRONCLAD::+SECP521R1-BITS+ 8)) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (MOD IRONCLAD::R IRONCLAD::+SECP521R1-L+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::SK IRONCLAD::R) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a (OR FLOAT ; (RATIONAL 0 ; #1=(6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), not a FIXNUM. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a (OR FLOAT (RATIONAL 0 #1#)), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES NUMBER . #2#), not a (VALUES (SIGNED-BYTE 64) ; . #2#). ; etc. ; (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (* IRONCLAD::INVK (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R))) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::INVK (+ IRONCLAD::E (* IRONCLAD::SK IRONCLAD::R))) ; IRONCLAD::+SECP521R1-L+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFMETHOD VERIFY-SIGNATURE ...) ; file: /usr/share/common-lisp/source/ironclad/src/public-key/secp521r1.lisp ; in: DEFMETHOD VERIFY-SIGNATURE (SECP521R1-PUBLIC-KEY T T) ; (LENGTH IRONCLAD::SIGNATURE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (LENGTH IRONCLAD::MESSAGE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (SUBSEQ IRONCLAD::MESSAGE IRONCLAD::START IRONCLAD::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. ; (* IRONCLAD::E IRONCLAD::W) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::E IRONCLAD::W) IRONCLAD::+SECP521R1-L+) ; ; 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. ; (* IRONCLAD::R IRONCLAD::W) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MOD (* IRONCLAD::R IRONCLAD::W) IRONCLAD::+SECP521R1-L+) ; ; 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. ; (SUBSEQ (IRONCLAD::EC-ENCODE-POINT IRONCLAD::RP) 1 ; (1+ (CEILING IRONCLAD::+SECP521R1-BITS+ 8))) ; ; 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. ; (MOD IRONCLAD::V IRONCLAD::+SECP521R1-L+) ; ; 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. ; (< IRONCLAD::R IRONCLAD::+SECP521R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (MOD IRONCLAD::V IRONCLAD::+SECP521R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), 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. ; (MOD (* IRONCLAD::R IRONCLAD::W) IRONCLAD::+SECP521R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), not a RATIONAL. ; (MIN (OR IRONCLAD::END (LENGTH IRONCLAD::MESSAGE)) ; (CEILING IRONCLAD::+SECP521R1-BITS+ 8)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL 66) (SINGLE-FLOAT 66.0) ; (DOUBLE-FLOAT 66.0d0)), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (MOD (* IRONCLAD::R IRONCLAD::W) IRONCLAD::+SECP521R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (MOD (* IRONCLAD::E IRONCLAD::W) IRONCLAD::+SECP521R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL ; (-6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449) ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), not a RATIONAL. ; (MIN (OR IRONCLAD::END (LENGTH IRONCLAD::MESSAGE)) ; (CEILING IRONCLAD::+SECP521R1-BITS+ 8)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (MOD (* IRONCLAD::E IRONCLAD::W) IRONCLAD::+SECP521R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (< IRONCLAD::S IRONCLAD::+SECP521R1-L+) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (= IRONCLAD::V IRONCLAD::R) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), not a SINGLE-FLOAT. ; The second argument is a (OR ; (RATIONAL * ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449)) ; SINGLE-FLOAT ; (DOUBLE-FLOAT * ; (6.86479766013061d156))), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), not a DOUBLE-FLOAT. ; The second argument is a (OR ; (RATIONAL * ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449)) ; SINGLE-FLOAT ; (DOUBLE-FLOAT * ; (6.86479766013061d156))), not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), not a FLOAT. ; The second argument is a (OR ; (RATIONAL * ; (6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449)) ; SINGLE-FLOAT ; (DOUBLE-FLOAT * ; (6.86479766013061d156))), not a RATIONAL. ; ; note: unable to open code because: The operands might not be the same type. ; (MIN (OR IRONCLAD::END (LENGTH IRONCLAD::MESSAGE)) ; (CEILING IRONCLAD::+SECP521R1-BITS+ 8)) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::E IRONCLAD::W) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::E IRONCLAD::W) IRONCLAD::+SECP521R1-L+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (* IRONCLAD::R IRONCLAD::W) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 64). ; The second argument is a NUMBER, not a (SIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MOD (* IRONCLAD::R IRONCLAD::W) IRONCLAD::+SECP521R1-L+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (MOD IRONCLAD::V IRONCLAD::+SECP521R1-L+) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (= IRONCLAD::V IRONCLAD::R) ; ; note: forced to do full call ; unable to do #1=inline float comparison (cost 3) because: ; The first argument is a (OR FLOAT ; (RATIONAL 0 ; #2=(6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449))), not a SINGLE-FLOAT. ; The second argument is a (OR ; (RATIONAL * ; #3=(6864797660130609714981900799081393217269435300143305409394463459185543183397655394245057746333217197532963996371363321113864768612440380340372808892707005449)) ; SINGLE-FLOAT ; (DOUBLE-FLOAT * #4=(6.86479766013061d156))), not a SINGLE-FLOAT. ; unable to do #1# (cost 3) because: ; The first argument is a (OR FLOAT (RATIONAL 0 #2#)), not a DOUBLE-FLOAT. ; The second argument is a (OR (RATIONAL * #3#) SINGLE-FLOAT ; (DOUBLE-FLOAT * #4#)), not a DOUBLE-FLOAT. ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ironclad/src/public-key/secp521r1-tmpC487WU3K.fasl ; compilation finished in 0:00:00.440 ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-base64/package-tmpKMQH3GP.fasl ; compilation finished in 0:00:00.044 ; 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 FLOAT ; (RATIONAL (-4611686018427387904) ; (4611686018427387904))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL (-4611686018427387904) ; (4611686018427387904))), 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 in mixed 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 full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT ; (RATIONAL #1=(-4611686018427387904) ; #2=(4611686018427387904))), not a FIXNUM. ; The result is a (VALUES ; (OR FLOAT ; (RATIONAL #3=(-9223372036854775808) ; #4=(9223372036854775807))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (OR (INTEGER -4611686018427387904 -1) ; (INTEGER 1 4611686018427387903)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (RATIONAL #1=(-9223372036854775808) ; #2=(9223372036854775807)), not a FIXNUM. ; unable to do inline (signed-byte 64) comparison (cost 6) because: ; The first argument is a (RATIONAL #1# #2#), not a (SIGNED-BYTE 64). ; ; note: forced to do full call ; unable to do inline (unsigned-byte 64) comparison (cost 6) 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 6) 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 full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; 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) ; --> 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 ; ==> ; 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. ; --> 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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> 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 ; --> + ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; 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) ; --> 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 ; ==> ; 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. ; --> 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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> 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 ; --> + ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; 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) ; --> 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 ; ==> ; 1 ; ; 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. ; --> 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 ; ==> ; 1 ; ; 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 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 ; --> + ; ==> ; 1 ; ; 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) ; --> 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 ; ==> ; 1 ; ; 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. ; --> 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 ; ==> ; 1 ; ; 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 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 ; --> + ; ==> ; 1 ; ; 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 FLOAT (RATIONAL 0 (24))), 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 FLOAT (RATIONAL (-24) (24))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-24) (24))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-24) (24))), 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 in mixed numeric operation ; due to type uncertainty: ; The second argument is a (OR FLOAT (RATIONAL 0 (24))), not a FLOAT. ; (/ CL-BASE64::PADDING-BITS 6) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR 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 FLOAT (RATIONAL 0 24)), not a INTEGER. ; (+ CL-BASE64::PADDED-BITS CL-BASE64::PADDING-BITS) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a RATIONAL. ; The second argument is a (OR FLOAT (RATIONAL 0 24)), not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a (OR FLOAT (RATIONAL 0 24)), not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a (OR FLOAT (RATIONAL 0 24)), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a (OR FLOAT (RATIONAL 0 24)), not a SINGLE-FLOAT. ; (/ (+ CL-BASE64::PADDED-BITS CL-BASE64::PADDING-BITS) 6) ; ; note: unable to ; open-code float conversion in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR 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 FLOAT (RATIONAL 0 24)), not a INTEGER. ; (MOD CL-BASE64::PADDED-BITS 24) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL #1=(-24) #2=(24))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #3=(0) #4=(48))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (RATIONAL #1=(-24) #2=(48)), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (RATIONAL #1# #2#), not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (RATIONAL 0 #1=(48)), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (RATIONAL 0 #1#), not a (UNSIGNED-BYTE 64). ; etc. ; (- 24 CL-BASE64::REMAINDER-PADDING) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a (OR FLOAT (RATIONAL 0 #1=(24))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #2=(0) 24)) . #3=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #3#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The second argument is a (OR FLOAT (RATIONAL 0 #1#)), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #2# 24)) . #3#), not a (VALUES ; (SIGNED-BYTE ; 64) ; . #3#). ; etc. ; (+ CL-BASE64::PADDED-BITS CL-BASE64::PADDING-BITS) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a (OR FLOAT (RATIONAL 0 24)), not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a (OR FLOAT (RATIONAL 0 24)), not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (* CL-BASE64::COLUMNS (TRUNCATE CL-BASE64::PADDED-LENGTH CL-BASE64::COLUMNS)) ; ; note: forced to do */SIGNED=>INTEGER (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653957237540927630737409) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The result is a (VALUES ; (INTEGER -21267647932558653961849226946058125312 ; 21267647932558653957237540927630737409) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- CL-BASE64::PADDED-LENGTH ; (* CL-BASE64::COLUMNS ; (TRUNCATE CL-BASE64::PADDED-LENGTH CL-BASE64::COLUMNS))) ; ; note: forced to do full call ; 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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) . #1#). ; etc. ; (ASH CL-BASE64::INPUT (/ CL-BASE64::PADDING-BITS 3)) ; ; 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 second argument is a (OR FLOAT (RATIONAL 0 8)), not a (UNSIGNED-BYTE ; 62). ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; unable to do #1# (cost 3) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a (OR FLOAT (RATIONAL 0 8)), not a (UNSIGNED-BYTE ; 62). ; The result is a (VALUES INTEGER . #2#), not a (VALUES (UNSIGNED-BYTE 64) ; . #2#). ; etc. ; (ASH CL-BASE64::INT -6) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; 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) ; . #2#). ; 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 FLOAT (RATIONAL 0 (24))), 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 FLOAT (RATIONAL (-24) (24))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-24) (24))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-24) (24))), 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 in mixed numeric operation ; due to type uncertainty: ; The second argument is a (OR FLOAT (RATIONAL 0 (24))), not a FLOAT. ; (/ CL-BASE64::PADDING-BITS 6) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR 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 FLOAT (RATIONAL 0 24)), not a INTEGER. ; (+ CL-BASE64::PADDED-BITS CL-BASE64::PADDING-BITS) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a RATIONAL. ; The second argument is a (OR FLOAT (RATIONAL 0 24)), not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a (OR FLOAT (RATIONAL 0 24)), not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a (OR FLOAT (RATIONAL 0 24)), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a (OR FLOAT (RATIONAL 0 24)), not a SINGLE-FLOAT. ; (/ (+ CL-BASE64::PADDED-BITS CL-BASE64::PADDING-BITS) 6) ; ; note: unable to ; open-code float conversion in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The second argument is a (OR FLOAT (RATIONAL 0 4)), not a FLOAT. ; (1- CL-BASE64::NONPAD-CHARS) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL -4611686018427387908 ; 4611686018427387903)), not a FLOAT. ; (/ CL-BASE64::PADDING-BITS 3) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR 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 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. ; (MOD CL-BASE64::PADDED-BITS 24) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL #1=(-24) #2=(24))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #3=(0) #4=(48))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (RATIONAL #1=(-24) #2=(48)), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (RATIONAL #1# #2#), not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (RATIONAL 0 #1=(48)), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (RATIONAL 0 #1#), not a (UNSIGNED-BYTE 64). ; etc. ; (- 24 CL-BASE64::REMAINDER-PADDING) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a (OR FLOAT (RATIONAL 0 #1=(24))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #2=(0) 24)) . #3=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #3#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The second argument is a (OR FLOAT (RATIONAL 0 #1#)), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #2# 24)) . #3#), not a (VALUES ; (SIGNED-BYTE ; 64) ; . #3#). ; etc. ; (+ CL-BASE64::PADDED-BITS CL-BASE64::PADDING-BITS) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a (OR FLOAT (RATIONAL 0 24)), not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a (OR FLOAT (RATIONAL 0 24)), not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (- CL-BASE64::STRLEN CL-BASE64::PADDING-CHARS) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a (OR FLOAT (RATIONAL 0 4)), not a FIXNUM. ; The result is a (VALUES ; (OR FLOAT ; (RATIONAL -4611686018427387908 4611686018427387903)) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The second argument is a (OR FLOAT (RATIONAL 0 4)), not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR FLOAT ; (RATIONAL -4611686018427387908 4611686018427387903)) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (1- CL-BASE64::NONPAD-CHARS) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT ; (RATIONAL -4611686018427387908 ; 4611686018427387903)), not a FIXNUM. ; The result is a (VALUES ; (OR FLOAT ; (RATIONAL -4611686018427387909 4611686018427387902)) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT ; (RATIONAL -4611686018427387908 ; 4611686018427387903)), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (OR FLOAT ; (RATIONAL -4611686018427387909 4611686018427387902)) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (ASH CL-BASE64::INPUT (/ CL-BASE64::PADDING-BITS 3)) ; ; 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 second argument is a (OR FLOAT (RATIONAL 0 8)), not a (UNSIGNED-BYTE ; 62). ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; unable to do #1# (cost 3) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a (OR FLOAT (RATIONAL 0 8)), not a (UNSIGNED-BYTE ; 62). ; The result is a (VALUES INTEGER . #2#), not a (VALUES (UNSIGNED-BYTE 64) ; . #2#). ; etc. ; (ASH CL-BASE64::INT -6) ; ; note: forced to do full call ; unable to do #1=inline ASH (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER . #2=(&OPTIONAL)), not a (VALUES FIXNUM ; . #2#). ; 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) ; . #2#). ; etc. ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-base64/encode-tmp8N0WO2QA.fasl ; compilation finished in 0:00:00.444 ; 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) ; --> 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 ; ==> ; 1 ; ; 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) ; --> 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 ; ==> ; 1 ; ; 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) ; --> 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 ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; --> 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 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 ; . #2#). ; 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 . #2#). ; etc. ; --> 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 ; . #1#). ; 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) ; . #1#). ; etc. ; --> 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 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 ; . #2#). ; 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 . #2#). ; etc. ; --> 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 ; . #1#). ; 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) ; . #1#). ; etc. ; --> 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 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 ; . #2#). ; 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 . #2#). ; etc. ; --> 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 ; . #1#). ; 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) ; . #1#). ; 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) ; --> 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 ; ==> ; 1 ; ; 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) ; --> 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 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 ; . #2#). ; 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 . #2#). ; etc. ; --> 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 ; . #1#). ; 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) ; . #1#). ; etc. ; processing (DEFINE-BASE64-DECODER :STREAM ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-base64/decode-tmpZ9QI367A.fasl ; compilation finished in 0:00:00.580 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/packages.lisp" (written 26 JAN 2022 06:40:10 AM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE :CL-PPCRE ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-ppcre/packages-tmpRD10QMAI.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/specials.lisp" (written 26 JAN 2022 06:40:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-ppcre/specials-tmp2L2R3A8M.fasl ; compilation finished in 0:00:00.012 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/util.lisp" (written 26 JAN 2022 06:40:10 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 * (*)). ; ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-ppcre/util-tmp1CJ2OZ96.fasl ; compilation finished in 0:00:00.032 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/errors.lisp" (written 26 JAN 2022 06:40:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-ppcre/errors-tmpDKS9KGUG.fasl ; compilation finished in 0:00:00.012 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/charset.lisp" (written 26 JAN 2022 06:40:10 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do full call ; 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 ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL (-4611686018427387899) ; (4611686018427387899))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL (-4611686018427387899) ; (4611686018427387899))), not a RATIONAL. ; (MOD CL-PPCRE::HASH (1- (LENGTH VECTOR))) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL (-4611686018427387899) ; (4611686018427387899))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL (-4611686018427387899) ; (4611686018427387899))), not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT ; (RATIONAL #1=(-4611686018427387899) ; #2=(4611686018427387899))), not a FIXNUM. ; The result is a (VALUES ; (OR FLOAT ; (RATIONAL #3=(-4611686018427387900) ; #4=(9223372036854775798))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (OR (INTEGER -1 -1) ; (INTEGER 1 4611686018427387899)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (RATIONAL #1=(-4611686018427387900) ; #2=(9223372036854775798)), not a FIXNUM. ; unable to do inline (signed-byte 64) comparison (cost 6) because: ; The first argument is a (RATIONAL #1# #2#), not a (SIGNED-BYTE 64). ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (RATIONAL #1=(-4611686018427387899) ; #2=(9223372036854775798)), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (RATIONAL #1# #2#), not a (UNSIGNED-BYTE 64). ; etc. ; (1+ (MOD CL-PPCRE::HASH (1- (LENGTH VECTOR)))) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT ; (RATIONAL #1=(-4611686018427387899) ; #2=(4611686018427387899))), not a FIXNUM. ; The result is a (VALUES ; (OR FLOAT ; (RATIONAL #3=(-4611686018427387898) ; #4=(4611686018427387900))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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. ; (>= 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 (RATIONAL * 371370) (SINGLE-FLOAT * 371370.0) ; (DOUBLE-FLOAT * 371370.0d0)), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (TAGBODY ; :RETRY ; (MULTIPLE-VALUE-BIND (CL-PPCRE::NEW-DEPTH CL-PPCRE::NEW-VECTOR) ; (IF (>= CL-PPCRE::NEW-SIZE 371370) ; (VALUES 0 (CL-PPCRE::MAKE-CHAR-VECTOR CHAR-CODE-LIMIT)) ; (VALUES CL-PPCRE::+PROBE-DEPTH+ ; (CL-PPCRE::MAKE-CHAR-VECTOR CL-PPCRE::NEW-SIZE))) ; (SETF (CL-PPCRE::CHARSET-DEPTH SET) CL-PPCRE::NEW-DEPTH ; (CL-PPCRE::CHARSET-VECTOR SET) CL-PPCRE::NEW-VECTOR) ; (FLET ((CL-PPCRE::TRY-ADD # ; #)) ; (CL-PPCRE::TRY-ADD CHAR) ; (DOTIMES (CL-PPCRE::I #) ; (LET # ; #))))) ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (GO :RETRY). Use GO/RETURN-FROM with SAFETY 0, or declare the exit function ; DYNAMIC-EXTENT to avoid. ; (* 2 CL-PPCRE::NEW-SIZE) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (>= CL-PPCRE::NEW-SIZE 371370) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; 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: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER * 4611686018427387903), not a FIXNUM. ; The result is a (VALUES (INTEGER * 4611686018427387902) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER * 4611686018427387903), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES (INTEGER * 4611686018427387902) . #1#), not a (VALUES ; (SIGNED-BYTE ; 64) ; . #1#). ; 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 ...) ; --> LET LET LET TAGBODY WHEN IF >= ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: forced to do full call ; 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 full call ; 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. ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-ppcre/charset-tmp3E37X9HX.fasl ; compilation finished in 0:00:00.052 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/charmap.lisp" (written 26 JAN 2022 06:40:10 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (LOOP CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM (1- ; CL-PPCRE::END) CL-PPCRE::DOWNTO CL-PPCRE::START ; CL-PPCRE::FOR CHAR = (CODE-CHAR CL-PPCRE::CODE) ; CL-PPCRE::UNTIL ...) ; --> LET LET TAGBODY WHEN IF ; ==> ; (< CL-PPCRE::CODE #:LOOP-LIMIT-21) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; (FUNCALL CL-PPCRE::TEST-FUNCTION CHAR) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; (LOOP CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM CL-PPCRE::START CL-PPCRE::BELOW ; CL-PPCRE::END ; CL-PPCRE::FOR CHAR = (CODE-CHAR CL-PPCRE::CODE) ; CL-PPCRE::UNTIL ...) ; --> LET LET TAGBODY WHEN IF >= ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: forced to do full call ; 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 full call ; 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. ; (1- CL-PPCRE::END) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) . #1#). ; etc. ; (LOOP CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM (1- ; CL-PPCRE::END) CL-PPCRE::DOWNTO CL-PPCRE::START ; CL-PPCRE::FOR CHAR = (CODE-CHAR CL-PPCRE::CODE) ; CL-PPCRE::UNTIL ...) ; --> LET LET TAGBODY WHEN IF ; ==> ; (< CL-PPCRE::CODE #:LOOP-LIMIT-21) ; ; note: forced to do full call ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-ppcre/charmap-tmpXPWOLC8S.fasl ; compilation finished in 0:00:00.092 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/chartest.lisp" (written 26 JAN 2022 06:40:10 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 ...) ; --> LET LET LET TAGBODY WHEN IF >= ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: forced to do full call ; 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 full call ; 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. ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (CEILING (- CL-PPCRE::END CL-PPCRE::START) 2) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; convert division by 2^k to shift ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; convert integer division to multiplication ; due to type uncertainty: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; ; note: unable to ; convert integer division to multiplication ; due to type uncertainty: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-2) (2))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (CEILING (- CL-PPCRE::END CL-PPCRE::START) 2) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; convert division by 2^k to shift ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; convert integer division to multiplication ; due to type uncertainty: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; ; note: unable to ; convert integer division to multiplication ; due to type uncertainty: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-2) (2))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: forced to do full call ; 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 ; . #2#). ; 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 . #2#). ; etc. ; (CEILING (- CL-PPCRE::END CL-PPCRE::START) 2) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (<= (HASH-TABLE-COUNT HASH-TABLE) ; (CEILING (- CL-PPCRE::END CL-PPCRE::START) 2)) ; ; note: forced to do >-FIXNUM-INTEGER (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 full call ; 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 ; . #2#). ; 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 . #2#). ; etc. ; (CEILING (- CL-PPCRE::END CL-PPCRE::START) 2) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (<= (CL-PPCRE::CHARSET-COUNT CL-PPCRE::CHARSET) ; (CEILING (- CL-PPCRE::END CL-PPCRE::START) 2)) ; ; note: forced to do >-FIXNUM-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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-ppcre/chartest-tmpUSWNVC8E.fasl ; compilation finished in 0:00:00.032 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/lexer.lisp" (written 26 JAN 2022 06:40:10 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::SIGNAL-SYNTAX-ERROR* CL-PPCRE::ERROR-POS ; "Comment group not closed.") ; ; note: doing signed word to integer coercion (cost 20) ; 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 ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-ppcre/lexer-tmp68FKQK8H.fasl ; compilation finished in 0:00:00.280 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/parser.lisp" (written 26 JAN 2022 06:40:10 AM): ; processing (IN-PACKAGE :CL-PPCRE) ; processing (DEFUN GROUP ...) ; file: /usr/share/common-lisp/source/cl-ppcre/parser.lisp ; in: DEFUN GROUP ; (CL-PPCRE::SIGNAL-SYNTAX-ERROR* (+ CL-PPCRE::OPEN-PAREN-POS 2) ; "Opening paren has no matching closing paren.") ; ; note: doing signed word to integer coercion (cost 20) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-ppcre/parser-tmpMU3D23G2.fasl ; compilation finished in 0:00:00.040 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/regex-class.lisp" (written 26 JAN 2022 06:40:10 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 LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER . #1=((*)))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * . #1#). ; (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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-ppcre/regex-class-tmpP7RRFRW4.fasl ; compilation finished in 0:00:00.035 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/regex-class-util.lisp" (written 26 JAN 2022 06:40:10 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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; 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 LIST (SIMPLE-ARRAY * (*)) ; 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) ; (LENGTH 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) ; (= 1 CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a 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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX ; (DOUBLE-FLOAT 1.0d0 1.0d0))), not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX ; (DOUBLE-FLOAT 1.0d0 1.0d0))), not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX ; (DOUBLE-FLOAT 1.0d0 1.0d0))), not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX ; (DOUBLE-FLOAT 1.0d0 1.0d0))), not a (COMPLEX ; DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX ; (DOUBLE-FLOAT 1.0d0 1.0d0))), 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 (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX (DOUBLE-FLOAT 1.0d0 1.0d0))), not a (OR ; (COMPLEX ; SINGLE-FLOAT) ; (COMPLEX ; DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX ; (DOUBLE-FLOAT 1.0d0 1.0d0))), not a (COMPLEX ; SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX ; (DOUBLE-FLOAT 1.0d0 1.0d0))), not a (COMPLEX ; SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX (DOUBLE-FLOAT 1.0d0 1.0d0))), not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX ; (DOUBLE-FLOAT 1.0d0 1.0d0))), not a (COMPLEX ; DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX ; (DOUBLE-FLOAT 1.0d0 1.0d0))), not a (COMPLEX ; DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX (DOUBLE-FLOAT 1.0d0 1.0d0))), not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; ; note: forced to do full call ; unable to do #1=inline float comparison (cost 3) because: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX (DOUBLE-FLOAT 1.0d0 1.0d0))), not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; unable to do #1# (cost 3) because: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX (DOUBLE-FLOAT 1.0d0 1.0d0))), not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; 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 ...) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-5 CL-PPCRE::LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a (NOT NULL), not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; ; note: forced to do full call ; unable to do #1=inline float comparison (cost 3) because: ; The first argument is a (NOT NULL), not a SINGLE-FLOAT. ; The second argument is a (NOT NULL), not a SINGLE-FLOAT. ; unable to do #1# (cost 3) because: ; The first argument is a (NOT NULL), not a DOUBLE-FLOAT. ; The second argument is a (NOT NULL), not a DOUBLE-FLOAT. ; 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: unable to ; optimize ; due to type uncertainty: ; The first argument is a (NOT NULL), not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (NOT NULL), not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The second argument is a T, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFMETHOD REGEX-LENGTH ...) ; file: /usr/share/common-lisp/source/cl-ppcre/regex-class-util.lisp ; in: DEFMETHOD REGEX-LENGTH (REPETITION) ; (EQL CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; (* CL-PPCRE::MINIMUM CL-PPCRE::LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (EQL CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a T, not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a T, not a (UNSIGNED-BYTE 64). ; etc. ; (* CL-PPCRE::MINIMUM CL-PPCRE::LEN) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a T, not a (SIGNED-BYTE 64). ; The second argument is a T, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; 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) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-5 CL-PPCRE::LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; 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) ; --> LET LET SB-LOOP::WITH-MINIMAX-VALUE LET TAGBODY ; --> SB-LOOP::LOOP-ACCUMULATE-MINIMAX-VALUE PROGN WHEN IF OR LET IF ; ==> ; (< #:LOOP-MAXMIN-TEMP-9 #:LOOP-MAXMIN-8) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: forced to do full call ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: forced to do full call ; 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 full call ; 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. ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a T, not a (SIGNED-BYTE 64). ; The second argument is a T, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; ; note: forced to do full call ; unable to do #1=inline float comparison (cost 3) because: ; The first argument is a (NOT NULL), not a SINGLE-FLOAT. ; The second argument is a (NOT NULL), not a SINGLE-FLOAT. ; unable to do #1# (cost 3) because: ; The first argument is a (NOT NULL), not a DOUBLE-FLOAT. ; The second argument is a (NOT NULL), not a DOUBLE-FLOAT. ; 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: unable to ; optimize ; due to type uncertainty: ; The first argument is a (NOT NULL), not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (NOT NULL), not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; The second argument is a T, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFMETHOD COMPUTE-OFFSETS ...) ; file: /usr/share/common-lisp/source/cl-ppcre/regex-class-util.lisp ; in: DEFMETHOD COMPUTE-OFFSETS (REPETITION T) ; (* CL-PPCRE::MINIMUM CL-PPCRE::LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (+ CL-PPCRE::START-POS (* CL-PPCRE::MINIMUM CL-PPCRE::LEN)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (* CL-PPCRE::MINIMUM CL-PPCRE::LEN) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a T, not a (SIGNED-BYTE 64). ; The second argument is a T, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (+ CL-PPCRE::START-POS (* CL-PPCRE::MINIMUM CL-PPCRE::LEN)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do full call ; 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 ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The second argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a (NOT NULL), not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; processing (DEFMETHOD COMPUTE-OFFSETS ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-ppcre/regex-class-util-tmp11AFZINB.fasl ; compilation finished in 0:00:00.324 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/convert.lisp" (written 26 JAN 2022 06:40:10 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (- (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH) (CL-PPCRE::LEN CL-PPCRE::STR)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (SETF (SUBSEQ (SLOT-VALUE CL-PPCRE::STARTS-WITH 'CL-PPCRE::STR) ; (- (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH) ; (CL-PPCRE::LEN CL-PPCRE::STR))) ; (CL-PPCRE::STR CL-PPCRE::STR) ; (CL-PPCRE::SKIP CL-PPCRE::STR) T) ; --> SETF LET* ; ==> ; (REPLACE #:SEQUENCE #:NEW1 :START1 #:START :END1 NIL) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * . #1=((*))). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY * . #1#). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY * . #1#) ; &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 full call ; 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 ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (- (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH) (CL-PPCRE::LEN CL-PPCRE::STR)) ; ; note: forced to do full call ; 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 ; . #2#). ; 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 . #2#). ; 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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; 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 STRING SYMBOL CHARACTER), not a STRING. ; The second argument is a (OR STRING (AND (NOT NULL) SYMBOL) ; CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL ; CHARACTER), not a SIMPLE-BASE-STRING. ; The second argument is a (OR STRING (AND (NOT NULL) SYMBOL) ; CHARACTER), not a SIMPLE-BASE-STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY ; CHARACTER ; . #1=((*))). ; The second argument is a (OR STRING (AND (NOT NULL) SYMBOL) ; CHARACTER), not a (SIMPLE-ARRAY CHARACTER . #1#). ; (- CL-PPCRE::REG-NUM CL-PPCRE::REG-INDEX) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (1- CL-PPCRE::BACKREF-NUMBER) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (1- CL-PPCRE::BACKREF-NUMBER) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (LOOP CL-PPCRE::FOR CL-PPCRE::NAME CL-PPCRE::IN CL-PPCRE::REG-NAMES ; CL-PPCRE::FOR CL-PPCRE::REG-INDEX CL-PPCRE::FROM 0 ; WHEN (STRING= CL-PPCRE::NAME CL-PPCRE::BACKREF-NAME) ; CL-PPCRE::COLLECT ...) ; --> LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY ; --> SB-LOOP::LOOP-DESETQ SETQ THE 1+ ; ==> ; 1 ; ; note: forced to do 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 (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; 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 LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER . #1=((*)))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * . #1#). ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-ppcre/convert-tmpN84Z1F4D.fasl ; compilation finished in 0:00:00.340 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/optimize.lisp" (written 26 JAN 2022 06:40:10 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 (SIMPLE-ARRAY * (*)), not a SIMPLE-BASE-STRING. ; (INCF CL-PPCRE::COLLECTOR-LENGTH (CL-PPCRE::LEN CL-PPCRE::ELEMENT)) ; --> THE ; ==> ; (+ (CL-PPCRE::LEN CL-PPCRE::ELEMENT) CL-PPCRE::COLLECTOR-LENGTH) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; 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 full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a T, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; 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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; 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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (MAKE-ARRAY CL-PPCRE::CONCATENATED-LENGTH :INITIAL-CONTENTS ; (REVERSE (CL-PPCRE::STR CL-PPCRE::CONCATENATED-START)) ; :ELEMENT-TYPE 'CHARACTER :FILL-POINTER T :ADJUSTABLE T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR LIST (SIMPLE-ARRAY * (*)) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST (SIMPLE-ARRAY * . #1=((*))) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * . #1#). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST (SIMPLE-ARRAY * (*)) ; SB-KERNEL:EXTENDED-SEQUENCE), not a SIMPLE-BASE-STRING. ; (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)) ; --> LET SB-LOOP::WITH-MINIMAX-VALUE LET TAGBODY ; --> SB-LOOP::LOOP-ACCUMULATE-MINIMAX-VALUE PROGN WHEN IF OR LET IF ; ==> ; (< #:LOOP-MAXMIN-TEMP-10 #:LOOP-MAXMIN-9) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: forced to do full call ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: forced to do full call ; 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 full call ; 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. ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do full call ; 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 ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The second argument is a (NOT NULL), not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a (NOT NULL), not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (+ CL-PPCRE::CURRENT-MIN-REST ; (* (CL-PPCRE::MINIMUM CL-PPCRE::REPETITION) ; (CL-PPCRE::MIN-LEN CL-PPCRE::REPETITION))) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (* (CL-PPCRE::MINIMUM CL-PPCRE::REPETITION) ; (CL-PPCRE::MIN-LEN CL-PPCRE::REPETITION)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a T, not a (SIGNED-BYTE 64). ; The second argument is a T, not a (SIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (+ CL-PPCRE::CURRENT-MIN-REST ; (* (CL-PPCRE::MINIMUM CL-PPCRE::REPETITION) ; (CL-PPCRE::MIN-LEN CL-PPCRE::REPETITION))) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do full call ; 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 ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-ppcre/optimize-tmpHX0IAQ8A.fasl ; compilation finished in 0:00:00.124 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/closures.lisp" (written 26 JAN 2022 06:40:10 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) ; (FUNCALL CL-PPCRE::TEST-MATCHER (- CL-PPCRE::START-POS CL-PPCRE::LEN)) ; ; note: doing signed word to integer coercion (cost 20) ; ; note: doing signed word to integer coercion (cost 20) ; 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 LAMBDA FUNCTION AND IF IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; processing (DEFMETHOD CREATE-MATCHER-AUX ...) ; file: /usr/share/common-lisp/source/cl-ppcre/closures.lisp ; in: DEFMETHOD CREATE-MATCHER-AUX (STR T) ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::START-POS ; CL-PPCRE::NEXT-POS 0 CL-PPCRE::LEN) ; --> BLOCK LOOP BLOCK LET LET TAGBODY UNLESS IF CHAR-EQUAL ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::START-POS) CL-PPCRE::CHR) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; (LENGTH CL-PPCRE::END-STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS VECTOR ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::END-STRING CL-PPCRE::START-POS ; CL-PPCRE::TEST-END-POS 0 CL-PPCRE::END-STRING-LEN) ; --> BLOCK LOOP BLOCK LET LET TAGBODY UNLESS IF CHAR-EQUAL ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; (FUNCALL CL-PPCRE::NEXT-FN (+ CL-PPCRE::START-POS CL-PPCRE::LEN)) ; ; note: doing signed word to integer coercion (cost 20) ; ; note: doing signed word to integer coercion (cost 20) ; ; note: doing signed word to integer coercion (cost 20) ; 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 ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-ppcre/closures-tmp8MQVZGT.fasl ; compilation finished in 0:00:00.148 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/repetition-closures.lisp" (written 26 JAN 2022 06:40:10 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 CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET BLOCK ; --> TAGBODY WHEN IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (CHAR-EQUAL CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS ; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0 ; CL-PPCRE::LEN) ; --> BLOCK LOOP BLOCK LET LET TAGBODY UNLESS IF CHAR-EQUAL ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE ; (FUNCALL CL-PPCRE::INNER-MATCHER CL-PPCRE::CURR-POS)) ; --> LAMBDA FUNCTION LET 1+ ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE ; (CHAR/= #\Newline (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS))) ; --> LAMBDA FUNCTION LET 1+ ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; 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 CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET 1+ ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE ; (CHAR= CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS))) ; --> LAMBDA FUNCTION LET 1+ ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE ; (CHAR-EQUAL CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS))) ; --> LAMBDA FUNCTION LET 1+ ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; 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. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), not a (UNSIGNED-BYTE 64). ; etc. ; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE ; (CHAR= CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS))) ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (cost 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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; 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. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), not a (UNSIGNED-BYTE 64). ; etc. ; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS ; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0 ; CL-PPCRE::LEN)) ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (cost 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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; 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. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), not a (UNSIGNED-BYTE 64). ; etc. ; --> LAMBDA FUNCTION LET 1+ ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; 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)) ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; 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. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), not a (UNSIGNED-BYTE 64). ; etc. ; --> LAMBDA FUNCTION LET 1+ ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; 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 CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; 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. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), not a (UNSIGNED-BYTE 64). ; etc. ; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE ; (CHAR/= #\Newline (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS))) ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (cost 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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; 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. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), not a (UNSIGNED-BYTE 64). ; etc. ; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE ; (FUNCALL CL-PPCRE::INNER-MATCHER CL-PPCRE::CURR-POS)) ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (cost 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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; 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. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), not a (UNSIGNED-BYTE 64). ; etc. ; ; note: doing signed word to integer coercion (cost 20), for: ; the first result of inline (signed-byte 64) arithmetic ; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE ; (CHAR/= #\Newline (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS))) ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first result of inline (signed-byte 64) arithmetic ; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::REGEX ; (SCHAR CL-PPCRE::*STRING* ; CL-PPCRE::CURR-POS)) ; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE (CL-PPCRE::CHAR-CLASS-TEST))) ; --> LET CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first result of inline (signed-byte 64) arithmetic ; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE ; (CL-PPCRE::*STRING*= CL-PPCRE::STR CL-PPCRE::CURR-POS ; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0 CL-PPCRE::LEN)) ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first result of inline (signed-byte 64) arithmetic ; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS ; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0 ; CL-PPCRE::LEN)) ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first result of inline (signed-byte 64) arithmetic ; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE ; (CHAR= CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS))) ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first result of inline (signed-byte 64) arithmetic ; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE ; (CHAR-EQUAL CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS))) ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first result of inline (signed-byte 64) arithmetic ; 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) ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> + AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> SB-IMPL::XSUBTRACT AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; 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) ; --> SETF LET* FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> + AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> SB-IMPL::XSUBTRACT AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; 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 CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET ; --> LOOP BLOCK LET LET TAGBODY UNLESS IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (CHAR-EQUAL CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS ; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0 ; CL-PPCRE::LEN) ; --> BLOCK LOOP BLOCK LET LET TAGBODY UNLESS IF CHAR-EQUAL ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE ; (CL-PPCRE::*STRING*= CL-PPCRE::STR CL-PPCRE::CURR-POS ; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0 CL-PPCRE::LEN)) ; --> LAMBDA FUNCTION LET 1+ ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS ; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0 ; CL-PPCRE::LEN)) ; --> LAMBDA FUNCTION LET 1+ ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE ; (CHAR-EQUAL CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS))) ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; 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. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), not a (UNSIGNED-BYTE 64). ; etc. ; --> LAMBDA FUNCTION LET 1+ ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE ; (CHAR= CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS))) ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; 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. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), not a (UNSIGNED-BYTE 64). ; etc. ; --> LAMBDA FUNCTION LET 1+ ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS ; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0 ; CL-PPCRE::LEN)) ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (cost 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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; 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. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), not a (UNSIGNED-BYTE 64). ; etc. ; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE ; (CL-PPCRE::*STRING*= CL-PPCRE::STR CL-PPCRE::CURR-POS ; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0 CL-PPCRE::LEN)) ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (cost 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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; 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. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), not a (UNSIGNED-BYTE 64). ; etc. ; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::REGEX ; (SCHAR CL-PPCRE::*STRING* ; CL-PPCRE::CURR-POS)) ; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE (CL-PPCRE::CHAR-CLASS-TEST))) ; --> LET CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET ; --> MIN ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (cost 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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; 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. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), not a (UNSIGNED-BYTE 64). ; etc. ; --> LET CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET ; --> 1+ ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE T) ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; 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. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), not a (UNSIGNED-BYTE 64). ; etc. ; --> LAMBDA FUNCTION LET 1+ ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE ; (CHAR/= #\Newline (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS))) ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; 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. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), not a (UNSIGNED-BYTE 64). ; etc. ; --> LAMBDA FUNCTION LET 1+ ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE ; (FUNCALL CL-PPCRE::INNER-MATCHER CL-PPCRE::CURR-POS)) ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; 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. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (INTEGER -13835058055282163709 ; 13835058055282163712), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -9223372036854775808 ; 9223372036854775806), not a (UNSIGNED-BYTE 64). ; etc. ; --> LAMBDA FUNCTION LET 1+ ; ==> ; 1 ; ; note: forced to do -/SIGNED=>INTEGER (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 . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The result is a (VALUES ; (INTEGER -13835058055282163710 13835058055282163711) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a FIXNUM. ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -13835058055282163710 ; 13835058055282163711), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (INTEGER -13835058055282163709 13835058055282163712) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first result of inline (signed-byte 64) arithmetic ; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE ; (CHAR/= #\Newline (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS))) ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first result of inline (signed-byte 64) arithmetic ; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE T) ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first result of inline (signed-byte 64) arithmetic ; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::REGEX ; (SCHAR CL-PPCRE::*STRING* ; CL-PPCRE::CURR-POS)) ; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE (CL-PPCRE::CHAR-CLASS-TEST))) ; --> LET CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET ; --> MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first result of inline (signed-byte 64) arithmetic ; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE ; (CL-PPCRE::*STRING*= CL-PPCRE::STR CL-PPCRE::CURR-POS ; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0 CL-PPCRE::LEN)) ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first result of inline (signed-byte 64) arithmetic ; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS ; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0 ; CL-PPCRE::LEN)) ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first result of inline (signed-byte 64) arithmetic ; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE ; (CHAR= CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS))) ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first result of inline (signed-byte 64) arithmetic ; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE ; (CHAR-EQUAL CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS))) ; --> LAMBDA FUNCTION LET MIN ; ==> ; 1 ; ; note: doing signed word to integer coercion (cost 20), for: ; the first result of inline (signed-byte 64) arithmetic ; 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) ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> + AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> SB-IMPL::XSUBTRACT AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; 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) ; --> SETF LET* FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> + AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> SB-IMPL::XSUBTRACT AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; 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 CL-PPCRE::CONSTANT-REPETITION-CONSTANT-LENGTH-CLOSURE LAMBDA FUNCTION ; --> LET AND IF IF LOOP BLOCK LET TAGBODY UNLESS IF AND IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (CHAR-EQUAL CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS CL-PPCRE::NEXT-POS ; 0 CL-PPCRE::LEN) ; --> BLOCK LOOP BLOCK LET LET TAGBODY UNLESS IF CHAR-EQUAL ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; 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) ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> + AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> SB-IMPL::XSUBTRACT AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0 ; (AREF CL-PPCRE::*LAST-POS-STORES* CL-PPCRE::ZERO-LENGTH-NUM) NIL) ; --> SETF LET* FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (ZEROP (CL-PPCRE::MIN-LEN CL-PPCRE::REPETITION)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> + AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> SB-IMPL::XSUBTRACT AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; processing (DEFMETHOD CREATE-MATCHER-AUX ...) ; file: /usr/share/common-lisp/source/cl-ppcre/repetition-closures.lisp ; in: DEFMETHOD CREATE-MATCHER-AUX (REPETITION T) ; (ZEROP 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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (= CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM 1) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-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 REAL COMPLEX), not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (EQL CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; (PLUSP CL-PPCRE::MIN-LEN) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (PLUSP CL-PPCRE::LEN) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (PLUSP CL-PPCRE::MIN-LEN) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (= CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM 1) ; ; note: forced to do full call ; 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 NUMBER, 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 NUMBER, not a DOUBLE-FLOAT. ; (EQL CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a T, not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a T, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a T, not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a T, not a (UNSIGNED-BYTE 64). ; etc. ; (PLUSP CL-PPCRE::MIN-LEN) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a T, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; etc. ; (PLUSP CL-PPCRE::LEN) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a T, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; etc. ; (PLUSP CL-PPCRE::MIN-LEN) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a T, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; etc. ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-ppcre/repetition-closures-tmp88LUAVGW.fasl ; compilation finished in 0:00:00.568 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/scanner.lisp" (written 26 JAN 2022 06:40:10 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) ; --> FUNCTION IF LOOP BLOCK LET TAGBODY LOOP BLOCK LET LET TAGBODY UNLESS IF ; --> AND IF CHAR-EQUAL ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; (LENGTH CL-PPCRE::PATTERN) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (CHAR-UPCASE (SCHAR CL-PPCRE::PATTERN CL-PPCRE::K)) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; (CHAR-DOWNCASE (SCHAR CL-PPCRE::PATTERN CL-PPCRE::K)) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; (SEARCH CL-PPCRE::PATTERN CL-PPCRE::*STRING* :START2 CL-PPCRE::START-POS ; :END2 CL-PPCRE::*END-POS* :TEST CL-PPCRE::TEST) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; 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) ; --> FUNCTION AND IF LOOP BLOCK LET LET TAGBODY WHEN IF SETQ THE AND IF ; --> CHAR-EQUAL ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; 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)) ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::END-STRING-TEST)) ; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*)) ; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS)) ; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #) ; (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF ; --> NOT ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF ; --> NOT ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::START-STRING-TEST)) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF ; --> NOT ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::END-STRING-TEST)) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*)) ; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS)) ; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #) ; (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF ; --> NOT ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::START-STRING-TEST CL-PPCRE::END-STRING-TEST)) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*)) ; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS)) ; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #) ; (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF ; --> NOT ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FIXNUM CL-PPCRE::END-STRING-OFFSET) ; (FUNCTION CL-PPCRE::END-STRING-TEST)) ; (LOOP (UNLESS (SETQ #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (LOCALLY ; (DECLARE #) ; (WHEN # #) ; (LET # ; #))))) ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF ; --> NOT ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 # ; #))))) ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF ; --> NOT ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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) CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF ; --> NOT ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::END-STRING-TEST)) ; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*)) ; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS)) ; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #) ; (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: unable to open code because: The operands might not be the same type. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: unable to open code because: The operands might not be the same type. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::END-STRING-TEST)) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*)) ; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS)) ; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #) ; (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: unable to open code because: The operands might not be the same type. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FIXNUM CL-PPCRE::END-STRING-OFFSET) ; (FUNCTION CL-PPCRE::END-STRING-TEST)) ; (LOOP (UNLESS (SETQ #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (LOCALLY ; (DECLARE #) ; (WHEN # #) ; (LET # ; #))))) ; --> FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: unable to open code because: The operands might not be the same type. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FIXNUM CL-PPCRE::END-STRING-OFFSET CL-PPCRE::STARTS-WITH-LEN) ; (FUNCTION CL-PPCRE::START-STRING-TEST CL-PPCRE::END-STRING-TEST)) ; (LOOP (UNLESS (SETQ #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (LOCALLY ; (DECLARE #) ; (WHEN # #) ; (LET # ; #))))) ; --> FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: unable to open code because: The operands might not be the same type. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::START-STRING-TEST CL-PPCRE::END-STRING-TEST)) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*)) ; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS)) ; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #) ; (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: unable to open code because: The operands might not be the same type. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::START-STRING-TEST)) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: unable to open code because: The operands might not be the same type. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: unable to open code because: The operands might not be the same type. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 64). ; The second argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: forced to do full call ; 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 ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::END-STRING-TEST)) ; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*)) ; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS)) ; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #) ; (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 64). ; The second argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: forced to do full call ; 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 ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 64). ; The second argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: forced to do full call ; 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 ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::START-STRING-TEST)) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 64). ; The second argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: forced to do full call ; 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 ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::END-STRING-TEST)) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*)) ; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS)) ; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #) ; (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 64). ; The second argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: forced to do full call ; 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 ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::START-STRING-TEST CL-PPCRE::END-STRING-TEST)) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*)) ; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS)) ; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #) ; (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 64). ; The second argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: forced to do full call ; 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 ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FIXNUM CL-PPCRE::END-STRING-OFFSET) ; (FUNCTION CL-PPCRE::END-STRING-TEST)) ; (LOOP (UNLESS (SETQ #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (LOCALLY ; (DECLARE #) ; (WHEN # #) ; (LET # ; #))))) ; --> FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 64). ; The second argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: forced to do full call ; 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 ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FIXNUM CL-PPCRE::END-STRING-OFFSET CL-PPCRE::STARTS-WITH-LEN) ; (FUNCTION CL-PPCRE::START-STRING-TEST CL-PPCRE::END-STRING-TEST)) ; (LOOP (UNLESS (SETQ #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (LOCALLY ; (DECLARE #) ; (WHEN # #) ; (LET # ; #))))) ; --> FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 64). ; The second argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: forced to do full call ; 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 ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-ppcre/scanner-tmpM5RP096T.fasl ; compilation finished in 0:00:00.868 ; compiling file "/usr/share/common-lisp/source/cl-ppcre/api.lisp" (written 26 JAN 2022 06:40:10 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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (PLUSP (CL-PPCRE::LEN CL-PPCRE::END-STRING)) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a T, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; etc. ; (PLUSP (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH)) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a T, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; 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 LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT SIMPLE-BASE-STRING) ; (NOT (SIMPLE-ARRAY CHARACTER . #1=((*)))) ; VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * . #1#). ; 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 LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT SIMPLE-BASE-STRING) ; (NOT (SIMPLE-ARRAY CHARACTER . #1=((*)))) ; VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * . #1#). ; 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 LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT SIMPLE-BASE-STRING) ; (NOT (SIMPLE-ARRAY CHARACTER . #1=((*)))) ; VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * . #1#). ; 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. ... {100862A7EF}> ; (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, ; ... {1008CBD07F}> ; (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... {10032E3EDF}> ; (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... {10034FA7AF}> ; (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 COUNT-MATCHES ...) ; file: /usr/share/common-lisp/source/cl-ppcre/api.lisp ; in: DEFUN COUNT-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::S CL-PPCRE::E CL-PPCRE::REGEX ; CL-PPCRE::TARGET-STRING COUNT :START CL-PPCRE::START ; :END CL-PPCRE::END) ; (INCF COUNT)) ; --> LET BLOCK LET* OR LET IF ; ==> ; (LENGTH #:TARGET-STRING3) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; --> LET BLOCK LET* SETQ THE CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND ; --> IF THE COERCE ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT SIMPLE-BASE-STRING) ; (NOT (SIMPLE-ARRAY CHARACTER . #1=((*)))) ; VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * . #1#). ; --> LET BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF ; ==> ; (= CL-PPCRE::S CL-PPCRE::E) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; --> LET BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+ ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a RATIONAL. ; (INCF COUNT) ; --> THE ; ==> ; (+ 1 COUNT) ; ; 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 (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (CL-PPCRE:DO-MATCHES (CL-PPCRE::S CL-PPCRE::E CL-PPCRE::REGEX ; CL-PPCRE::TARGET-STRING COUNT :START CL-PPCRE::START ; :END CL-PPCRE::END) ; (INCF COUNT)) ; --> LET BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF ; ==> ; (= CL-PPCRE::S CL-PPCRE::E) ; ; note: forced to do full call ; unable to do #1=inline float comparison (cost 3) because: ; The first argument is a (NOT NULL), not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; unable to do #1# (cost 3) because: ; The first argument is a (NOT NULL), not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; --> LET BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+ ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR REAL COMPLEX), not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR REAL COMPLEX), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; processing (DEFINE-COMPILER-MACRO COUNT-MATCHES ...) ; 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)) ; --> LET BLOCK LET* OR LET IF ; ==> ; (LENGTH #:TARGET-STRING3) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; --> LET BLOCK LET* SETQ THE CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND ; --> IF THE COERCE ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT SIMPLE-BASE-STRING) ; (NOT (SIMPLE-ARRAY CHARACTER . #1=((*)))) ; VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * . #1#). ; --> LET BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF ; ==> ; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; --> LET BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+ ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a RATIONAL. ; --> LET BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF ; ==> ; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; ; note: forced to do full call ; unable to do #1=inline float comparison (cost 3) because: ; The first argument is a (NOT NULL), not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; unable to do #1# (cost 3) because: ; The first argument is a (NOT NULL), not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; --> LET BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+ ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR REAL COMPLEX), not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR REAL COMPLEX), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; 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 CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* OR LET IF ; ==> ; (LENGTH #:TARGET-STRING7) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; --> LET CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* SETQ THE ; --> CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND IF THE COERCE ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT SIMPLE-BASE-STRING) ; (NOT (SIMPLE-ARRAY CHARACTER . #1=((*)))) ; VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * . #1#). ; --> LET CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* LOOP BLOCK ; --> TAGBODY PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION SETQ THE ; --> IF ; ==> ; (= #:MATCH-START2 #:MATCH-END3) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; --> LET CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* LOOP BLOCK ; --> TAGBODY PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION SETQ THE ; --> IF 1+ ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a RATIONAL. ; --> LET CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* LOOP BLOCK ; --> TAGBODY PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION SETQ THE ; --> IF ; ==> ; (= #:MATCH-START2 #:MATCH-END3) ; ; note: forced to do full call ; unable to do #1=inline float comparison (cost 3) because: ; The first argument is a (NOT NULL), not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; unable to do #1# (cost 3) because: ; The first argument is a (NOT NULL), not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; --> LET CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* LOOP BLOCK ; --> TAGBODY PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION SETQ THE ; --> IF 1+ ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR REAL COMPLEX), not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR REAL COMPLEX), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; 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))) ; --> BLOCK LET* OR LET IF ; ==> ; (LENGTH #:TARGET-STRING1) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; --> BLOCK LET* SETQ THE CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND IF ; --> THE COERCE ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT SIMPLE-BASE-STRING) ; (NOT (SIMPLE-ARRAY CHARACTER . #1=((*)))) ; VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * . #1#). ; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (= CL-PPCRE::MATCH-START (CAR CL-PPCRE::POS-LIST)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (PLUSP CL-PPCRE::LIMIT) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (LOOP CL-PPCRE::FOR CL-PPCRE::REG-START CL-PPCRE::ACROSS CL-PPCRE::REG-STARTS ; CL-PPCRE::FOR CL-PPCRE::REG-END CL-PPCRE::ACROSS CL-PPCRE::REG-ENDS ; IF CL-PPCRE::REG-START ; DO ...) ; --> LET LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (CL-PPCRE:DO-SCANS (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END ; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS CL-PPCRE::REGEX ; CL-PPCRE::TARGET-STRING NIL :START CL-PPCRE::START :END ; CL-PPCRE::END) ; (UNLESS ; (AND (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; (= CL-PPCRE::MATCH-START (CAR CL-PPCRE::POS-LIST))) ; (WHEN ; (AND CL-PPCRE::LIMIT (PLUSP CL-PPCRE::LIMIT) (>= # CL-PPCRE::LIMIT)) ; (RETURN)) ; (PUSH CL-PPCRE::MATCH-START CL-PPCRE::POS-LIST) ; (WHEN CL-PPCRE::WITH-REGISTERS-P ; (LOOP CL-PPCRE::FOR CL-PPCRE::REG-START CL-PPCRE::ACROSS CL-PPCRE::REG-STARTS ; CL-PPCRE::FOR CL-PPCRE::REG-END CL-PPCRE::ACROSS CL-PPCRE::REG-ENDS ; IF CL-PPCRE::REG-START ; DO ...)) ; (PUSH CL-PPCRE::MATCH-END CL-PPCRE::POS-LIST))) ; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF ; ==> ; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+ ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a RATIONAL. ; (> CL-PPCRE::THIS-END CL-PPCRE::THIS-START) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; (>= (INCF CL-PPCRE::COUNTER) CL-PPCRE::LIMIT) ; ; note: unable to open code because: The operands might not be the same type. ; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; ; note: forced to do full call ; unable to do #1=inline float comparison (cost 3) because: ; The first argument is a (NOT NULL), not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; unable to do #1# (cost 3) because: ; The first argument is a (NOT NULL), not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; (= CL-PPCRE::MATCH-START (CAR CL-PPCRE::POS-LIST)) ; ; note: forced to do full call ; unable to do #1=inline float comparison (cost 3) because: ; The first argument is a (OR REAL COMPLEX), 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 (OR REAL COMPLEX), not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; (PLUSP CL-PPCRE::LIMIT) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64). ; etc. ; (INCF CL-PPCRE::COUNTER) ; --> THE ; ==> ; (+ 1 CL-PPCRE::COUNTER) ; ; 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 (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (>= (INCF CL-PPCRE::COUNTER) CL-PPCRE::LIMIT) ; ; note: forced to do full call ; 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 (RATIONAL #1=(0)) (SINGLE-FLOAT #2=(0.0)) ; (DOUBLE-FLOAT #3=(0.0d0))), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (INTEGER 1), not a (UNSIGNED-BYTE 64). ; The second argument is a (OR (RATIONAL #1#) (SINGLE-FLOAT #2#) ; (DOUBLE-FLOAT #3#)), not a (UNSIGNED-BYTE 64). ; etc. ; (CL-PPCRE:DO-SCANS (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END ; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS CL-PPCRE::REGEX ; CL-PPCRE::TARGET-STRING NIL :START CL-PPCRE::START :END ; CL-PPCRE::END) ; (UNLESS ; (AND (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; (= CL-PPCRE::MATCH-START (CAR CL-PPCRE::POS-LIST))) ; (WHEN ; (AND CL-PPCRE::LIMIT (PLUSP CL-PPCRE::LIMIT) (>= # CL-PPCRE::LIMIT)) ; (RETURN)) ; (PUSH CL-PPCRE::MATCH-START CL-PPCRE::POS-LIST) ; (WHEN CL-PPCRE::WITH-REGISTERS-P ; (LOOP CL-PPCRE::FOR CL-PPCRE::REG-START CL-PPCRE::ACROSS CL-PPCRE::REG-STARTS ; CL-PPCRE::FOR CL-PPCRE::REG-END CL-PPCRE::ACROSS CL-PPCRE::REG-ENDS ; IF CL-PPCRE::REG-START ; DO ...)) ; (PUSH CL-PPCRE::MATCH-END CL-PPCRE::POS-LIST))) ; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF ; ==> ; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; ; note: forced to do full call ; 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 NUMBER, 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 NUMBER, not a DOUBLE-FLOAT. ; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+ ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR REAL COMPLEX), not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR REAL COMPLEX), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (> CL-PPCRE::THIS-END CL-PPCRE::THIS-START) ; ; note: forced to do full call ; 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 full call ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The second argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (1- ; (PARSE-INTEGER CL-PPCRE::REPLACEMENT-STRING :START CL-PPCRE::PARSE-START ; :JUNK-ALLOWED T)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR INTEGER NULL), not a FIXNUM. ; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR INTEGER NULL), not a (SIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (SIGNED-BYTE 64) ; . #1#). ; etc. ; (< CL-PPCRE::TOKEN 0) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (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) ; --> MAKE-ARRAY ; ==> ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (ARRAY-DIMENSION CL-PPCRE::REG-STARTS 0) ; ; note: unable to ; optimize ; because: ; The array dimensions are unknown; must call ARRAY-DIMENSION at runtime. ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::MATCH-START ; CL-PPCRE::MATCH-END) ; ; note: unable to optimize because: ELEMENT-TYPE is not constant. ; (MAP 'LIST ; (LAMBDA (CL-PPCRE::REG-START CL-PPCRE::REG-END) ; (AND CL-PPCRE::REG-START ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START ; CL-PPCRE::REG-END))) ; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS) ; ; note: unable to open code because: can't determine sequence argument type ; (APPLY CL-PPCRE::TOKEN ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::MATCH-START ; CL-PPCRE::MATCH-END) ; (MAP 'LIST ; (LAMBDA (CL-PPCRE::REG-START CL-PPCRE::REG-END) ; (AND CL-PPCRE::REG-START ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING ; CL-PPCRE::REG-START ; CL-PPCRE::REG-END))) ; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS)) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::MATCH-START ; CL-PPCRE::MATCH-END) ; --> MAKE-ARRAY ; ==> ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MAP 'LIST ; (LAMBDA (CL-PPCRE::REG-START CL-PPCRE::REG-END) ; (AND CL-PPCRE::REG-START ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START ; CL-PPCRE::REG-END))) ; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS) ; ; note: unable to open code because: can't determine sequence argument type ; (FUNCALL CL-PPCRE::TOKEN CL-PPCRE::TARGET-STRING CL-PPCRE::START ; CL-PPCRE::END CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END ; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START ; CL-PPCRE::REG-END) ; --> MAKE-ARRAY ; ==> ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::MATCH-START ; CL-PPCRE::MATCH-END) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ==> ; (MAKE-ARRAY (- CL-PPCRE::END CL-PPCRE::START) :ELEMENT-TYPE ; (ARRAY-ELEMENT-TYPE SEQUENCE) :DISPLACED-TO SEQUENCE ; :DISPLACED-INDEX-OFFSET CL-PPCRE::START) ; ; note: unable to optimize because: ELEMENT-TYPE is not constant. ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START ; CL-PPCRE::REG-END) ; ==> ; (MAKE-ARRAY (- CL-PPCRE::END CL-PPCRE::START) :ELEMENT-TYPE ; (ARRAY-ELEMENT-TYPE SEQUENCE) :DISPLACED-TO SEQUENCE ; :DISPLACED-INDEX-OFFSET CL-PPCRE::START) ; ; note: unable to optimize because: ELEMENT-TYPE is not constant. ; ; note: unable to optimize because: ELEMENT-TYPE is not constant. ; (>= CL-PPCRE::TOKEN CL-PPCRE::REG-BOUND) ; ; note: forced to do <-INTEGER-FIXNUM (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 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 (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::MATCH-START ; CL-PPCRE::MATCH-END) ; ; note: forced to do full call ; 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 ; . #2#). ; 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 . #2#). ; etc. ; --> MAKE-ARRAY ; ==> ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: forced to do full call ; 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 ; . #2#). ; 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 . #2#). ; etc. ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START ; CL-PPCRE::REG-END) ; --> MAKE-ARRAY ; ==> ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: forced to do full call ; 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 ; . #2#). ; 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 . #2#). ; etc. ; ; note: forced to do full call ; 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 ; . #2#). ; 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 . #2#). ; etc. ; processing (DEFUN REPLACE-AUX ...) ; 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)) ; --> BLOCK LET* OR LET IF ; ==> ; (LENGTH #:TARGET-STRING1) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; --> BLOCK LET* SETQ THE CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND IF ; --> THE COERCE ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT SIMPLE-BASE-STRING) ; (NOT (SIMPLE-ARRAY CHARACTER . #1=((*)))) ; VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * . #1#). ; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF ; ==> ; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+ ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR REAL COMPLEX), not a RATIONAL. ; (SUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::START CL-PPCRE::END) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE. ; (CL-PPCRE:DO-SCANS (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END ; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS CL-PPCRE::REGEX ; CL-PPCRE::TARGET-STRING NIL :START CL-PPCRE::START :END ; CL-PPCRE::END) ; (PUSH CL-PPCRE::MATCH-START CL-PPCRE::POS-LIST) ; (PUSH CL-PPCRE::MATCH-END CL-PPCRE::POS-LIST) ; (PUSH CL-PPCRE::REG-STARTS CL-PPCRE::REG-LIST) ; (PUSH CL-PPCRE::REG-ENDS CL-PPCRE::REG-LIST)) ; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF ; ==> ; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; ; note: forced to do full call ; unable to do #1=inline float comparison (cost 3) because: ; The first argument is a (NOT NULL), not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; unable to do #1# (cost 3) because: ; The first argument is a (NOT NULL), not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+ ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR REAL COMPLEX), not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR REAL COMPLEX), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; 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... {100910061F}> ; (LET ((CL-PPCRE::COLLECTOR 'NIL)) ; (CL-PPCRE::REGEX-APROPOS-AUX (CL-PPCRE::REGEX CL-PPCRE::PACKAGES ; CL-PPCRE::CASE-INSENSITIVE ; CL-PPCRE::COLLECTOR) ; (PUSH SYMBOL CL-PPCRE::COLLECTOR)))) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-PPCRE:REGEX-APROPOS-LIST ; (CL-PPCRE::REGEX &OPTIONAL CL-PPCRE::PACKAGES &KEY ; (CL-PPCRE::CASE-INSENSITIVE T)) ; #<(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... {100910061F}> ; (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 ... {100999EBBF}> ; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; (CL-PPCRE::REGEX-APROPOS-AUX (CL-PPCRE::REGEX CL-PPCRE::PACKAGES ; CL-PPCRE::CASE-INSENSITIVE) ; (CL-PPCRE::PRINT-SYMBOL-INFO SYMBOL)) ; (VALUES)) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-PPCRE:REGEX-APROPOS ; (CL-PPCRE::REGEX &OPTIONAL CL-PPCRE::PACKAGES &KEY ; (CL-PPCRE::CASE-INSENSITIVE T)) ; #<(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 ... {100999EBBF}> ; (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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-ppcre/api-tmpRHTB3TH1.fasl ; compilation finished in 0:00:00.888 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/uax-15/src/package.lisp" (written 21 OCT 2021 12:41:43 AM): ; processing (DEFPACKAGE :UAX-15 ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/uax-15/src/package-tmp4YJPLPB8.fasl ; compilation finished in 0:00:00.000 ; compiling file "/usr/share/common-lisp/source/uax-15/src/utilities.lisp" (written 21 OCT 2021 12:41:43 AM): ; processing (IN-PACKAGE :UAX-15) ; processing (DEFINE-CONDITION BAD-CHAR-ERROR ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN BAD-CHAR-ERROR ...) ; processing (DEFMACRO NCONCF ...) ; processing (DEFUN PARSE-HEX-STRING-TO-STRING ...) ; processing (DEFUN PARSE-HEX-STRING-TO-INT ...) ; processing (DEFUN PARSE-HEX-STRING-TO-CHAR ...) ; processing (DEFUN INT-TO-HEX-STRING ...) ; processing (DEFUN PARSE-HEX-LIST-TO-STRING ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/uax-15/src/utilities-tmp6202QBVV.fasl ; compilation finished in 0:00:00.028 ; compiling file "/usr/share/common-lisp/source/uax-15/src/trivial-utf-16.lisp" (written 21 OCT 2021 12:41:43 AM): ; processing (IN-PACKAGE :UAX-15) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DEFUN UNICODE-POINT-P ...) ; processing (DEFTYPE HIGH-SURROGATE ...) ; processing (DEFTYPE LOW-SURROGATE ...) ; processing (DEFTYPE UNICODE-POINT ...) ; processing (DEFTYPE UNICODE-STRING ...) ; processing (DEFUN CODEPOINT-TO-UNICODE-POINT ...) ; processing (DEFUN CODEPOINT-AS-UTF-16 ...) ; processing (DEFUN SURROGATES-TO-CODEPOINT ...) ; processing (DEFUN ENCODE-UTF-16 ...) ; processing (DEFUN DECODE-UTF-16 ...) ; processing (DECLAIM (INLINE FROM-UNICODE-STRING)) ; processing (DEFUN FROM-UNICODE-STRING ...) ; processing (DECLAIM (INLINE TO-UNICODE-STRING)) ; processing (DEFUN TO-UNICODE-STRING ...) ; processing (DEFUN CHAR-FROM-HEXSTRING ...) ; file: /usr/share/common-lisp/source/uax-15/src/trivial-utf-16.lisp ; in: EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE) ; (ERROR "Unexpected char-code-limit; Unicode support seems unlikely.") ; ; note: deleting unreachable code ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/uax-15/src/trivial-utf-16-tmp8COQHEZO.fasl ; compilation finished in 0:00:00.032 ; compiling file "/usr/share/common-lisp/source/uax-15/src/precomputed-tables.lisp" (written 21 OCT 2021 12:41:43 AM): ; processing (IN-PACKAGE :UAX-15) ; processing (DEFPARAMETER *DATA-DIRECTORY* ...) ; processing (DEFVAR *UNICODE-DATA* ...) ; processing (LET (# # ...) ...) ; processing (DEFPARAMETER *COMPOSITION-EXCLUSIONS-DATA* ...) ; processing (WITH-OPEN-FILE (IN # ...) ...) ; processing (DEFPARAMETER *CANONICAL-COMP-MAP* ...) ; processing (MAPHASH (LAMBDA # ...) ...) ; processing (DEFPARAMETER *UNICODE-LETTERS* ...) ; processing (LOOP FOR ...) ; processing (LOOP FOR ...) ; processing (LOOP FOR ...) ; processing (LOOP FOR ...) ; processing (LOOP FOR ...) ; processing (LOOP FOR ...) ; processing (LOOP FOR ...) ; processing (LOOP FOR ...) ; processing (LOOP FOR ...) ; processing (LOOP FOR ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/uax-15/src/precomputed-tables-tmpQYBBS7QC.fasl ; compilation finished in 0:00:00.040 ; compiling file "/usr/share/common-lisp/source/uax-15/src/normalize-backend.lisp" (written 21 OCT 2021 12:41:43 AM): ; processing (IN-PACKAGE :UAX-15) ; processing (DEFUN GET-CANONICAL-COMBINING-CLASS ...) ; processing (DEFUN DECOMPOSE-CHAR ...) ; processing (LET* (# # ...) ...) ; processing (DEFUN DECOMPOSE ...) ; processing (DEFUN CANONICAL-ORDERING ...) ; processing (DEFUN COMPOSE ...) ; processing (DEFUN NFD ...) ; processing (DEFUN NFKD ...) ; processing (DEFUN NFC ...) ; processing (DEFUN NFKC ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/uax-15/src/normalize-backend-tmpAMQ7AMSJ.fasl ; compilation finished in 0:00:00.068 ; compiling file "/usr/share/common-lisp/source/uax-15/src/uax-15.lisp" (written 21 OCT 2021 12:41:43 AM): ; processing (IN-PACKAGE :UAX-15) ; processing (DEFUN NORMALIZE ...) ; processing (DEFUN NORMALIZE-CHAR ...) ; processing (DEFUN GET-MAPPING ...) ; processing (DEFPARAMETER *DERIVED-NORMALIZATION-PROPS-DATA* ...) ; processing (DEFPARAMETER *DERIVED-NORMALIZATION-PROPS-DATA-FILE* ...) ; processing (DEFUN GET-CANONICAL-COMBINING-CLASS-MAP ...) ; processing (LET (# # ...) ...) ; processing (DEFUN UNICODE-LETTER-P ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/uax-15/src/uax-15-tmpQSC8Z7I4.fasl ; compilation finished in 0:00:00.176 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/package.lisp" (written 13 NOV 2021 10:17:16 AM): ; processing (DEFPACKAGE :CL-POSTGRES ...) ; processing (DEFPACKAGE :CL-POSTGRES-ERROR ...) ; processing (DEFPACKAGE :CL-POSTGRES-OID ...) ; processing (DEFPACKAGE :CL-POSTGRES.FEATURES ...) ; processing (DEFPACKAGE :CL-POSTGRES-TRIVIAL-UTF-8 ...) ; processing (DEFPACKAGE :CL-POSTGRES-IEEE-FLOATS ...) ; processing (IN-PACKAGE :CL-POSTGRES) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/cl-postgres/package-tmpNGMCS43U.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/features.lisp" (written 13 NOV 2021 10:17:16 AM): ; processing (IN-PACKAGE :CL-POSTGRES.FEATURES) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/cl-postgres/features-tmp5EM0MAXI.fasl ; compilation finished in 0:00:00.008 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/config.lisp" (written 13 NOV 2021 10:17:16 AM): ; processing (IN-PACKAGE :CL-POSTGRES) ; processing (DEFPARAMETER *SILENTLY-TRUNCATE-RATIOS* ...) ; processing (DEFPARAMETER *QUERY-LOG* ...) ; processing (DEFPARAMETER *QUERY-CALLBACK* ...) ; processing (DEFVAR *RETRY-CONNECT-TIMES* ...) ; processing (DEFVAR *RETRY-CONNECT-DELAY* ...) ; processing (DEFPARAMETER *ON-EVIDENCE-OF-MAN-IN-THE-MIDDLE-ATTACK* ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/cl-postgres/config-tmpPO1KM2UM.fasl ; compilation finished in 0:00:00.000 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/oid.lisp" (written 13 NOV 2021 10:17:16 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/cl-postgres/oid-tmp9MJ8K0GA.fasl ; compilation finished in 0:00:00.008 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/errors.lisp" (written 13 NOV 2021 10:17:16 AM): ; processing (IN-PACKAGE :CL-POSTGRES) ; processing (DEFPARAMETER *CURRENT-QUERY* ...) ; processing (DEFUN LOG-QUERY ...) ; processing (DEFMACRO WITH-QUERY ...) ; processing (DEFINE-CONDITION DATABASE-ERROR ...) ; processing (DEFUN DATABASE-ERROR-CONSTRAINT-NAME ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/errors.lisp ; in: DEFUN DATABASE-ERROR-CONSTRAINT-NAME ; (TYPECASE CL-POSTGRES::ERR ; (CL-POSTGRES-ERROR:NOT-NULL-VIOLATION ; (CL-POSTGRES::EXTRACT-QUOTED-PART CL-POSTGRES::MESSAGE 0)) ; (CL-POSTGRES-ERROR:UNIQUE-VIOLATION ; (CL-POSTGRES::EXTRACT-QUOTED-PART CL-POSTGRES::MESSAGE 0)) ; (CL-POSTGRES-ERROR:FOREIGN-KEY-VIOLATION ; (CL-POSTGRES::EXTRACT-QUOTED-PART CL-POSTGRES::MESSAGE 1)) ; (CL-POSTGRES-ERROR:CHECK-VIOLATION ; (CL-POSTGRES::EXTRACT-QUOTED-PART CL-POSTGRES::MESSAGE 1))) ; --> COND IF ; ==> ; (TYPEP #:G1 'CL-POSTGRES-ERROR:NOT-NULL-VIOLATION) ; ; note: can't open-code test of unknown type CL-POSTGRES-ERROR:NOT-NULL-VIOLATION ; --> COND IF IF ; ==> ; (TYPEP #:G1 'CL-POSTGRES-ERROR:UNIQUE-VIOLATION) ; ; note: can't open-code test of unknown type CL-POSTGRES-ERROR:UNIQUE-VIOLATION ; --> COND IF IF IF ; ==> ; (TYPEP #:G1 'CL-POSTGRES-ERROR:FOREIGN-KEY-VIOLATION) ; ; note: can't open-code test of unknown type CL-POSTGRES-ERROR:FOREIGN-KEY-VIOLATION ; --> COND IF IF IF IF ; ==> ; (TYPEP #:G1 'CL-POSTGRES-ERROR:CHECK-VIOLATION) ; ; note: can't open-code test of unknown type CL-POSTGRES-ERROR:CHECK-VIOLATION ; processing (DEFUN DATABASE-ERROR-EXTRACT-NAME ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/errors.lisp ; in: DEFUN DATABASE-ERROR-EXTRACT-NAME ; (TYPECASE CL-POSTGRES::ERR ; (CL-POSTGRES-ERROR:INVALID-SQL-STATEMENT-NAME ; (CL-POSTGRES::EXTRACT-QUOTED-PART CL-POSTGRES::MESSAGE 0)) ; (CL-POSTGRES-ERROR:DUPLICATE-PREPARED-STATEMENT ; (CL-POSTGRES::EXTRACT-QUOTED-PART CL-POSTGRES::MESSAGE 0))) ; --> COND IF ; ==> ; (TYPEP #:G1 'CL-POSTGRES-ERROR:INVALID-SQL-STATEMENT-NAME) ; ; note: can't open-code test of unknown type CL-POSTGRES-ERROR:INVALID-SQL-STATEMENT-NAME ; --> COND IF IF ; ==> ; (TYPEP #:G1 'CL-POSTGRES-ERROR:DUPLICATE-PREPARED-STATEMENT) ; ; note: can't open-code test of unknown type CL-POSTGRES-ERROR:DUPLICATE-PREPARED-STATEMENT ; 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 "08000" ...) ; processing (DEFERROR "08003" ...) ; processing (DEFERROR "08006" ...) ; processing (DEFERROR "08001" ...) ; processing (DEFERROR "08004" ...) ; processing (DEFERROR "08007" ...) ; processing (DEFERROR "08P01" ...) ; processing (DEFERROR "0A" ...) ; processing (DEFERROR "22" ...) ; processing (DEFERROR "22012" ...) ; processing (DEFERROR "22021" ...) ; 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 "26000" ...) ; 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 "42704" ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/cl-postgres/errors-tmpDNAAZUQ1.fasl ; compilation finished in 0:00:00.056 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/data-types.lisp" (written 13 NOV 2021 10:17:16 AM): ; processing (IN-PACKAGE :CL-POSTGRES) ; processing (DEFUN INT64-TO-VECTOR ...) ; processing (DEFUN INT32-TO-VECTOR ...) ; processing (DEFUN INT16-TO-VECTOR ...) ; processing (DEFUN INT8-TO-VECTOR ...) ; processing (DEFUN INT-TO-VECTOR ...) ; processing (DEFUN GET-INT-SIZE ...) ; processing (DEFUN INT2P ...) ; processing (DEFUN INT4P ...) ; processing (DEFUN INT8P ...) ; processing (DEFTYPE INT2 ...) ; processing (DEFTYPE INT4 ...) ; processing (DEFTYPE INT8 ...) ; processing (DEFUN UUID-TO-BYTE-ARRAY ...) ; processing (DEFUN UUIP-P ...) ; processing (DEFTYPE UUID-STRING ...) ; processing (DEFUN TEXT-ARRAY-P ...) ; processing (DEFUN INT2-ARRAY-P ...) ; processing (DEFUN INT4-ARRAY-P ...) ; processing (DEFUN INT8-ARRAY-P ...) ; processing (DEFTYPE TEXT-ARRAY ...) ; processing (DEFTYPE INT2-ARRAY ...) ; processing (DEFTYPE INT4-ARRAY ...) ; processing (DEFTYPE INT8-ARRAY ...) ; processing (DEFUN PARAM-TO-OID ...) ; processing (DEFUN TYPES-MATCH-P ...) ; processing (DEFUN OID-TYPES-MATCH-P ...) ; processing (DEFUN PARAMETER-LIST-TYPES ...) ; processing (DEFUN PARAMETER-LISTS-MATCH-OID-TYPES-P ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/cl-postgres/data-types-tmpSFHGUSI2.fasl ; compilation finished in 0:00:00.116 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/sql-string.lisp" (written 13 NOV 2021 10:17:16 AM): ; processing (IN-PACKAGE :CL-POSTGRES) ; processing (DEFUN ESCAPE-BYTES ...) ; processing (DEFUN WRITE-RATIO-AS-FLOATING-POINT ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/sql-string.lisp ; in: DEFUN WRITE-RATIO-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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; Eliminate %negate/%negate of rationals ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (TRUNCATE ; (IF (< NUMBER 0) ; (PROGN (WRITE-CHAR #\- STREAM) (- NUMBER)) ; NUMBER)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; (ZEROP CL-POSTGRES::REMAINDER) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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 FLOAT (RATIONAL (-1) (1))), 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT. ; ; note: unable to ; convert x*2^k to shift ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a INTEGER. ; ; note: unable to ; associate */(* /) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a RATIONAL. ; (FLOOR (* CL-POSTGRES::REMAINDER 10)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-10) (10))), not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-10) (10))), not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-10) (10))), not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-10) (10))), not a FLOAT. ; (< NUMBER 0) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (- NUMBER) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline float arithmetic (cost 1) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (* CL-POSTGRES::REMAINDER 10) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL #1=(-1) #2=(1))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #3=(-10) #4=(10))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (SIGNED-BYTE ; 64) ; . #5#). ; etc. ; (FLOOR (* CL-POSTGRES::REMAINDER 10)) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (OR FLOAT (RATIONAL #1=(-10) #2=(10))), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL #1=(-1) #2=(1))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #3=(0) #4=(2))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; etc. ; (CL-POSTGRES::FAIL NIL ; (UNLESS CL-POSTGRES::SILENTLY-TRUNCATE? ; (RESTART-CASE (ERROR 'CL-POSTGRES:DATABASE-ERROR :MESSAGE ; (FORMAT NIL ; "Can not write the ratio ~A as a floating point number with only ~A available digits. You may want to (setf ~S t) if you don't mind the loss of precision." ; NUMBER CL-POSTGRES::DIGIT-LENGTH-LIMIT ; 'CL-POSTGRES:*SILENTLY-TRUNCATE-RATIOS*)) ; (CONTINUE NIL :REPORT (LAMBDA # #) (SETF #)) ; (CL-POSTGRES::DISABLE-ASSERTION NIL :REPORT (LAMBDA # #) (SETF #) ; (SETF #))))) ; ; note: Return type not fixed values, so can't use known return convention: ; * ; processing (DEFUN WRITE-QUOTED ...) ; processing (DEFGENERIC TO-SQL-STRING ...) ; processing (DEFGENERIC SERIALIZE-FOR-POSTGRES ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/cl-postgres/sql-string-tmpJEMJHCAQ.fasl ; compilation finished in 0:00:00.104 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/trivial-utf-8.lisp" (written 13 NOV 2021 10:17:16 AM): ; processing (IN-PACKAGE :CL-POSTGRES-TRIVIAL-UTF-8) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/trivial-utf-8.lisp ; in: DEFUN UTF-8-BYTES-TO-STRING ; (COERCE CL-POSTGRES-TRIVIAL-UTF-8::BYTES-IN ; '(SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (AND VECTOR ; (NOT ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; . #1=((*))))), not a (SIMPLE-ARRAY * . #1#). ; processing (DEFUN READ-UTF-8-STRING ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/cl-postgres/trivial-utf-8-tmpJV5SBQ61.fasl ; compilation finished in 0:00:00.204 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/strings-utf-8.lisp" (written 13 NOV 2021 10:17:16 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 ; :STOP-AT-EOF T :BYTE-LENGTH ; CL-POSTGRES::BYTE-LENGTH)) ; --> 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)) ; (BLOCK CL-POSTGRES::ENC-READ-STRING ; (CL-POSTGRES-TRIVIAL-UTF-8:READ-UTF-8-STRING CL-POSTGRES::INPUT ; :NULL-TERMINATED ; CL-POSTGRES::NULL-TERMINATED ; :STOP-AT-EOF T ; :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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/cl-postgres/strings-utf-8-tmpFHSB04A0.fasl ; compilation finished in 0:00:00.024 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/communicate.lisp" (written 13 NOV 2021 10:17:16 AM): ; processing (IN-PACKAGE :CL-POSTGRES) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-POSTGRES::READ-INT8 ; (CL-POSTGRES::SOCKET) ; (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 (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 (INTEGER-WRITER 8) ; 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 <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a FIXNUM. ; processing (DEFUN SKIP-BYTES ...) ; processing (DEFUN SKIP-STR ...) ; processing (DEFUN ENSURE-SOCKET-IS-CLOSED ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/cl-postgres/communicate-tmpQQZWJZI3.fasl ; compilation finished in 0:00:00.076 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp" (written 13 NOV 2021 10:17:16 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::APPLICATION-NAME) ; (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*) ; (STRING "application_name") ; ...) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK ; --> LET CL-POSTGRES::WRITE-UINT4 + ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; ; note: forced to do full call ; 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 (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The second argument is a NUMBER, not a (UNSIGNED-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)) ; --> 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; 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 ...) ; --> LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE AREF ; ==> ; 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))) ; --> 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; 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)) ; --> 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 SCRAM-TYPE-MESSAGE ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp ; in: DEFINE-MESSAGE SCRAM-TYPE-MESSAGE ; (CL-POSTGRES::DEFINE-MESSAGE CL-POSTGRES::SCRAM-TYPE-MESSAGE ; #\p ; (CL-POSTGRES::CLIENT-INITIAL-MESSAGE) ; (STRING "SCRAM-SHA-256") ; (CL-POSTGRES::UINT 4 ; (CL-POSTGRES::ENC-BYTE-LENGTH CL-POSTGRES::CLIENT-INITIAL-MESSAGE)) ; (CL-POSTGRES::BYTES ; (CL-POSTGRES-TRIVIAL-UTF-8:STRING-TO-UTF-8-BYTES ; CL-POSTGRES::CLIENT-INITIAL-MESSAGE))) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK ; --> LET CL-POSTGRES::WRITE-UINT4 + ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER 9 4611686018427387909), not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The second argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: doing signed word to integer coercion (cost 20) ; processing (DEFINE-MESSAGE SCRAM-CONT-MESSAGE ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp ; in: DEFINE-MESSAGE SCRAM-CONT-MESSAGE ; (CL-POSTGRES::DEFINE-MESSAGE CL-POSTGRES::SCRAM-CONT-MESSAGE ; #\p ; (CL-POSTGRES::FINAL-MESSAGE) ; (CL-POSTGRES::BYTES ; (CL-POSTGRES-TRIVIAL-UTF-8:STRING-TO-UTF-8-BYTES ; CL-POSTGRES::FINAL-MESSAGE))) ; --> 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)) ; --> 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; 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)) ; --> 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; 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)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK ; --> LET CL-POSTGRES::WRITE-UINT4 + ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; 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 (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The second argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFUN PARSE-MESSAGE-BINARY-PARAMETERS ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/messages.lisp ; in: DEFUN PARSE-MESSAGE-BINARY-PARAMETERS ; (LENGTH CL-POSTGRES::PARAMETERS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (+ 8 (* CL-POSTGRES::LEN 4) (CL-POSTGRES::ENC-BYTE-LENGTH CL-POSTGRES::QUERY) ; (CL-POSTGRES::ENC-BYTE-LENGTH CL-POSTGRES::NAME)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER 8 18446744073709551608), not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The second argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; 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 (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The second argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: doing unsigned word to integer coercion (cost 20) ; 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)) ; --> 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; 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 ...) ; --> LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE AREF ; ==> ; 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. ; --> LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE ; ==> ; (+ CL-POSTGRES::POS 2) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (INTEGER 3 3) (INTEGER 7 7) (INTEGER 11 11) ; (INTEGER 15) (INTEGER 13 13) (INTEGER 9 9) ; (INTEGER 5 5) (INTEGER 1 1)), not a FIXNUM. ; The result is a (VALUES ; (OR (INTEGER 3 3) (INTEGER 7 7) (INTEGER 11 11) ; (INTEGER 15) (INTEGER 13 13) (INTEGER 9 9) ; (INTEGER 5 5)) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (INTEGER 3 3) (INTEGER 7 7) (INTEGER 11 11) ; (INTEGER 15) (INTEGER 13 13) (INTEGER 9 9) ; (INTEGER 5 5) (INTEGER 1 1)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES ; (OR (INTEGER 3 3) (INTEGER 7 7) (INTEGER 11 11) ; (INTEGER 15) (INTEGER 13 13) (INTEGER 9 9) ; (INTEGER 5 5)) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; 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 GO-BINARY-LIST-P ...) ; processing (DEFUN GO-BINARY-P ...) ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (LOOP :FOR FORMAT :ACROSS CL-POSTGRES::RESULT-FORMATS ; :DO (CL-POSTGRES::WRITE-UINT2 CL-POSTGRES::SOCKET ; (IF FORMAT ; 1 ; 0))) ; --> LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE AREF ; ==> ; 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. ; (+ 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 full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; 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 (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; etc. ; (LOOP :FOR CL-POSTGRES::SIZE :OF-TYPE FIXNUM :ACROSS CL-POSTGRES::PARAM-SIZES ; :SUM CL-POSTGRES::SIZE) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; 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)) ; --> 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; 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)) ; --> 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; etc. ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/cl-postgres/messages-tmpPHMA69WA.fasl ; compilation finished in 0:00:00.168 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/ieee-floats.lisp" (written 13 NOV 2021 10:17:16 AM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/cl-postgres/ieee-floats-tmpXFTEJBZU.fasl ; compilation finished in 0:00:00.032 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/interpret.lisp" (written 13 NOV 2021 10:17:16 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::BINARY-READER LAMBDA FUNCTION ; ==> ; (CL-POSTGRES::ENC-READ-STRING #:G0 :BYTE-LENGTH (- #:G1 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::BINARY-READER LAMBDA FUNCTION ; ==> ; (CL-POSTGRES::ENC-READ-STRING #:G0 :BYTE-LENGTH (- #:G1 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::BINARY-READER LAMBDA FUNCTION ; ==> ; (CL-POSTGRES::ENC-READ-STRING #:G0 :BYTE-LENGTH (- #:G1 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:+JSON+ ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/interpret.lisp ; in: DEFINE-INTERPRETER CL-POSTGRES-OID:+JSON+ ; (CL-POSTGRES::DEFINE-INTERPRETER CL-POSTGRES-OID:+JSON+ ; "json" ; STRING) ; --> CL-POSTGRES:SET-SQL-READER CL-POSTGRES::BINARY-READER LAMBDA FUNCTION ; ==> ; (CL-POSTGRES::ENC-READ-STRING #:G0 :BYTE-LENGTH (- #:G1 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:+JSONB+ ...) ; processing (DEFUN READ-ROW-VALUE ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/interpret.lisp ; in: DEFUN READ-ROW-VALUE ; (DEFUN CL-POSTGRES::READ-ROW-VALUE (STREAM CL-POSTGRES::SIZE) ; (DECLARE (TYPE STREAM STREAM) ; (TYPE INTEGER CL-POSTGRES::SIZE)) ; (LET ((CL-POSTGRES::NUM-FIELDS (CL-POSTGRES::READ-UINT4 STREAM))) ; (LOOP CL-POSTGRES::FOR CL-POSTGRES::I CL-POSTGRES::BELOW CL-POSTGRES::NUM-FIELDS ; CL-POSTGRES::COLLECT (LET (# #) ; (DECLARE #) ; (IF # ; :NULL ; #))))) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-POSTGRES::READ-ROW-VALUE ; (STREAM CL-POSTGRES::SIZE) ; (DECLARE (TYPE STREAM STREAM) ; (TYPE INTEGER CL-POSTGRES::SIZE)) ; (BLOCK CL-POSTGRES::READ-ROW-VALUE ; (LET ((CL-POSTGRES::NUM-FIELDS #)) ; (LOOP CL-POSTGRES::FOR CL-POSTGRES::I CL-POSTGRES::BELOW CL-POSTGRES::NUM-FIELDS ; CL-POSTGRES::COLLECT (LET # ; # ; #))))) ; ; caught STYLE-WARNING: ; The variable SIZE is defined but never used. ; 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 ; (DEFUN CL-POSTGRES::READ-BINARY-ARRAY-VALUE (STREAM CL-POSTGRES::SIZE) ; (DECLARE (TYPE STREAM STREAM) ; (TYPE INTEGER CL-POSTGRES::SIZE)) ; (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* # ; #))))) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-POSTGRES::READ-BINARY-ARRAY-VALUE ; (STREAM CL-POSTGRES::SIZE) ; (DECLARE (TYPE STREAM STREAM) ; (TYPE INTEGER CL-POSTGRES::SIZE)) ; (BLOCK CL-POSTGRES::READ-BINARY-ARRAY-VALUE ; (LET ((CL-POSTGRES::NUM-DIMS #) ; (CL-POSTGRES::HAS-NULL #) ; (CL-POSTGRES::ELEMENT-TYPE #)) ; (COND (# NIL) (T #))))) ; ; caught STYLE-WARNING: ; The variable SIZE is defined but never used. ; (CL-POSTGRES::HAS-NULL (CL-POSTGRES::READ-UINT4 STREAM)) ; ; 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 (DEFUN DEFAULT-DATE-READER ...) ; processing (DEFUN DEFAULT-TIMESTAMP-READER ...) ; processing (DEFUN DEFAULT-INTERVAL-READER ...) ; processing (DEFUN DEFAULT-TIME-READER ...) ; 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 ; (STRING= CL-POSTGRES::WORD "NULL") ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR SIMPLE-BASE-STRING ; (SIMPLE-ARRAY CHARACTER ; . #1=((*)))), not a (SIMPLE-ARRAY CHARACTER ; . #1#). ; (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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/cl-postgres/interpret-tmpXHDS9JD.fasl ; compilation finished in 0:00:00.188 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/saslprep.lisp" (written 13 NOV 2021 10:17:16 AM): ; processing (IN-PACKAGE :CL-POSTGRES) ; processing (DEFVAR *PRINTABLE-ASCII-CHARS* ...) ; processing (DEFINE-CONDITION BAD-CHAR-ERROR ...) ; processing (DEFMETHOD PRINT-OBJECT ...) ; processing (DEFUN BAD-CHAR-ERROR ...) ; processing (DEFUN CHAR-PRINTABLE-ASCII-P ...) ; processing (DEFUN STRING-PRINTABLE-ASCII-P ...) ; processing (DEFUN CODE-POINT-PRINTABLE-ASCII-P ...) ; processing (DEFUN CHAR-MAPPED-TO-NOTHING-P ...) ; processing (DEFUN CHAR-MAPPED-TO-SPACE-P ...) ; processing (DEFUN STRING-MAPPED-TO-NOTHING ...) ; processing (DEFUN STRING-MAPPED-TO-SPACE ...) ; processing (DEFUN SASLPREP-NORMALIZE ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/cl-postgres/saslprep-tmp7DVUZNNP.fasl ; compilation finished in 0:00:00.040 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/scram.lisp" (written 13 NOV 2021 10:17:16 AM): ; processing (IN-PACKAGE :CL-POSTGRES) ; processing (DEFTYPE OCTET ...) ; processing (DEFTYPE OCTET-VECTOR ...) ; processing (DEFTYPE INDEX ...) ; processing (DECLAIM (FTYPE # ...) ...) ; processing (DEFUN MAKE-OCTET-VECTOR ...) ; processing (DEFUN PAD-OCTET-VECTOR ...) ; processing (DEFUN GEN-CLIENT-NONCE ...) ; processing (DEFUN GEN-CLIENT-INITIAL-RESPONSE ...) ; processing (DEFUN GEN-SALTED-PASSWORD ...) ; processing (DEFUN SPLIT-SERVER-RESPONSE ...) ; processing (DEFUN VALIDATE-SERVER-NONCE ...) ; processing (DEFUN PARSE-SCRAM-SERVER-FIRST-RESPONSE ...) ; file: /usr/share/common-lisp/source/postmodern/cl-postgres/scram.lisp ; in: DEFUN PARSE-SCRAM-SERVER-FIRST-RESPONSE ; (CL-POSTGRES::SERVER-NONCE-VALIDATED ; (CL-POSTGRES::VALIDATE-SERVER-NONCE CL-POSTGRES::SERVER-NONCE ; CL-POSTGRES::CLIENT-NONCE)) ; ; caught STYLE-WARNING: ; The variable SERVER-NONCE-VALIDATED is defined but never used. ; processing (DEFUN GEN-CLIENT-KEY ...) ; processing (DEFUN GEN-STORED-KEY ...) ; processing (DEFUN GEN-AUTH-MESSAGE ...) ; processing (DEFUN GEN-CLIENT-SIGNATURE ...) ; processing (DEFUN GEN-CLIENT-PROOF ...) ; processing (DEFUN GET-SERVER-KEY ...) ; processing (DEFUN GET-SERVER-SIGNATURE ...) ; processing (DEFUN GEN-FINAL-MESSAGE-PART-1 ...) ; processing (DEFUN GEN-FINAL-MESSAGE ...) ; processing (DEFUN AGGREGATED-GEN-FINAL-CLIENT-MESSAGE ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/cl-postgres/scram-tmpSLELCKLF.fasl ; compilation finished in 0:00:00.060 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/protocol.lisp" (written 13 NOV 2021 10:17:16 AM): ; processing (IN-PACKAGE :CL-POSTGRES) ; processing (DEFINE-CONDITION PROTOCOL-ERROR ...) ; processing (DEFPARAMETER *CONNECTION-PARAMS* ...) ; processing (DEFPARAMETER *SSL-CERTIFICATE-FILE* ...) ; processing (DEFPARAMETER *SSL-KEY-FILE* ...) ; processing (DEFMACRO MESSAGE-CASE ...) ; processing (DEFUN UPDATE-PARAMETER ...) ; processing (DEFUN UPDATE-BACKEND-KEY-DATA ...) ; 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 (LET (#) ...) ; processing (DEFUN AUTHENTICATE ...) ; processing (DEFGENERIC FIELD-NAME ...) ; processing (DEFGENERIC FIELD-TYPE ...) ; 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 NULL SIMPLE-VECTOR), 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) ; ...)) ; --> MULTIPLE-VALUE-PROG1 WHEN IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; *QUERY-CALLBACK* 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) ; (IF CL-POSTGRES::BINARY-PARAMETERS-P ; (CL-POSTGRES::PARSE-MESSAGE-BINARY-PARAMETERS CL-POSTGRES::SOCKET ; CL-POSTGRES::NAME ; CL-POSTGRES::QUERY ; CL-POSTGRES::PARAMETERS) ; (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))) ; --> MULTIPLE-VALUE-PROG1 WHEN IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; *QUERY-CALLBACK* 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 NULL SIMPLE-VECTOR), 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/cl-postgres/protocol-tmpRFCZGW36.fasl ; compilation finished in 0:00:00.208 ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/public.lisp" (written 13 NOV 2021 10:17:16 AM): ; processing (IN-PACKAGE :CL-POSTGRES) ; processing (DEFGENERIC CONNECTION-PORT ...) ; processing (DEFGENERIC CONNECTION-DB ...) ; processing (DEFGENERIC CONNECTION-PARAMETERS ...) ; processing (DEFCLASS DATABASE-CONNECTION ...) ; processing (DEFUN GET-POSTGRESQL-VERSION ...) ; processing (DEFUN POSTGRESQL-VERSION-AT-LEAST ...) ; processing (DEFUN CONNECTION-META ...) ; processing (DEFUN CONNECTION-PID ...) ; processing (DEFUN USE-BINARY-PARAMETERS ...) ; processing (DEFUN DATABASE-OPEN-P ...) ; processing (DEFUN OPEN-DATABASE ...) ; processing (PROGN (DEFPARAMETER *UNIX-SOCKET-DIR* ...) ...) ; 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-ERROR:PROTOCOL-VIOLATION (CL-POSTGRES::ERR) ; (SETF CL-POSTGRES::FINISHED T) ; (CL-POSTGRES::ENSURE-SOCKET-IS-CLOSED CL-POSTGRES::SOCKET) ; (INCF CL-POSTGRES::CONNECTION-ATTEMPTS) ; (WHEN (< CL-POSTGRES::CONNECTION-ATTEMPTS CL-POSTGRES:*RETRY-CONNECT-TIMES*) ; (CL-POSTGRES::INITIATE-CONNECTION CL-POSTGRES::CONN ; CL-POSTGRES::CONNECTION-ATTEMPTS))) ; ; caught STYLE-WARNING: ; The variable ERR is defined but never used. ; (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 FIND-POSTGRESQL-PREPARED-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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/cl-postgres/public-tmpQPTRRFAI.fasl ; compilation finished in 0:00:00.204 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/postmodern/cl-postgres/bulk-copy.lisp" (written 13 NOV 2021 10:17:16 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/cl-postgres/bulk-copy-tmpVZ9V8GEH.fasl ; compilation finished in 0:00:00.068 ; compiling file "/usr/share/common-lisp/source/postmodern/s-sql/package.lisp" (written 13 NOV 2021 10:17:16 AM): ; processing (DEFPACKAGE :S-SQL ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/s-sql/package-tmpI0YDSDVA.fasl ; compilation finished in 0:00:00.000 ; compiling file "/usr/share/common-lisp/source/postmodern/s-sql/config.lisp" (written 13 NOV 2021 10:17:16 AM): ; processing (IN-PACKAGE :S-SQL) ; processing (DEFPARAMETER *POSTGRES-RESERVED-WORDS* ...) ; processing (DEFPARAMETER *ESCAPE-SQL-NAMES-P* ...) ; processing (DEFVAR *DOWNCASE-SYMBOLS* ...) ; processing (DEFPARAMETER *STANDARD-SQL-STRINGS* ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/s-sql/config-tmpKLR0OPN5.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/postmodern/s-sql/s-sql.lisp" (written 13 NOV 2021 10:17:16 AM): ; 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 (DEFUN TO-SQL-NAME ...) ; file: /usr/share/common-lisp/source/postmodern/s-sql/s-sql.lisp ; in: DEFUN TO-SQL-NAME ; (STRING (CADR S-SQL::NAME)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING S-SQL::NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (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 (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 :ASC ...) ; 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 :ARRAY[] ...) ; processing (DEF-SQL-OP :[] ...) ; processing (DEF-SQL-OP :INTERVAL ...) ; processing (DEF-SQL-OP :CURRENT-DATE ...) ; processing (DEF-SQL-OP :CURRENT-TIMESTAMP ...) ; processing (DEF-SQL-OP :CURRENT-TIME ...) ; processing (DEF-SQL-OP :LOCAL-TIMESTAMP ...) ; processing (DEF-SQL-OP :LOCAL-TIME ...) ; processing (DEF-SQL-OP :TIMESTAMP ...) ; processing (DEF-SQL-OP :MAKE-INTERVAL ...) ; processing (DEF-SQL-OP :MAKE-TIMESTAMP ...) ; processing (DEF-SQL-OP :MAKE-TIMESTAMPTZ ...) ; processing (DEF-SQL-OP :AGE ...) ; processing (DEF-SQL-OP :DATE ...) ; processing (DEF-SQL-OP :INTEGER ...) ; processing (DEF-SQL-OP :CAST ...) ; processing (DEF-SQL-OP :EXISTS ...) ; processing (DEF-SQL-OP :IS-TRUE ...) ; processing (DEF-SQL-OP :IS-FALSE ...) ; 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 :VALUES ...) ; processing (DEFINE-CONDITION MALFORMED-COMPOSITE-TYPE-ERROR ...) ; processing (DEFUN CONS-TO-SQL-NAME-STRINGS ...) ; processing (DEF-SQL-OP :COUNT ...) ; processing (DEF-SQL-OP :AVG ...) ; processing (DEF-SQL-OP :SUM ...) ; processing (DEF-SQL-OP :MAX ...) ; processing (DEF-SQL-OP :MIN ...) ; processing (DEF-SQL-OP :EVERY ...) ; processing (DEF-SQL-OP :PERCENTILE-CONT ...) ; processing (DEF-SQL-OP :PERCENTILE-DIST ...) ; processing (DEF-SQL-OP :CORR ...) ; processing (DEF-SQL-OP :COVAR-POP ...) ; processing (DEF-SQL-OP :COVAR-SAMP ...) ; processing (DEF-SQL-OP :BETWEEN ...) ; processing (DEF-SQL-OP :BETWEEN-SYMMETRIC ...) ; processing (DEF-SQL-OP :CASE ...) ; processing (DEF-SQL-OP :SET ...) ; processing (DEF-SQL-OP :EMPTY-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 :GROUPING-SETS ...) ; processing (DEF-SQL-OP :STRING-AGG ...) ; processing (DEF-SQL-OP :ARRAY-AGG ...) ; processing (DEF-SQL-OP :MODE ...) ; processing (DEF-SQL-OP :REGR-AVGX ...) ; processing (DEF-SQL-OP :REGR-AVGY ...) ; processing (DEF-SQL-OP :REGR-COUNT ...) ; processing (DEF-SQL-OP :REGR-INTERCEPT ...) ; processing (DEF-SQL-OP :REGR-R2 ...) ; processing (DEF-SQL-OP :REGR-SLOPE ...) ; processing (DEF-SQL-OP :REGR-SXX ...) ; processing (DEF-SQL-OP :REGR-SXY ...) ; processing (DEF-SQL-OP :REGR-SYY ...) ; processing (DEF-SQL-OP :STDDEV ...) ; processing (DEF-SQL-OP :STDDEV-POP ...) ; processing (DEF-SQL-OP :STDDEV-SAMP ...) ; processing (DEF-SQL-OP :VARIANCE ...) ; processing (DEF-SQL-OP :VAR-POP ...) ; processing (DEF-SQL-OP :VAR-SAMP ...) ; processing (DEF-SQL-OP :FETCH ...) ; 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 :RANGE-BETWEEN ...) ; processing (DEF-SQL-OP :ROWS-BETWEEN ...) ; 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-INTERVAL ...) ; processing (DEFUN EXPAND-FOREIGN-ON* ...) ; processing (DEFUN %BUILD-FOREIGN-REFERENCE ...) ; processing (DEFUN EXPAND-TABLE-CONSTRAINT ...) ; processing (DEFUN EXPAND-TABLE-CONSTRAINT-SOK ...) ; processing (DEFUN EXPAND-EXTENDED-TABLE-CONSTRAINT ...) ; processing (DEFUN EXPAND-IDENTITY ...) ; processing (DEFUN EXPAND-TABLE-COLUMN ...) ; processing (DEFUN EXPAND-COMPOSITE-TABLE-NAME ...) ; processing (DEFUN EXPAND-TABLE-NAME ...) ; processing (DEF-SQL-OP :CREATE-COMPOSITE-TYPE ...) ; processing (DEF-SQL-OP :CREATE-TABLE ...) ; processing (DEF-SQL-OP :CREATE-EXTENDED-TABLE ...) ; processing (DEFUN ALTER-TABLE-COLUMN ...) ; 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 (DEF-SQL-OP :TRUNCATE ...) ; processing (DEFUN QUOTED-NAME-P ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/s-sql/s-sql-tmpQNILNMER.fasl ; compilation finished in 0:00:01.536 ; compiling file "/usr/share/common-lisp/source/global-vars/global-vars.lisp" (written 12 OCT 2014 01:27:12 PM): ; processing (DEFPACKAGE #:GLOBAL-VARS ...) ; processing (IN-PACKAGE #:GLOBAL-VARS) ; processing (SETF (DOCUMENTATION # ...) ...) ; processing (SETF (DOCUMENTATION # ...) ...) ; processing (SETF (DOCUMENTATION # ...) ...) ; processing (SETF (DOCUMENTATION # ...) ...) ; processing (DEFMACRO STORE-IN-SYMBOL-PLIST ...) ; processing (DEFCONSTANT +VALUE-KEY+ ...) ; processing (PROGN (DEFMACRO DEFINE-GLOBAL-VAR ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/global-vars/global-vars-tmpMAMO3XGR.fasl ; compilation finished in 0:00:00.020 ; compiling file "/usr/share/common-lisp/source/closer-mop/closer-mop-packages.lisp" (written 26 FEB 2022 01:32:44 PM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE #:CLOSER-MOP ...) ; processing (IN-PACKAGE :CLOSER-MOP) ; processing (MACROLET (#) ...) ; processing (DEFPACKAGE #:CLOSER-COMMON-LISP-USER ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/closer-mop/closer-mop-packages-tmp4CBIDXQU.fasl ; compilation finished in 0:00:00.032 ; compiling file "/usr/share/common-lisp/source/closer-mop/closer-mop-shared.lisp" (written 26 FEB 2022 01:32:44 PM): ; processing (IN-PACKAGE :CLOSER-MOP) ; processing (DEFUN REQUIRED-ARGS ...) ; processing (DEFUN ENSURE-FINALIZED ...) ; processing (DEFUN SUBCLASSP ...) ; processing (PROGN (DEFCLASS STANDARD-GENERIC-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: ; * ; in: DEFUN GET-EMF ; (SUBSEQ CLOSER-MOP::ARGS 0 CLOSER-MOP::NOF-REQUIRED-ARGS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE. ; in: DEFUN ONLY-STANDARD-METHODS ; (TYPEP CLOSER-MOP::GF SB-MOP:SPECIALIZER) ; ; note: unable to optimize because: can't open-code test of non-constant type ; (EQL (SB-MOP:EQL-SPECIALIZER-OBJECT SB-MOP:SPECIALIZER) CLOSER-MOP::GF) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a T, not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a T, not a (UNSIGNED-BYTE 64). ; etc. ; in: DEFUN METHODS-ALL-THE-SAME-SPECIALIZERS ; (EQL (SB-MOP:EQL-SPECIALIZER-OBJECT CLOSER-MOP::SPEC1) ; (SB-MOP:EQL-SPECIALIZER-OBJECT CLOSER-MOP::SPEC2)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a T, not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a T, not a (UNSIGNED-BYTE 64). ; etc. ; in: DEFUN COMPUTE-DISCRIMINATOR ; (TYPEP CLOSER-MOP::ARG CLOSER-MOP::SPEC) ; ; note: unable to optimize because: can't open-code test of non-constant type ; (EQL CLOSER-MOP::ARG (SB-MOP:EQL-SPECIALIZER-OBJECT CLOSER-MOP::SPEC)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; (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 ; ; 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 full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a T, not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a T, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFUN ENSURE-METHOD ...) ; processing (DEFVAR *STANDARD-SLOT-KEYS* ...) ; processing (DEFUN FIX-SLOT-INITARGS ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/closer-mop/closer-mop-shared-tmp4M6Z7O9T.fasl ; compilation finished in 0:00:00.108 ; compiling file "/usr/share/common-lisp/source/closer-mop/closer-sbcl.lisp" (written 26 FEB 2022 01:32:44 PM): ; processing (IN-PACKAGE :CLOSER-MOP) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/closer-mop/closer-sbcl-tmp3RKO0O0S.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/package.lisp" (written 13 NOV 2021 10:17:16 AM): ; processing (DEFPACKAGE :POSTMODERN ...) ; processing (IN-PACKAGE :POSTMODERN) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/postmodern/package-tmpJNADND61.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/config.lisp" (written 13 NOV 2021 10:17:16 AM): ; processing (IN-PACKAGE :POSTMODERN) ; processing (DEFVAR *MAX-POOL-SIZE* ...) ; processing (DEFPARAMETER *DEFAULT-USE-SSL* ...) ; processing (DEFPARAMETER *SCHEMA-PATH* ...) ; processing (DEFPARAMETER *TRANSACTION-LEVEL* ...) ; processing (DEFPARAMETER *ISOLATION-LEVEL* ...) ; processing (DEFPARAMETER *ALLOW-OVERWRITING-PREPARED-STATEMENTS* ...) ; processing (DEFPARAMETER *ENFORCE-PARAMETER-TYPES* ...) ; processing (DEFPARAMETER *RESULT-STYLES* ...) ; processing (DEFPARAMETER *CHARACTER-SETS* ...) ; processing (DEFPARAMETER *COLLATIONS* ...) ; processing (DEFPARAMETER *CUSTOM-COLUMN-WRITERS* ...) ; processing (DEFPARAMETER *IGNORE-UNKNOWN-COLUMNS* ...) ; processing (DEFPARAMETER *ALTER-ALL-DEFAULT-SELECT-PRIVILEGES* ...) ; processing (DEFPARAMETER *ALTER-ALL-DEFAULT-EDITOR-PRIVILEGES* ...) ; processing (DEFPARAMETER *EXECUTE-PRIVILEGES-LIST* ...) ; processing (DEFPARAMETER *DISALLOWED-ROLE-NAMES* ...) ; processing (DEFPARAMETER +JSON-LISP-SYMBOL-TOKENS+ ...) ; processing (DEFVAR *JSON-SYMBOLS-PACKAGE* ...) ; processing (DEFPARAMETER *JSON-LIST-ENCODER-FN* ...) ; processing (DEFVAR *JSON-IDENTIFIER-NAME-TO-LISP* ...) ; processing (DEFVAR *LISP-IDENTIFIER-NAME-TO-JSON* ...) ; processing (DEFVAR *IDENTIFIER-NAME-TO-KEY* ...) ; processing (DEFVAR *JSON-OUTPUT* ...) ; processing (DEFVAR *JSON-AGGREGATE-CONTEXT* ...) ; processing (DEFVAR *JSON-AGGREGATE-FIRST* ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/postmodern/config-tmpKEV7GFR4.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/connect.lisp" (written 13 NOV 2021 10:17:16 AM): ; processing (IN-PACKAGE :POSTMODERN) ; processing (DEFVAR *CONNECTION-POOLS* ...) ; processing (DEFPARAMETER *DATABASE* ...) ; processing (DEFCLASS POOLED-DATABASE-CONNECTION ...) ; 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 *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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/postmodern/connect-tmp13EJYBWB.fasl ; compilation finished in 0:00:00.068 ; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/json-encoder.lisp" (written 13 NOV 2021 10:17:16 AM): ; processing (IN-PACKAGE :POSTMODERN) ; processing (DEFUN SIMPLE-DATE-DATE-STRING ...) ; processing (DEFUN SIMPLE-DATE-TIMESTAMP-STRING ...) ; processing (DEFUN SIMPLE-DATE-TIME-OF-DAY-STRING ...) ; processing (DEFUN SIMPLE-DATE-INTERVAL-STRING ...) ; processing (DEFUN LOCAL-TIME-TIMESTAMP-STRING ...) ; processing (DEFUN JSON-INTERN ...) ; processing (DEFINE-CONDITION UNKNOWN-SYMBOL-ERROR ...) ; processing (DEFUN UNKNOWN-SYMBOL-ERROR ...) ; processing (DEFUN SAFE-JSON-INTERN ...) ; processing (DEFUN MAP-SLOTS ...) ; processing (DEFINE-CONDITION UNENCODABLE-VALUE-ERROR ...) ; processing (DEFUN UNENCODABLE-VALUE-ERROR ...) ; processing (DEFMACRO WITH-SUBSTITUTE-PRINTED-REPRESENTATION-RESTART ...) ; processing (DEFGENERIC ENCODE-JSON ...) ; processing (DEFUN ENCODE-JSON-TO-STRING ...) ; processing (DEFMETHOD ENCODE-JSON ...) ; processing (DEFMETHOD ENCODE-JSON ...) ; processing (DEFMETHOD ENCODE-JSON ...) ; processing (DEFMETHOD ENCODE-JSON ...) ; processing (DEFMETHOD ENCODE-JSON ...) ; processing (DEFUN NEXT-AGGREGATE-MEMBER ...) ; processing (DEFMACRO WITH-AGGREGATE ...) ; processing (DEFMACRO WITH-ARRAY ...) ; processing (DEFMACRO AS-ARRAY-MEMBER ...) ; processing (DEFUN ENCODE-ARRAY-MEMBER ...) ; processing (DEFUN STREAM-ARRAY-MEMBER-ENCODER ...) ; processing (DEFMACRO WITH-OBJECT ...) ; processing (DEFMACRO AS-OBJECT-MEMBER ...) ; processing (DEFUN ENCODE-OBJECT-MEMBER ...) ; processing (DEFUN STREAM-OBJECT-MEMBER-ENCODER ...) ; processing (DEFUN ENCODE-JSON-LIST-GUESSING-ENCODER ...) ; processing (DEFUN JSON-BOOL ...) ; processing (DEFUN JSON-OR-NULL ...) ; processing (DEFUN ENCODE-JSON-LIST-EXPLICIT-ENCODER ...) ; processing (DEFUN USE-GUESSING-ENCODER ...) ; processing (DEFUN USE-EXPLICIT-ENCODER ...) ; processing (DEFMACRO WITH-LOCAL-ENCODER ...) ; processing (DEFMACRO WITH-GUESSING-ENCODER ...) ; processing (DEFMACRO WITH-EXPLICIT-ENCODER ...) ; processing (DEFMETHOD ENCODE-JSON ...) ; processing (DEFMETHOD ENCODE-JSON ...) ; processing (DEFMETHOD ENCODE-JSON ...) ; processing (DEFMETHOD ENCODE-JSON ...) ; processing (DEFUN ENCODE-JSON-ALIST ...) ; processing (DEFUN ENCODE-JSON-ALIST-TO-STRING ...) ; processing (DEFUN ENCODE-JSON-PLIST ...) ; processing (DEFUN ENCODE-JSON-PLIST-TO-STRING ...) ; processing (DEFUN WRITE-JSON-STRING ...) ; processing (DEFUN WRITE-JSON-CHARS ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL) ...) ; processing (DEFUN WRITE-JSON-NUMBER ...) ; processing (DEFUN SIMPLIFIED-CAMEL-CASE-TO-LISP ...) ; processing (DEFUN CAMEL-CASE-SPLIT ...) ; processing (DEFUN CAMEL-CASE-TRANSFORM-ALL-CAPS ...) ; processing (DEFUN CAMEL-CASE-TRANSFORM ...) ; processing (DEFUN CAMEL-CASE-TO-LISP ...) ; processing (DEFUN LISP-TO-CAMEL-CASE ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/postmodern/json-encoder-tmp93YER753.fasl ; compilation finished in 0:00:00.184 ; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/query.lisp" (written 13 NOV 2021 10:17:16 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 JSON-ROW-READER ...) ; processing (DEF-ROW-READER JSON-ROW-ARRAY-READER ...) ; processing (DEF-ROW-READER ARRAY-HASH-ROW-READER ...) ; processing (DEF-ROW-READER COLUMN-ROW-READER ...) ; processing (DEFVAR *CLASS-FINALIZE-LOCK* ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/postmodern/query-tmpB50UYUD7.fasl ; compilation finished in 0:00:00.224 ; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/prepare.lisp" (written 13 NOV 2021 10:17:16 AM): ; processing (IN-PACKAGE :POSTMODERN) ; processing (DEFINE-CONDITION MISMATCHED-PARAMETER-TYPES ...) ; processing (DEFUN ENSURE-PREPARED ...) ; processing (LET (#) ...) ; processing (DEFUN GENERATE-PREPARED ...) ; processing (DEFMACRO PREPARE ...) ; processing (DEFMACRO DEFPREPARED ...) ; processing (DEFMACRO DEFPREPARED-WITH-NAMES ...) ; processing (DEFUN PREPARED-STATEMENT-EXISTS-P ...) ; processing (DEFUN LIST-PREPARED-STATEMENTS ...) ; processing (DEFUN LIST-POSTMODERN-PREPARED-STATEMENTS ...) ; processing (DEFUN FIND-POSTGRESQL-PREPARED-STATEMENT ...) ; processing (DEFUN FIND-POSTGRESQL-PREPARED-STATEMENT-BY-QUERY ...) ; processing (DEFUN FIND-POSTMODERN-PREPARED-STATEMENT ...) ; processing (DEFUN DROP-PREPARED-STATEMENT ...) ; processing (DEFUN RESET-PREPARED-STATEMENT ...) ; processing (DEFUN GET-PID ...) ; processing (DEFUN GET-PID-FROM-POSTMODERN ...) ; processing (DEFUN CANCEL-BACKEND ...) ; processing (DEFUN TERMINATE-BACKEND ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/postmodern/prepare-tmpXO9X6PIG.fasl ; compilation finished in 0:00:00.184 ; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/roles.lisp" (written 13 NOV 2021 10:17:16 AM): ; processing (IN-PACKAGE :POSTMODERN) ; processing (DEFUN LIST-DATABASE-USERS ...) ; processing (DEFUN LIST-ROLES ...) ; processing (DEFUN ROLE-EXISTS-P ...) ; processing (DEFUN REMOVE-WHITESPACE ...) ; processing (DEFUN WHITESPACE-IN-STRING ...) ; processing (DEFUN REVOKE-ALL-ON-TABLE ...) ; processing (DEFUN SCHEMA-PARAMETERS-TO-LIST ...) ; processing (DEFUN DATABASE-PARAMETERS-TO-LIST ...) ; processing (DEFUN GRANT-ADMIN-PERMISSIONS ...) ; processing (DEFUN GRANT-EDITOR-PERMISSIONS ...) ; processing (DEFUN GRANT-READONLY-PERMISSIONS ...) ; processing (DEFUN GRANT-ROLE-PERMISSIONS-HELPER ...) ; processing (DEFUN GRANT-ROLE-PERMISSIONS ...) ; processing (DEFUN CREATE-ROLE-HELPER ...) ; processing (DEFUN CREATE-ROLE ...) ; processing (DEFUN ALTER-ROLE-SEARCH-PATH ...) ; processing (DEFUN DROP-ROLE ...) ; processing (DEFUN LIST-ROLE-PERMISSIONS ...) ; processing (DEFUN CHANGE-PASSWORD ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/postmodern/roles-tmpBULZPU0U.fasl ; compilation finished in 0:00:00.176 ; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/util.lisp" (written 13 NOV 2021 10:17:16 AM): ; processing (IN-PACKAGE :POSTMODERN) ; processing (DEFUN MAKE-KEYWORD ...) ; processing (DEFUN VALID-SQL-CHARACTER-P ...) ; processing (DEFUN CODE-CHAR-0-P ...) ; processing (DEFUN VALID-SQL-IDENTIFIER-P ...) ; processing (DEFUN TO-IDENTIFIER ...) ; processing (DEFUN COALESCE ...) ; processing (DEFUN DATABASE-VERSION ...) ; processing (DEFUN POSTGRESQL-VERSION ...) ; processing (DEFMACRO MAKE-LIST-QUERY ...) ; processing (DEFMACRO MAKE-EXISTS-QUERY ...) ; processing (DEFUN SPLIT-FULLY-QUALIFIED-TABLENAME ...) ; processing (DEFUN POSTGRES-ARRAY-STRING-TO-LIST ...) ; processing (DEFUN POSTGRES-ARRAY-STRING-TO-ARRAY ...) ; processing (DEFUN ADD-COMMENT ...) ; processing (DEFUN FIND-COMMENTS ...) ; processing (DEFINE-CONDITION INVALID-DATABASE-NAME ...) ; processing (DEFUN DATABASE-EXISTS-P ...) ; processing (DEFUN LIST-AVAILABLE-COLLATIONS ...) ; processing (DEFUN COLLATION-EXISTS-P ...) ; processing (DEFUN CHARACTER-SET-EXISTS-P ...) ; processing (DEFUN LIST-TEMPLATES ...) ; processing (DEFUN CREATE-DATABASE ...) ; processing (DEFUN DROP-DATABASE ...) ; processing (DEFUN NUM-RECORDS-IN-DATABASE ...) ; processing (DEFUN CURRENT-DATABASE ...) ; processing (DEFUN DATABASE-SIZE ...) ; processing (DEFUN GET-DATABASE-COMMENT ...) ; processing (DEFUN LIST-DATABASES ...) ; processing (DEFUN LIST-DATABASE-ACCESS-RIGHTS ...) ; processing (DEFUN LIST-ROLE-ACCESSIBLE-DATABASES ...) ; processing (DEFUN GET-SCHEMA-COMMENT ...) ; processing (DEFUN SEQUENCE-NEXT ...) ; processing (DEFUN CREATE-SEQUENCE ...) ; processing (DEFUN DROP-SEQUENCE ...) ; processing (DEFUN LIST-SEQUENCES ...) ; processing (DEFUN SEQUENCE-EXISTS-P ...) ; processing (DEFUN LIST-TABLESPACES ...) ; processing (DEFUN LIST-AVAILABLE-TYPES ...) ; processing (DEFINE-CONDITION INCONSISTENT-SCHEMA-NAME ...) ; processing (DEFUN TABLE-SCHEMA-NAMES ...) ; processing (DEFUN GET-TABLE-COMMENT ...) ; processing (DEFUN GET-ALL-TABLE-COMMENTS ...) ; processing (DEFUN GET-TABLE-OID ...) ; processing (DEFUN TABLE-DESCRIPTION ...) ; processing (DEFUN TABLE-DESCRIPTION-PLUS ...) ; processing (DEFUN TABLE-PARAMETER-HELPER ...) ; processing (DEFUN TABLE-DESCRIPTION-MENU ...) ; processing (DEFUN LIST-ALL-TABLES ...) ; processing (DEFUN LIST-TABLES-IN-SCHEMA ...) ; processing (DEFUN LIST-TABLES ...) ; processing (DEFUN TABLE-EXISTS-P ...) ; processing (DEFUN DROP-TABLE ...) ; processing (DEFUN RENAME-TABLE ...) ; processing (DEFUN LIST-TABLE-SIZES ...) ; processing (DEFUN TABLE-SIZE ...) ; processing (DEFUN GET-COLUMN-COMMENTS ...) ; processing (DEFUN GET-COLUMN-COMMENT ...) ; processing (DEFUN LIST-COLUMNS ...) ; processing (DEFUN LIST-COLUMNS-WITH-TYPES ...) ; processing (DEFUN COLUMN-EXISTS-P ...) ; processing (DEFUN RENAME-COLUMN ...) ; processing (DEFUN LIST-VIEWS ...) ; processing (DEFUN VIEW-EXISTS-P ...) ; processing (DEFUN DESCRIBE-VIEWS ...) ; processing (DEFUN LIST-DATABASE-FUNCTIONS ...) ; processing (DEFUN INDEX-EXISTS-P ...) ; processing (DEFUN CREATE-INDEX ...) ; processing (DEFUN DROP-INDEX ...) ; processing (DEFUN LIST-INDICES ...) ; processing (DEFUN LIST-TABLE-INDICES ...) ; processing (DEFUN LIST-INDEXED-COLUMN-AND-ATTRIBUTES ...) ; processing (DEFUN LIST-INDEX-DEFINITIONS ...) ; processing (DEFUN FIND-PRIMARY-KEY-INFO ...) ; processing (DEFUN LIST-FOREIGN-KEYS ...) ; processing (DEFUN LIST-UNIQUE-OR-PRIMARY-CONSTRAINTS ...) ; processing (DEFUN LIST-CHECK-CONSTRAINTS ...) ; processing (DEFUN LIST-ALL-CONSTRAINTS ...) ; processing (DEFUN DESCRIBE-CONSTRAINT ...) ; processing (DEFUN DESCRIBE-FOREIGN-KEY-CONSTRAINTS ...) ; processing (DEFUN DESCRIBE-TRIGGERS ...) ; processing (DEFUN LIST-TRIGGERS ...) ; processing (DEFUN LIST-DETAILED-TRIGGERS ...) ; processing (DEFUN CHANGE-TOPLEVEL-DATABASE ...) ; processing (DEFUN LIST-CONNECTIONS ...) ; processing (DEFUN LIST-AVAILABLE-EXTENSIONS ...) ; processing (DEFUN LIST-INSTALLED-EXTENSIONS ...) ; processing (DEFUN LOAD-UUID-EXTENSION ...) ; processing (DEFUN GENERATE-UUID ...) ; processing (DEFUN REPLACE-NON-ALPHANUMERIC-CHARS ...) ; processing (DEFUN COPY-FROM-CSV ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/postmodern/util-tmp7R9QD7N9.fasl ; compilation finished in 0:00:00.584 ; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/transaction.lisp" (written 13 NOV 2021 10:17:16 AM): ; processing (IN-PACKAGE :POSTMODERN) ; processing (DEFPARAMETER *CURRENT-LOGICAL-TRANSACTION* ...) ; processing (DEFGENERIC ABORT-HOOKS ...) ; processing (DEFGENERIC ABORT-LOGICAL-TRANSACTION ...) ; processing (DEFGENERIC COMMIT-HOOKS ...) ; processing (DEFGENERIC COMMIT-LOGICAL-TRANSACTION ...) ; processing (DEFCLASS TRANSACTION-HANDLE ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DEFUN BEGIN-TRANSACTION ...) ; processing (DEFUN CALL-WITH-TRANSACTION ...) ; processing (DEFMACRO WITH-TRANSACTION ...) ; processing (DEFUN ABORT-TRANSACTION ...) ; processing (DEFUN ROLLBACK-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 ...) ; processing (DEFMACRO ENSURE-TRANSACTION-WITH-ISOLATION-LEVEL ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/postmodern/transaction-tmpGP8R3FTA.fasl ; compilation finished in 0:00:00.048 ; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/namespace.lisp" (written 13 NOV 2021 10:17:16 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-SCHEMAS ...) ; processing (DEFUN SCHEMA-EXISTS-P ...) ; processing (DEFUN CREATE-SCHEMA ...) ; processing (DEFUN DROP-SCHEMA ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/postmodern/namespace-tmp121QKS9N.fasl ; compilation finished in 0:00:00.036 ; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/execute-file.lisp" (written 13 NOV 2021 10:17:16 AM): ; processing (IN-PACKAGE :POSTMODERN) ; 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 (DEFSTRUCT COMMENT-PARSER ...) ; processing (DEFPARAMETER SINGLE-LINE-COMMENT-SCANNER ...) ; processing (DEFUN PARSE-COMMENTS ...) ; processing (DEFUN REMOVE-SQL-COMMENTS ...) ; processing (DEFINE-CONDITION MISSING-I-FILE ...) ; processing (DEFUN LINE-HAS-INCLUDES ...) ; processing (DEFUN FIND-INCLUDED-FILENAME ...) ; processing (DEFUN READ-SQL-FILE ...) ; processing (DEFUN READ-QUERIES ...) ; processing (DEFUN PARSE-QUERIES ...) ; processing (DEFUN EXECUTE-FILE ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/postmodern/execute-file-tmp2JF031K4.fasl ; compilation finished in 0:00:00.244 ; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/table.lisp" (written 13 NOV 2021 10:17:16 AM): ; processing (IN-PACKAGE :POSTMODERN) ; processing (DEFCLASS DAO-CLASS ...) ; processing (DEFGENERIC DAO-KEYS ...) ; processing (DEFMETHOD DAO-KEYS ...) ; processing (DEFGENERIC FIND-PRIMARY-KEY-COLUMN ...) ; processing (DEFMETHOD FIND-PRIMARY-KEY-COLUMN ...) ; processing (DEFMETHOD FIND-PRIMARY-KEY-COLUMN ...) ; processing (DEFMETHOD FIND-PRIMARY-KEY-COLUMN ...) ; processing (DEFMETHOD VALIDATE-SUPERCLASS ...) ; processing (DEFMETHOD DAO-KEYS ...) ; processing (DEFMETHOD DAO-KEYS ...) ; processing (DEFUN DAO-COLUMN-SLOTS ...) ; file: /usr/share/common-lisp/source/postmodern/postmodern/table.lisp ; in: DEFUN DAO-COLUMN-SLOTS ; 'POSTMODERN::EFFECTIVE-COLUMN-SLOT ; ; note: can't open-code test of unknown type EFFECTIVE-COLUMN-SLOT ; ; note: can't open-code test of unknown type EFFECTIVE-COLUMN-SLOT ; ; note: can't open-code test of unknown type EFFECTIVE-COLUMN-SLOT ; 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 SET-TO-CLASS ...) ; processing (DEFUN COL-TYPE-TEXT-P ...) ; processing (DEFUN FIND-COL-TYPE ...) ; processing (DEFUN FIND-EXPORT-FUNCTION ...) ; processing (DEFUN COLLECT-EXPORT-FUNCTIONS ...) ; processing (DEFUN FIND-IMPORT-FUNCTION ...) ; processing (DEFUN COLLECT-IMPORT-FUNCTIONS ...) ; processing (DEFUN FIND-DAO-COLUMN-SLOT ...) ; processing (DEFUN SLOT-DEFINITION-NAME-AS-STRING ...) ; processing (DEFUN FIELD-NAME-TO-SLOT-NAME ...) ; processing (DEFUN BUILD-DAO-METHODS ...) ; processing (DEFMACRO WITH-COLUMN-WRITERS ...) ; processing (DEFUN DAO-FROM-FIELDS ...) ; file: /usr/share/common-lisp/source/postmodern/postmodern/table.lisp ; in: DEFUN DAO-FROM-FIELDS ; (FUNCTIONP POSTMODERN::IMPORT-FUNCTION-SYMBOL) ; ; note: deleting unreachable code ; (FUNCALL POSTMODERN::RESULT-NEXT-FIELD-GENERATOR-FN POSTMODERN::FIELD) ; ; note: deleting unreachable code ; (SETF (SLOT-VALUE POSTMODERN::INSTANCE ; (POSTMODERN::FIELD-NAME-TO-SLOT-NAME CLASS ; (CL-POSTGRES:FIELD-NAME POSTMODERN::FIELD))) ; (FUNCALL POSTMODERN::IMPORT-FUNCTION-SYMBOL ; (FUNCALL POSTMODERN::RESULT-NEXT-FIELD-GENERATOR-FN ; POSTMODERN::FIELD))) ; ==> ; POSTMODERN::INSTANCE ; ; note: deleting unreachable code ; 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 LIST-TO-COLUMN ...) ; processing (DEFUN DAO-TABLE-DEFINITION ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/postmodern/table-tmpX1DK061H.fasl ; compilation finished in 0:00:00.216 ; compiling file "/usr/share/common-lisp/source/postmodern/postmodern/deftable.lisp" (written 13 NOV 2021 10:17:16 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/postmodern/deftable-tmp4FJCN3GX.fasl ; compilation finished in 0:00:00.040 ; compiling file "/usr/share/common-lisp/source/postmodern/simple-date/package.lisp" (written 13 NOV 2021 10:17:16 AM): ; processing (DEFPACKAGE :SIMPLE-DATE ...) ; processing (DEFPACKAGE :SIMPLE-DATE-CL-POSTGRES-GLUE ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/simple-date/package-tmpWO4JLIQB.fasl ; compilation finished in 0:00:00.000 ; compiling file "/usr/share/common-lisp/source/postmodern/simple-date/simple-date.lisp" (written 13 NOV 2021 10:17:16 AM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/postmodern/simple-date/simple-date-tmpHBCFHPPX.fasl ; compilation finished in 0:00:00.276 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/asdf-finalizers/list-of-tmp8ZEXUD27.fasl ; compilation finished in 0:00:00.036 ; compiling file "/usr/share/common-lisp/source/chipz/package.lisp" (written 13 FEB 2022 01:13:10 AM): ; processing (DEFPACKAGE :CHIPZ ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/chipz/package-tmp95B25LCL.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/chipz/constants.lisp" (written 13 FEB 2022 01:13:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/chipz/constants-tmpAMNCEZSG.fasl ; compilation finished in 0:00:00.016 ; compiling file "/usr/share/common-lisp/source/chipz/types-and-tables.lisp" (written 13 FEB 2022 01:13:10 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/chipz/types-and-tables-tmpVQGQLFW2.fasl ; compilation finished in 0:00:00.100 ; compiling file "/usr/share/common-lisp/source/chipz/crc32.lisp" (written 13 FEB 2022 01:13:10 AM): ; processing (IN-PACKAGE :CHIPZ) ; processing (PROGN (DEFSTRUCT # ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/chipz/crc32-tmpXATIMY4E.fasl ; compilation finished in 0:00:00.028 ; compiling file "/usr/share/common-lisp/source/chipz/adler32.lisp" (written 13 FEB 2022 01:13:10 AM): ; processing (IN-PACKAGE :CHIPZ) ; processing (DEFSTRUCT (ADLER32 #) ...) ; processing (DEFUN UPDATE-ADLER32 ...) ; processing (DEFUN PRODUCE-ADLER32 ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/chipz/adler32-tmp3LJ5VTJR.fasl ; compilation finished in 0:00:00.036 ; compiling file "/usr/share/common-lisp/source/chipz/conditions.lisp" (written 13 FEB 2022 01:13:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/chipz/conditions-tmp8VUWAF03.fasl ; compilation finished in 0:00:00.028 ; compiling file "/usr/share/common-lisp/source/chipz/dstate.lisp" (written 13 FEB 2022 01:13:10 AM): ; processing (IN-PACKAGE :CHIPZ) ; processing (DEFSTRUCT (DECOMPRESSION-STATE # ...) ...) ; processing (DEFUN MAKE-DSTATE ...) ; processing (DEFUN FINISH-DSTATE ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/chipz/dstate-tmpJUI0JWVS.fasl ; compilation finished in 0:00:00.112 ; compiling file "/usr/share/common-lisp/source/chipz/inflate-state.lisp" (written 13 FEB 2022 01:13:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/chipz/inflate-state-tmpHNA3KE33.fasl ; compilation finished in 0:00:00.068 ; compiling file "/usr/share/common-lisp/source/chipz/gzip.lisp" (written 13 FEB 2022 01:13:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/chipz/gzip-tmp9QACGPOH.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/chipz/zlib.lisp" (written 13 FEB 2022 01:13:10 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/chipz/zlib-tmpST69PK2Q.fasl ; compilation finished in 0:00:00.008 ; compiling file "/usr/share/common-lisp/source/chipz/inflate.lisp" (written 13 FEB 2022 01:13:10 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 FLOAT (RATIONAL 0 (31))), 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 FLOAT (RATIONAL (-31) (31))), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-31) (31))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-31) (31))), 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 ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; 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 LIST ; (AND (NOT (VECTOR (UNSIGNED-BYTE 8))) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT (VECTOR (UNSIGNED-BYTE 8))) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; (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) ; --> SB-IMPL::XSUBTRACT BLOCK ; ==> ; (- SB-IMPL::B SB-IMPL::A) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427388d18)), not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427388d18)), not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427388d18)), not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427388d18)), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427388d18)), not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427388d18)), not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (ZEROP CHIPZ::N-COPIED-BYTES) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427388d18)), 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 in mixed numeric operation ; due to type uncertainty: ; The second argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427388d18)), not a FLOAT. ; (+ (CHIPZ::INFLATE-STATE-INPUT-INDEX CHIPZ::STATE) CHIPZ::N-COPIED-BYTES) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427388d18)), not a FLOAT. ; (INCF (CHIPZ::INFLATE-STATE-INPUT-INDEX CHIPZ::STATE) CHIPZ::N-COPIED-BYTES) ; ==> ; (+ CHIPZ::N-COPIED-BYTES ; (SB-KERNEL:THE* ((AND FIXNUM (INTEGER 0 *)) :DERIVE-TYPE-ONLY T) ; (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:INFLATE-STATE #:OBJ) ; 5))) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427388d18)), not a FLOAT. ; (INCF (CHIPZ::INFLATE-STATE-OUTPUT-INDEX CHIPZ::STATE) CHIPZ::N-COPIED-BYTES) ; ==> ; (+ CHIPZ::N-COPIED-BYTES ; (SB-KERNEL:THE* ((AND FIXNUM (INTEGER 0 *)) :DERIVE-TYPE-ONLY T) ; (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:INFLATE-STATE #:OBJ) ; 9))) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427388d18)), not a FLOAT. ; (DECF (CHIPZ::INFLATE-STATE-LENGTH CHIPZ::STATE) CHIPZ::N-BYTES-TO-COPY) ; --> SB-IMPL::XSUBTRACT BLOCK ; ==> ; (- SB-IMPL::B SB-IMPL::A) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a REAL, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (INCF (CHIPZ::INFLATE-STATE-OUTPUT-INDEX CHIPZ::STATE) CHIPZ::N-BYTES-TO-COPY) ; ==> ; (+ 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) ; 9))) ; ; note: unable to ; open-code float conversion in mixed 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 in mixed 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 in mixed 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; (- CHIPZ::INDEX CHIPZ::DISTANCE) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427388d18)), not a FLOAT. ; (- CHIPZ::WINDOW-INDEX CHIPZ::DISTANCE) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a (OR (RATIONAL -4611686018427387903) ; (SINGLE-FLOAT -4.611686e18) ; (DOUBLE-FLOAT ; -4.611686018427388d18)), not a FLOAT. ; (+ (- CHIPZ::WINDOW-INDEX CHIPZ::DISTANCE) (- CHIPZ::INDEX CHIPZ::START)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (DOUBLE-FLOAT * 4.611686018427421d18) ; (SINGLE-FLOAT * 4.611686e18) ; (RATIONAL * 4611686018427420670)), 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 (RATIONAL * 9223372036854808573) ; (SINGLE-FLOAT * 9.223372e18) ; (DOUBLE-FLOAT * ; 9.223372036854809d18)), not a FLOAT. ; (- CHIPZ::WINDOW-INDEX CHIPZ::COPY-INDEX) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a (OR (RATIONAL 0 9223372036854808573) ; (SINGLE-FLOAT 0.0 9.223372e18) ; (DOUBLE-FLOAT 0.0d0 ; 9.223372036854809d18)), not a FLOAT. ; (+ CHIPZ::COPY-INDEX (LENGTH (CHIPZ::INFLATE-STATE-WINDOW CHIPZ::STATE))) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (RATIONAL * (0)) (SINGLE-FLOAT * (0.0)) ; (DOUBLE-FLOAT * (0.0d0))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR (RATIONAL * (0)) (SINGLE-FLOAT * (0.0)) ; (DOUBLE-FLOAT * (0.0d0))), not a RATIONAL. ; (- (LENGTH (CHIPZ::INFLATE-STATE-WINDOW CHIPZ::STATE)) CHIPZ::COPY-INDEX) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a (OR (DOUBLE-FLOAT * 32768.0d0) ; (SINGLE-FLOAT * 32768.0) ; (RATIONAL * (32768))), 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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (+ (CHIPZ::DISTANCE-BASE (CHIPZ::INFLATE-STATE-DISTANCE CHIPZ::STATE)) ; CHIPZ::DISTANCE-EXTRA) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; (< (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. ; (MIN CHIPZ::N-BYTES-TO-COPY (- CHIPZ::WINDOW-INDEX CHIPZ::COPY-INDEX)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427388d18)), not a SINGLE-FLOAT. ; The second argument is a (OR (DOUBLE-FLOAT -9.223372036854809d18 32767.0d0) ; (SINGLE-FLOAT -9.223372e18 32767.0) ; (RATIONAL -9223372036854808573 ; 32767)), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427388d18)), not a DOUBLE-FLOAT. ; The second argument is a (OR (DOUBLE-FLOAT -9.223372036854809d18 32767.0d0) ; (SINGLE-FLOAT -9.223372e18 32767.0) ; (RATIONAL -9223372036854808573 ; 32767)), not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427388d18)), not a FLOAT. ; The second argument is a (OR (DOUBLE-FLOAT -9.223372036854809d18 32767.0d0) ; (SINGLE-FLOAT -9.223372e18 32767.0) ; (RATIONAL -9223372036854808573 ; 32767)), not a RATIONAL. ; (<= 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. ; (= CHIPZ::STORED (CHIPZ::PRODUCE-ADLER32 CHIPZ::ADLER32)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; (+ (CHIPZ::HDT-BITS CHIPZ::DECODER) 7) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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)) ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:INFLATE-STATE #:OBJ) 23)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (+ (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE) CHIPZ::LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (INCF (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE) CHIPZ::LEN) ; ==> ; (+ CHIPZ::LEN (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:INFLATE-STATE #:OBJ) 23)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (ASSERT (= CHIPZ::N-VALUES (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE))) ; --> LET WHEN IF ; ==> ; (= #:TEMP5 #:TEMP6) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a 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 ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427388d18)), not a SINGLE-FLOAT. ; The second argument is a (OR (DOUBLE-FLOAT -9.223372036854809d18 32767.0d0) ; (SINGLE-FLOAT -9.223372e18 32767.0) ; (RATIONAL -9223372036854808573 ; 32767)), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427388d18)), not a DOUBLE-FLOAT. ; The second argument is a (OR (DOUBLE-FLOAT -9.223372036854809d18 32767.0d0) ; (SINGLE-FLOAT -9.223372e18 32767.0) ; (RATIONAL -9223372036854808573 ; 32767)), not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427388d18)), not a FLOAT. ; The second argument is a (OR (DOUBLE-FLOAT -9.223372036854809d18 32767.0d0) ; (SINGLE-FLOAT -9.223372e18 32767.0) ; (RATIONAL -9223372036854808573 ; 32767)), not a RATIONAL. ; ; note: unable to open code because: The operands might not be the same type. ; (<= CHIPZ::DISTANCE (- CHIPZ::INDEX CHIPZ::START)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL -4611686018427387903) ; (SINGLE-FLOAT -4.611686e18) ; (DOUBLE-FLOAT ; -4.611686018427388d18)), not a FLOAT. ; ; 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 (OR (RATIONAL -4611686018427387903) ; (SINGLE-FLOAT -4.611686e18) ; (DOUBLE-FLOAT ; -4.611686018427388d18)), 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. ; (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 (RATIONAL -4611686018427387903) ; (SINGLE-FLOAT -4.611686e18) ; (DOUBLE-FLOAT ; -4.611686018427388d18)), not a FLOAT. ; ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427388d18)), not a SINGLE-FLOAT. ; The second argument is a (OR (RATIONAL (0)) (SINGLE-FLOAT 0.0) ; (DOUBLE-FLOAT 0.0d0)), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427388d18)), not a DOUBLE-FLOAT. ; The second argument is a (OR (RATIONAL (0)) (SINGLE-FLOAT 0.0) ; (DOUBLE-FLOAT 0.0d0)), not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427388d18)), not a FLOAT. ; The second argument is a (OR (RATIONAL (0)) (SINGLE-FLOAT 0.0) ; (DOUBLE-FLOAT 0.0d0)), not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427388d18)), not a SINGLE-FLOAT. ; The second argument is a (OR (RATIONAL (0)) (SINGLE-FLOAT 0.0) ; (DOUBLE-FLOAT 0.0d0)), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427388d18)), not a DOUBLE-FLOAT. ; The second argument is a (OR (RATIONAL (0)) (SINGLE-FLOAT 0.0) ; (DOUBLE-FLOAT 0.0d0)), not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427388d18)), not a FLOAT. ; The second argument is a (OR (RATIONAL (0)) (SINGLE-FLOAT 0.0) ; (DOUBLE-FLOAT 0.0d0)), not a RATIONAL. ; ; 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 ...) ; --> LET LET LET TAGBODY WHEN IF >= ; ==> ; 1 ; ; 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 (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * ; 4.611686018427388d18)), not a FLOAT. ; ; 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: forced to do full call ; 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 full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (INCF (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE)) ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:INFLATE-STATE #:OBJ) 23)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (1- (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (+ (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE) CHIPZ::LEN) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (INCF (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE) CHIPZ::LEN) ; ==> ; (+ CHIPZ::LEN (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:INFLATE-STATE #:OBJ) 23)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The second argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (ASSERT (= CHIPZ::N-VALUES (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE))) ; --> LET WHEN IF ; ==> ; (= #:TEMP5 #:TEMP6) ; ; note: forced to do full call ; 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 T, 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 T, not a DOUBLE-FLOAT. ; (* (CHIPZ::CMF CHIPZ::HEADER) 256) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (+ (* (CHIPZ::CMF CHIPZ::HEADER) 256) CHIPZ::FLAGS-BYTE) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MOD (+ (* (CHIPZ::CMF CHIPZ::HEADER) 256) CHIPZ::FLAGS-BYTE) 31) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL #1=(-31) #2=(31))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL #3=(0) #4=(62))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR FLOAT (RATIONAL #1# #2#)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES (OR FLOAT (RATIONAL #3# #4#)) . #5#), not a (VALUES ; (UNSIGNED-BYTE ; 64) ; . #5#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (RATIONAL #1=(-31) #2=(62)), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (RATIONAL #1# #2#), not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (RATIONAL 0 #1=(62)), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (RATIONAL 0 #1#), not a (UNSIGNED-BYTE 64). ; 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 full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387903 ; 4611686018427387903), not a (UNSIGNED-BYTE 64). ; etc. ; (+ (CHIPZ::INFLATE-STATE-OUTPUT-INDEX CHIPZ::STATE) CHIPZ::N-COPIED-BYTES) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * 4.611686018427388d18)), not a FIXNUM. ; The result is a (VALUES ; (OR (DOUBLE-FLOAT * 9.223372036854776d18) ; (SINGLE-FLOAT * 9.223372e18) ; (RATIONAL * 9223372036854775806)) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The second argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * 4.611686018427388d18)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES ; (OR (DOUBLE-FLOAT * 9.223372036854776d18) ; (SINGLE-FLOAT * 9.223372e18) ; (RATIONAL * 9223372036854775806)) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (+ (CHIPZ::INFLATE-STATE-INPUT-INDEX CHIPZ::STATE) CHIPZ::N-COPIED-BYTES) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * 4.611686018427388d18)), not a FIXNUM. ; The result is a (VALUES ; (OR (DOUBLE-FLOAT * 9.223372036854776d18) ; (SINGLE-FLOAT * 9.223372e18) ; (RATIONAL * 9223372036854775806)) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The second argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * 4.611686018427388d18)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES ; (OR (DOUBLE-FLOAT * 9.223372036854776d18) ; (SINGLE-FLOAT * 9.223372e18) ; (RATIONAL * 9223372036854775806)) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (INCF (CHIPZ::INFLATE-STATE-INPUT-INDEX CHIPZ::STATE) CHIPZ::N-COPIED-BYTES) ; ==> ; (+ CHIPZ::N-COPIED-BYTES ; (SB-KERNEL:THE* ((AND FIXNUM (INTEGER 0 *)) :DERIVE-TYPE-ONLY T) ; (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:INFLATE-STATE #:OBJ) ; 5))) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * 4.611686018427388d18)), not a FIXNUM. ; The result is a (VALUES ; (OR (DOUBLE-FLOAT * 9.223372036854776d18) ; (SINGLE-FLOAT * 9.223372e18) ; (RATIONAL * 9223372036854775806)) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * 4.611686018427388d18)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES ; (OR (DOUBLE-FLOAT * 9.223372036854776d18) ; (SINGLE-FLOAT * 9.223372e18) ; (RATIONAL * 9223372036854775806)) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (INCF (CHIPZ::INFLATE-STATE-OUTPUT-INDEX CHIPZ::STATE) CHIPZ::N-COPIED-BYTES) ; ==> ; (+ CHIPZ::N-COPIED-BYTES ; (SB-KERNEL:THE* ((AND FIXNUM (INTEGER 0 *)) :DERIVE-TYPE-ONLY T) ; (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:INFLATE-STATE #:OBJ) ; 9))) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * 4.611686018427388d18)), not a FIXNUM. ; The result is a (VALUES ; (OR (DOUBLE-FLOAT * 9.223372036854776d18) ; (SINGLE-FLOAT * 9.223372e18) ; (RATIONAL * 9223372036854775806)) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * 4.611686018427388d18)), not a (UNSIGNED-BYTE ; 64). ; The result is a (VALUES ; (OR (DOUBLE-FLOAT * 9.223372036854776d18) ; (SINGLE-FLOAT * 9.223372e18) ; (RATIONAL * 9223372036854775806)) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (DECF (CHIPZ::INFLATE-STATE-LENGTH CHIPZ::STATE) CHIPZ::N-COPIED-BYTES) ; --> SB-IMPL::XSUBTRACT BLOCK ; ==> ; (- SB-IMPL::B SB-IMPL::A) ; ; note: forced to do full call ; 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 (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * 4.611686018427388d18)), not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER . #2=(&OPTIONAL)), not a (VALUES ; DOUBLE-FLOAT ; . #2#). ; unable to do #1# (cost 2) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * 4.611686018427388d18)), not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER . #2#), not a (VALUES SINGLE-FLOAT . #2#). ; etc. ; (< (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE) ; (CHIPZ::INFLATE-STATE-N-CODES CHIPZ::STATE)) ; ; note: forced to do full call ; 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 full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a T, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; etc. ; (+ (CHIPZ::DISTANCE-BASE (CHIPZ::INFLATE-STATE-DISTANCE CHIPZ::STATE)) ; CHIPZ::DISTANCE-EXTRA) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (MIN LENGTH (- CHIPZ::END CHIPZ::INDEX)) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387903 ; 4611686018427387903), not a (UNSIGNED-BYTE 64). ; etc. ; (<= CHIPZ::DISTANCE (- CHIPZ::INDEX CHIPZ::START)) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -4611686018427387903 ; 4611686018427387903), not a (UNSIGNED-BYTE 64). ; etc. ; (- CHIPZ::INDEX CHIPZ::DISTANCE) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * 4.611686018427388d18)), not a FIXNUM. ; The result is a (VALUES ; (OR (DOUBLE-FLOAT -4.611686018427388d18) ; (SINGLE-FLOAT -4.611686e18) ; (RATIONAL -4611686018427387903)) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The second argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * 4.611686018427388d18)), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (OR (DOUBLE-FLOAT -4.611686018427388d18) ; (SINGLE-FLOAT -4.611686e18) ; (RATIONAL -4611686018427387903)) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (- CHIPZ::WINDOW-INDEX CHIPZ::DISTANCE) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a (OR (RATIONAL -4611686018427387903) ; (SINGLE-FLOAT -4.611686e18) ; (DOUBLE-FLOAT -4.611686018427388d18)), not a FIXNUM. ; The result is a (VALUES ; (OR (DOUBLE-FLOAT * 4.611686018427421d18) ; (SINGLE-FLOAT * 4.611686e18) ; (RATIONAL * 4611686018427420670)) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The second argument is a (OR (RATIONAL -4611686018427387903) ; (SINGLE-FLOAT -4.611686e18) ; (DOUBLE-FLOAT -4.611686018427388d18)), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (OR (DOUBLE-FLOAT * 4.611686018427421d18) ; (SINGLE-FLOAT * 4.611686e18) ; (RATIONAL * 4611686018427420670)) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (+ (- CHIPZ::WINDOW-INDEX CHIPZ::DISTANCE) (- CHIPZ::INDEX CHIPZ::START)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (DOUBLE-FLOAT * 4.611686018427421d18) ; (SINGLE-FLOAT * 4.611686e18) ; (RATIONAL * 4611686018427420670)), not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL * 9223372036854808573) ; (SINGLE-FLOAT * 9.223372e18) ; (DOUBLE-FLOAT * 9.223372036854809d18)) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (DOUBLE-FLOAT * 4.611686018427421d18) ; (SINGLE-FLOAT * 4.611686e18) ; (RATIONAL * 4611686018427420670)), not a (UNSIGNED-BYTE ; 64). ; The second argument is a (INTEGER -4611686018427387903 ; 4611686018427387903), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES ; (OR (RATIONAL * 9223372036854808573) ; (SINGLE-FLOAT * 9.223372e18) ; (DOUBLE-FLOAT * 9.223372036854809d18)) ; . #1#), not a (VALUES (UNSIGNED-BYTE 64) . #1#). ; etc. ; (MINUSP CHIPZ::COPY-INDEX) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (OR (RATIONAL * 9223372036854808573) ; (SINGLE-FLOAT * 9.223372e18) ; (DOUBLE-FLOAT * 9.223372036854809d18)), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (OR (RATIONAL * 9223372036854808573) ; (SINGLE-FLOAT * 9.223372e18) ; (DOUBLE-FLOAT * 9.223372036854809d18)), not a (UNSIGNED-BYTE ; 64). ; etc. ; (- CHIPZ::WINDOW-INDEX CHIPZ::COPY-INDEX) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a (OR (RATIONAL 0 9223372036854808573) ; (SINGLE-FLOAT 0.0 9.223372e18) ; (DOUBLE-FLOAT 0.0d0 9.223372036854809d18)), not a FIXNUM. ; The result is a (VALUES ; (OR (DOUBLE-FLOAT -9.223372036854809d18 32767.0d0) ; (SINGLE-FLOAT -9.223372e18 32767.0) ; (RATIONAL -9223372036854808573 32767)) ; . #1=(&OPTIONAL)), not a (VALUES FIXNUM . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The second argument is a (OR (RATIONAL 0 9223372036854808573) ; (SINGLE-FLOAT 0.0 9.223372e18) ; (DOUBLE-FLOAT 0.0d0 9.223372036854809d18)), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (OR (DOUBLE-FLOAT -9.223372036854809d18 32767.0d0) ; (SINGLE-FLOAT -9.223372e18 32767.0) ; (RATIONAL -9223372036854808573 32767)) ; . #1#), not a (VALUES (SIGNED-BYTE 64) . #1#). ; etc. ; (MIN CHIPZ::N-BYTES-TO-COPY (- CHIPZ::WINDOW-INDEX CHIPZ::COPY-INDEX)) ; ; note: forced to do full call ; unable to do #1=inline float comparison (cost 3) because: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * 4.611686018427388d18)), not a SINGLE-FLOAT. ; The second argument is a (OR ; (DOUBLE-FLOAT -9.223372036854809d18 32767.0d0) ; (SINGLE-FLOAT -9.223372e18 32767.0) ; (RATIONAL -9223372036854808573 32767)), not a SINGLE-FLOAT. ; unable to do #1# (cost 3) because: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * 4.611686018427388d18)), not a DOUBLE-FLOAT. ; The second argument is a (OR ; (DOUBLE-FLOAT -9.223372036854809d18 32767.0d0) ; (SINGLE-FLOAT -9.223372e18 32767.0) ; (RATIONAL -9223372036854808573 32767)), not a DOUBLE-FLOAT. ; etc. ; ; note: forced to do full call ; unable to do #1=inline float comparison (cost 3) because: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * 4.611686018427388d18)), not a SINGLE-FLOAT. ; The second argument is a (OR ; (DOUBLE-FLOAT -9.223372036854809d18 32767.0d0) ; (SINGLE-FLOAT -9.223372e18 32767.0) ; (RATIONAL -9223372036854808573 32767)), not a SINGLE-FLOAT. ; unable to do #1# (cost 3) because: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * 4.611686018427388d18)), not a DOUBLE-FLOAT. ; The second argument is a (OR ; (DOUBLE-FLOAT -9.223372036854809d18 32767.0d0) ; (SINGLE-FLOAT -9.223372e18 32767.0) ; (RATIONAL -9223372036854808573 32767)), not a DOUBLE-FLOAT. ; (+ CHIPZ::COPY-INDEX (LENGTH (CHIPZ::INFLATE-STATE-WINDOW CHIPZ::STATE))) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (RATIONAL * #1=(0)) (SINGLE-FLOAT * #2=(0.0)) ; (DOUBLE-FLOAT * #3=(0.0d0))), not a FIXNUM. ; The result is a (VALUES ; (OR (DOUBLE-FLOAT * 32768.0d0) (SINGLE-FLOAT * 32768.0) ; (RATIONAL * #4=(32768))) ; . #5=(&OPTIONAL)), not a (VALUES FIXNUM . #5#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (OR (RATIONAL * #1#) (SINGLE-FLOAT * #2#) ; (DOUBLE-FLOAT * #3#)), not a (SIGNED-BYTE 64). ; The result is a (VALUES ; (OR (DOUBLE-FLOAT * 32768.0d0) (SINGLE-FLOAT * 32768.0) ; (RATIONAL * #4#)) ; . #5#), not a (VALUES (SIGNED-BYTE 64) . #5#). ; (- (LENGTH (CHIPZ::INFLATE-STATE-WINDOW CHIPZ::STATE)) CHIPZ::COPY-INDEX) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a (OR (DOUBLE-FLOAT * 32768.0d0) ; (SINGLE-FLOAT * 32768.0) ; (RATIONAL * #1=(32768))), not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL #2=(0)) (SINGLE-FLOAT 0.0) ; (DOUBLE-FLOAT 0.0d0)) ; . #3=(&OPTIONAL)), not a (VALUES FIXNUM . #3#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The second argument is a (OR (DOUBLE-FLOAT * 32768.0d0) ; (SINGLE-FLOAT * 32768.0) (RATIONAL * #1#)), not a (SIGNED-BYTE ; 64). ; The result is a (VALUES ; (OR (RATIONAL #2#) (SINGLE-FLOAT 0.0) ; (DOUBLE-FLOAT 0.0d0)) ; . #3#), not a (VALUES (SIGNED-BYTE 64) . #3#). ; etc. ; (MIN CHIPZ::N-BYTES-TO-COPY ; (- (LENGTH (CHIPZ::INFLATE-STATE-WINDOW CHIPZ::STATE)) ; CHIPZ::COPY-INDEX)) ; ; note: forced to do full call ; unable to do #1=inline float comparison (cost 3) because: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * 4.611686018427388d18)), not a SINGLE-FLOAT. ; The second argument is a (OR (RATIONAL #2=(0)) (SINGLE-FLOAT 0.0) ; (DOUBLE-FLOAT 0.0d0)), not a SINGLE-FLOAT. ; unable to do #1# (cost 3) because: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * 4.611686018427388d18)), not a DOUBLE-FLOAT. ; The second argument is a (OR (RATIONAL #2#) (SINGLE-FLOAT 0.0) ; (DOUBLE-FLOAT 0.0d0)), not a DOUBLE-FLOAT. ; etc. ; ; note: forced to do full call ; unable to do #1=inline float comparison (cost 3) because: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * 4.611686018427388d18)), not a SINGLE-FLOAT. ; The second argument is a (OR (RATIONAL #2=(0)) (SINGLE-FLOAT 0.0) ; (DOUBLE-FLOAT 0.0d0)), not a SINGLE-FLOAT. ; unable to do #1# (cost 3) because: ; The first argument is a (OR (RATIONAL * 4611686018427387903) ; (SINGLE-FLOAT * 4.611686e18) ; (DOUBLE-FLOAT * 4.611686018427388d18)), not a DOUBLE-FLOAT. ; The second argument is a (OR (RATIONAL #2#) (SINGLE-FLOAT 0.0) ; (DOUBLE-FLOAT 0.0d0)), not a DOUBLE-FLOAT. ; (DECF (CHIPZ::INFLATE-STATE-LENGTH CHIPZ::STATE) CHIPZ::N-BYTES-TO-COPY) ; --> SB-IMPL::XSUBTRACT BLOCK ; ==> ; (- SB-IMPL::B SB-IMPL::A) ; ; note: forced to do full call ; 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 ; . #2#). ; 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 . #2#). ; etc. ; (INCF (CHIPZ::INFLATE-STATE-OUTPUT-INDEX CHIPZ::STATE) CHIPZ::N-BYTES-TO-COPY) ; ==> ; (+ 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) ; 9))) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (+ CHIPZ::INDEX CHIPZ::N-BYTES-TO-COPY) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The second argument is a REAL, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES REAL . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (+ CHIPZ::COPY-INDEX CHIPZ::N-BYTES-TO-COPY) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; 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 ...) ; --> LET LET LET TAGBODY WHEN IF >= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64). ; etc. ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/chipz/inflate-tmpYAKMHP3C.fasl ; compilation finished in 0:00:00.224 ; compiling file "/usr/share/common-lisp/source/chipz/bzip2.lisp" (written 13 FEB 2022 01:13:10 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 ; (>= (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. ; (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. ; (INCF (CHIPZ::BZIP2-STATE-N-BLOCKS-USED CHIPZ::STATE)) ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 27)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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-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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (INCF (CHIPZ::BZIP2-STATE-I CHIPZ::STATE)) ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 49)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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)) ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 50)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, 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 ...) ; --> LET LET LET TAGBODY WHEN IF >= ; ==> ; 1 ; ; 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 (OR (RATIONAL * 255) (SINGLE-FLOAT * 255.0) ; (DOUBLE-FLOAT * 255.0d0)), not a FLOAT. ; (MAX CHIPZ::MAXLEN CHIPZ::XY) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL 0 255) (SINGLE-FLOAT 0.0 255.0) ; (DOUBLE-FLOAT 0.0d0 255.0d0)), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (< (CHIPZ::BZIP2-STATE-J CHIPZ::STATE) ; (CHIPZ::BZIP2-STATE-N-GROUPS CHIPZ::STATE)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; (>= (INCF (CHIPZ::BZIP2-STATE-J CHIPZ::STATE)) ; (CHIPZ::BZIP2-STATE-N-GROUPS CHIPZ::STATE)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; (>= (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-I CHIPZ::STATE)) ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 49)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; (INCF (CHIPZ::BZIP2-STATE-J CHIPZ::STATE)) ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 50)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (INCF (CHIPZ::BZIP2-STATE-I CHIPZ::STATE)) ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 49)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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)) ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 22)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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). ; (MIN CHIPZ::MINLEN CHIPZ::XY) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL 0 255) (SINGLE-FLOAT 0.0 255.0) ; (DOUBLE-FLOAT 0.0d0 255.0d0)), not a FLOAT. ; ; 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 (OR (RATIONAL 0) (SINGLE-FLOAT 0.0) ; (DOUBLE-FLOAT 0.0d0)), 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 (OR (RATIONAL * 899999) (SINGLE-FLOAT * 899999.0) ; (DOUBLE-FLOAT * 899999.0d0)), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (MAKE-ARRAY CHIPZ::+BZ-N-GROUPS+ :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) ; ; note: could not stack allocate: ; (MAKE-ARRAY +BZ-N-GROUPS+ :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) ; (< CHIPZ::N-BITS CHIPZ::N) ; ; note: forced to do <-INTEGER-FIXNUM (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) ; --> THE ; ==> ; (+ 8 CHIPZ::N-BITS) ; ; 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 (INTEGER 8) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 8) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (INCF (CHIPZ::BZIP2-STATE-I CHIPZ::STATE)) ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 49)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (< (INCF (CHIPZ::BZIP2-STATE-I CHIPZ::STATE)) ; (CHIPZ::BZIP2-STATE-ALPHA-SIZE CHIPZ::STATE)) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; etc. ; (INCF (CHIPZ::BZIP2-STATE-J CHIPZ::STATE)) ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 50)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (< (CHIPZ::BZIP2-STATE-J CHIPZ::STATE) ; (CHIPZ::BZIP2-STATE-N-GROUPS CHIPZ::STATE)) ; ; note: forced to do full call ; 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 ...) ; --> LET LET LET TAGBODY WHEN IF >= ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The second argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (MAX CHIPZ::MAXLEN CHIPZ::XY) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (OR (RATIONAL 0) (SINGLE-FLOAT 0.0) ; (DOUBLE-FLOAT 0.0d0)), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (OR (RATIONAL 0) (SINGLE-FLOAT 0.0) ; (DOUBLE-FLOAT 0.0d0)), not a (UNSIGNED-BYTE ; 64). ; etc. ; (MIN CHIPZ::MINLEN CHIPZ::XY) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (OR (RATIONAL * 255) (SINGLE-FLOAT * 255.0) ; (DOUBLE-FLOAT * 255.0d0)), not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (OR (RATIONAL * 255) (SINGLE-FLOAT * 255.0) ; (DOUBLE-FLOAT * 255.0d0)), not a (UNSIGNED-BYTE ; 64). ; etc. ; (INCF (CHIPZ::BZIP2-STATE-CURRENT-BLOCK-NUMBER CHIPZ::STATE)) ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 22)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (ASH CHIPZ::CRC32-HI 16) ; ; note: forced to do full call ; unable to do #1=inline ASH (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 ; . #2#). ; 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 . #2#). ; 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 ; . #1#). ; 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) ; . #1#). ; etc. ; (<= 0 CHIPZ::ORIGINAL-POINTER ; (+ 10 ; (* (CHIPZ::BZIP2-STATE-100K-BLOCK-SIZE CHIPZ::STATE) CHIPZ::+100K+))) ; ; note: forced to do >-INTEGER-FIXNUM (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 full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a T, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; etc. ; (LOGBITP (CHIPZ::BZIP2-STATE-I CHIPZ::STATE) CHIPZ::IN-USE-16) ; --> LET PROGN UNLESS IF AND IF LOCALLY AND THE >= ; ==> ; 1 ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; ; note: forced to do <-INTEGER-FIXNUM (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 full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 3) 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) ; . #1#). ; etc. ; (+ (* (CHIPZ::BZIP2-STATE-I CHIPZ::STATE) 16) CHIPZ::I) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (INCF (CHIPZ::BZIP2-STATE-I CHIPZ::STATE)) ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 49)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (<= 2 CHIPZ::N-GROUPS 6) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER 2), not a FIXNUM. ; (PLUSP CHIPZ::N-SELECTORS) ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (INCF (CHIPZ::BZIP2-STATE-I CHIPZ::STATE)) ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 49)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (< (INCF (CHIPZ::BZIP2-STATE-I CHIPZ::STATE)) ; (CHIPZ::BZIP2-STATE-N-SELECTORS CHIPZ::STATE)) ; ; note: forced to do full call ; 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)) ; --> BLOCK LET TAGBODY UNLESS IF >= ; ==> ; 1 ; ; note: forced to do <-FIXNUM-INTEGER (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))) ; --> BLOCK LET TAGBODY UNLESS IF >= ; ==> ; 1 ; ; note: forced to do <-FIXNUM-INTEGER (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a INTEGER, not a FIXNUM. ; (INCF (CHIPZ::BZIP2-STATE-J CHIPZ::STATE)) ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 50)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (>= (INCF (CHIPZ::BZIP2-STATE-J CHIPZ::STATE)) ; (CHIPZ::BZIP2-STATE-N-GROUPS CHIPZ::STATE)) ; ; note: forced to do full call ; 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 full call ; 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. ; (MINUSP (CHIPZ::BZIP2-STATE-ORIGINAL-POINTER CHIPZ::STATE)) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a T, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; etc. ; (>= (CHIPZ::BZIP2-STATE-ORIGINAL-POINTER CHIPZ::STATE) ; (CHIPZ::BZIP2-STATE-NBLOCK CHIPZ::STATE)) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (INCF (CHIPZ::BZIP2-STATE-N-BLOCKS-USED CHIPZ::STATE)) ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHIPZ:BZIP2-STATE #:OBJ) 27)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (>= (INCF (CHIPZ::BZIP2-STATE-GROUP-NUMBER CHIPZ::STATE)) ; (CHIPZ::BZIP2-STATE-N-SELECTORS CHIPZ::STATE)) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a (INTEGER -4611686018427387903 4611686018427387903), not a (UNSIGNED-BYTE ; 64). ; The second argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (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 ; . #1#). ; 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) ; . #1#). ; etc. ; (ERROR 'CHIPZ:INVALID-BZIP2-DATA) ; ; note: deleting unreachable code ; processing (DEFUN %BZIP2-DECOMPRESS ...) ; processing (DEFUN MAKE-BZIP2-STATE ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/chipz/bzip2-tmpT250CJEH.fasl ; compilation finished in 0:00:01.252 ; compiling file "/usr/share/common-lisp/source/chipz/decompress.lisp" (written 13 FEB 2022 01:13:10 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 ...) ; file: /usr/share/common-lisp/source/chipz/decompress.lisp ; in: DEFUN %DECOMPRESS/NULL-STREAM ; (MAKE-ARRAY 8192 :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) ; ; note: could not stack allocate: (MAKE-ARRAY 8192 :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) ; processing (DEFMETHOD DECOMPRESS ...) ; processing (DEFUN %DECOMPRESS/VECTOR-VECTOR ...) ; processing (DEFMETHOD DECOMPRESS ...) ; processing (DEFUN %DECOMPRESS/STREAM-VECTOR ...) ; file: /usr/share/common-lisp/source/chipz/decompress.lisp ; in: DEFUN %DECOMPRESS/STREAM-VECTOR ; (MAKE-ARRAY 8192 :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) ; ; note: could not stack allocate: (MAKE-ARRAY 8192 :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) ; processing (DEFMETHOD DECOMPRESS ...) ; processing (DEFUN %DECOMPRESS/STREAM-STREAM ...) ; file: /usr/share/common-lisp/source/chipz/decompress.lisp ; in: DEFUN %DECOMPRESS/STREAM-STREAM ; (MAKE-ARRAY 8192 :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) ; ; note: could not stack allocate: (MAKE-ARRAY 8192 :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) ; ; note: could not stack allocate: (MAKE-ARRAY 8192 :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) ; processing (DEFMETHOD DECOMPRESS ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/chipz/decompress-tmpZ5LLIZWU.fasl ; compilation finished in 0:00:00.396 ; compiling file "/usr/share/common-lisp/source/chipz/stream.lisp" (written 13 FEB 2022 01:13:10 AM): ; processing (IN-PACKAGE :CHIPZ) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL)) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/chipz/stream-tmpK87BOA56.fasl ; compilation finished in 0:00:00.048 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/pkgdcl-tmpRL4WWIL2.fasl ; compilation finished in 0:00:00.004 ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/common/charsets-tmp9PRKYPOC.fasl ; compilation finished in 0:00:00.016 ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DEFUN MYSQL-CAPABILITIES-SUPPORTED ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/common/constants-tmp747V57QS.fasl ; compilation finished in 0:00:00.012 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/common/conditions-tmpK7KF0QEZ.fasl ; compilation finished in 0:00:00.016 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/common/feature-detection-tmp7L3QASG.fasl ; compilation finished in 0:00:00.004 ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/common/utilities-tmpSU9OHSB9.fasl ; compilation finished in 0:00:00.212 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/common/date-time-tmpTEZ5J20P.fasl ; compilation finished in 0:00:00.036 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/common/misc-tmp7EQWE70T.fasl ; compilation finished in 0:00:00.059 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/wire-protocol/wire-packet-tmp83ON8YFR.fasl ; compilation finished in 0:00:00.132 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/wire-protocol/basic-types-tmpEOOWYRL6.fasl ; compilation finished in 0:00:00.248 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/wire-protocol/compressed-protocol-tmpFDZ5SF8C.fasl ; compilation finished in 0:00:00.096 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/define-packet-tmp6MGXO15Y.fasl ; compilation finished in 0:00:00.032 ; 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 (PROGN (DEFCLASS MYSQL-LOCAL-CONNECTION ...) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/connection-tmpSWPNJISY.fasl ; compilation finished in 0:00:00.028 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/response-packets-tmpUXH28IAQ.fasl ; compilation finished in 0:00:00.164 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/authentication-tmpRZXAYVZS.fasl ; compilation finished in 0:00:00.056 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/handshake-tmpFVBAZC5N.fasl ; compilation finished in 0:00:00.684 ; 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)) ; ...)) ; --> 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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (= 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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (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 ...) ; --> LET LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (< (QMYND-IMPL::MY-LEN STREAM) 9) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; 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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (= 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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (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 ...) ; --> LET LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (< (QMYND-IMPL::MY-LEN STREAM) 9) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (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 ...)))) ; ==> ; (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 (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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (= 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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (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 ...) ; --> LET LET LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY ; --> SB-LOOP::LOOP-DESETQ SETQ THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (< (QMYND-IMPL::MY-LEN STREAM) 9) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; 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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (= 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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (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 ...) ; --> LET LET LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY ; --> SB-LOOP::LOOP-DESETQ SETQ THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (< (QMYND-IMPL::MY-LEN STREAM) 9) ; ; note: forced to do <-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; 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))) ; ==> ; (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) ; (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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/response-result-set-tmpEN1U5236.fasl ; compilation finished in 0:00:02.616 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-quit-tmpWKFFHE0Z.fasl ; compilation finished in 0:00:00.000 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-initialize-database-tmpHCGNQVX4.fasl ; compilation finished in 0:00:00.004 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-query-tmpNZ1LR6KM.fasl ; compilation finished in 0:00:00.044 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-field-list-tmpPQVFZD5C.fasl ; compilation finished in 0:00:00.004 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-refresh-tmpE8JTPSGT.fasl ; compilation finished in 0:00:00.000 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-shutdown-tmpXLGMUBFO.fasl ; compilation finished in 0:00:00.004 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-statistics-tmp85XVAH0V.fasl ; compilation finished in 0:00:00.004 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-process-information-tmpE4QSJJPV.fasl ; compilation finished in 0:00:00.012 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-process-kill-tmpW9VXJCU5.fasl ; compilation finished in 0:00:00.000 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-debug-tmpIF3QWIV6.fasl ; compilation finished in 0:00:00.000 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-ping-tmp9BHJXQOA.fasl ; compilation finished in 0:00:00.004 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/text-protocol/command-change-user-tmp8MZGKR5X.fasl ; compilation finished in 0:00:00.028 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/prepared-statements/binary-protocol-encoding-tmp54PLG5WT.fasl ; compilation finished in 0:00:00.116 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/mysql-protocol/prepared-statements/prepared-statement-tmpGJ7DBMK8.fasl ; compilation finished in 0:00:00.328 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/qmynd/src/api-tmp7O4V59Z5.fasl ; compilation finished in 0:00:00.100 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-unicode/packages-tmpY90L99EZ.fasl ; compilation finished in 0:00:00.004 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-unicode/specials-tmpXZJKL4Z8.fasl ; compilation finished in 0:00:00.012 ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DEFUN TREE-LOOKUP ...) ; processing (DEFGENERIC MAPPING ...) ; processing (DEFUN EVALUATE-CASING-CONDITION ...) ; processing (DEFGENERIC SPECIAL-MAPPING ...) ; processing (DEFGENERIC CASE-FOLDING ...) ; file: /usr/share/common-lisp/source/cl-unicode/util.lisp ; in: DEFGENERIC CASE-FOLDING ; (CL-UNICODE::CASE-FOLDING CL-UNICODE::CODE-POINT) ; ; caught STYLE-WARNING: ; The function CASE-FOLDING is called with one argument, but wants exactly two. ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-unicode/util-tmpHXNPA9C2.fasl ; compilation finished in 0:00:00.324 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/cl-unicode/conditions.lisp" (written 01 NOV 2020 09:00:59 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-unicode/conditions-tmp6W89DJAF.fasl ; compilation finished in 0:00:00.004 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-unicode/lists-tmp7RAVZUSP.fasl ; compilation finished in 0:00:00.004 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-unicode/hash-tables-tmpKR50OG05.fasl ; compilation finished in 0:00:01.004 ;;; 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) ; ; note: deleting unreachable code ; processing (DEFMACRO ENABLE-ALTERNATIVE-CHARACTER-SYNTAX ...) ; processing (DEFMACRO DISABLE-ALTERNATIVE-CHARACTER-SYNTAX ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-unicode/api-tmpTLRJZ1UR.fasl ; compilation finished in 0:00:00.400 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-unicode/methods-tmpTJFR94DB.fasl ; compilation finished in 0:00:00.664 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-unicode/test-functions-tmp12QLR4GC.fasl ; compilation finished in 0:00:00.012 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-unicode/derived-tmpHNON3GN3.fasl ; compilation finished in 0:00:00.020 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-unicode/alias-tmpUL4IFWT3.fasl ; compilation finished in 0:00:00.072 ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (PUSHNEW :NAMED-READTABLES ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/named-readtables/src/package-tmpOKX06099.fasl ; compilation finished in 0:00:00.004 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/named-readtables/src/utils-tmp3PQWDVVX.fasl ; compilation finished in 0:00:00.072 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/named-readtables/src/define-api-tmpFJAR440P.fasl ; compilation finished in 0:00:00.008 ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :EXECUTE) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/named-readtables/src/cruft-tmpM2X5AGVD.fasl ; compilation finished in 0:00:00.132 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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... {1011221E4F}> ; (COND ; ((NOT EDITOR-HINTS.NAMED-READTABLES::NAME-SUPPLIED-P) ; (COPY-READTABLE EDITOR-HINTS.NAMED-READTABLES::*EMPTY-READTABLE*)) ; ((EDITOR-HINTS.NAMED-READTABLES::RESERVED-READTABLE-NAME-P ; EDITOR-HINTS.NAMED-READTABLES::NAME) ; (ERROR "~A is the designator for a predefined readtable. ~ ; Not acceptable as a user-specified readtable name." ; EDITOR-HINTS.NAMED-READTABLES::NAME)) ; ((LET (#) ; (AND EDITOR-HINTS.NAMED-READTABLES::RT #))) ; (T ; (LET (#) ; (EDITOR-HINTS.NAMED-READTABLES:REGISTER-READTABLE ; EDITOR-HINTS.NAMED-READTABLES::NAME ; EDITOR-HINTS.NAMED-READTABLES::RESULT))))) ; --> LOCALLY DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA EDITOR-HINTS.NAMED-READTABLES:MAKE-READTABLE ; (&OPTIONAL ; (EDITOR-HINTS.NAMED-READTABLES::NAME NIL ; EDITOR-HINTS.NAMED-READTABLES::NAME-SUPPLIED-P) ; &KEY MERGE) ; #<(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... {1011221E4F}> ; (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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/named-readtables/src/named-readtables-tmpV9XLLI3F.fasl ; compilation finished in 0:00:00.280 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/cl-interpol/packages.lisp" (written 25 JUL 2022 08:34:43 AM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE :CL-INTERPOL ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-interpol/packages-tmpCNL9LF4O.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/cl-interpol/specials.lisp" (written 25 JUL 2022 08:34:43 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-interpol/specials-tmpA2MZF3D.fasl ; compilation finished in 0:00:00.012 ; compiling file "/usr/share/common-lisp/source/cl-interpol/util.lisp" (written 25 JUL 2022 08:34:43 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 ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-interpol/util-tmp820USYC0.fasl ; compilation finished in 0:00:00.024 ; compiling file "/usr/share/common-lisp/source/cl-interpol/alias.lisp" (written 25 JUL 2022 08:34:43 AM): ; processing (IN-PACKAGE :CL-INTERPOL) ; processing (LOOP FOR ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-interpol/alias-tmpAP7D2UW2.fasl ; compilation finished in 0:00:00.000 ; compiling file "/usr/share/common-lisp/source/cl-interpol/read.lisp" (written 25 JUL 2022 08:34:43 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-interpol/read-tmpU93Z06A.fasl ; compilation finished in 0:00:00.228 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-csv/packages-tmpL3K5PO5H.fasl ; compilation finished in 0:00:00.000 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-csv/vars-tmpPP843P2R.fasl ; compilation finished in 0:00:00.000 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-csv/read-until-tmpBK2QBAFY.fasl ; compilation finished in 0:00:00.020 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-csv/csv-tmpAHPKJ6EW.fasl ; compilation finished in 0:00:00.360 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-csv/parser-tmpJJIXGGXK.fasl ; compilation finished in 0:00:00.308 ; compiling file "/usr/share/common-lisp/source/cl-fad/packages.lisp" (written 09 JAN 2022 12:38:55 PM): ; processing (IN-PACKAGE #:CL-USER) ; processing (DEFPACKAGE :CL-FAD ...) ; processing (DEFPACKAGE :PATH ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-fad/packages-tmpMYEEYI7L.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/cl-fad/fad.lisp" (written 09 JAN 2022 12:38:55 PM): ; 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 ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-fad/fad-tmp2OZ1RF2X.fasl ; compilation finished in 0:00:00.140 ; compiling file "/usr/share/common-lisp/source/cl-fad/path.lisp" (written 09 JAN 2022 12:38:55 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-fad/path-tmpMABYFPD4.fasl ; compilation finished in 0:00:00.028 ; compiling file "/usr/share/common-lisp/source/cl-fad/temporary-files.lisp" (written 09 JAN 2022 12:38:55 PM): ; processing (IN-PACKAGE :CL-FAD) ; processing (DEFPARAMETER *DEFAULT-TEMPLATE* ...) ; processing (DEFPARAMETER *MAX-TRIES* ...) ; processing (DEFVAR *NAME-RANDOM-STATE* ...) ; processing (EVAL-WHEN (:LOAD-TOPLEVEL :EXECUTE) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-fad/temporary-files-tmpO0782EL2.fasl ; compilation finished in 0:00:00.144 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/util/package-tmpFXGDO0E3.fasl ; compilation finished in 0:00:00.000 ; 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 (PROGN (DEFVAR *NORMAL-OPTIMIZE* ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/util/config-tmpLCE8PO0U.fasl ; compilation finished in 0:00:00.004 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/util/misc-tmpS48VDGU2.fasl ; compilation finished in 0:00:00.056 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/util/defmacro-tmp5LF2452A.fasl ; compilation finished in 0:00:00.020 ; 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 (PROGN (DEFMACRO DEFUN/INLINE ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/util/defun-tmpTSFGDAZ7.fasl ; compilation finished in 0:00:00.028 ; 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 (PROGN (DEFMACRO DEFINE-SLOTS-MACROLET ...) ...) ; processing (DEFMACRO DEFSLOTS ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/util/defslots-tmpGJFUKHN2.fasl ; compilation finished in 0:00:00.072 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/util/defpair-tmpRLWVC93J.fasl ; compilation finished in 0:00:00.020 ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :EXECUTE) ...) ; processing (ALIAS-FUNCTION CONDITION-WAIT ...) ; processing (ALIAS-FUNCTION CONDITION-NOTIFY ...) ; processing (PROGN (DEFMACRO CAS ...) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/thread-util-tmpLJXQSCJY.fasl ; compilation finished in 0:00:00.112 ; 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 (LOCALLY (DECLARE #) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/raw-queue-tmp4OLR0J6X.fasl ; compilation finished in 0:00:00.008 ; 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 full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; 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 full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; 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 full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/cons-queue-tmp6XXQRAHN.fasl ; compilation finished in 0:00:00.056 ; 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 full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; 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 full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; 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 full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/vector-queue-tmpGO08YVIW.fasl ; compilation finished in 0:00:00.092 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/queue-tmpW4V46RST.fasl ; compilation finished in 0:00:00.168 ; 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 (PROGN (DEFTYPE COUNTER-VALUE ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/counter-tmp3OJ639ET.fasl ; compilation finished in 0:00:00.016 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/spin-queue/package-tmpB4L1425D.fasl ; compilation finished in 0:00:00.004 ; 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 (PROGN (DEFTYPE NODE ...) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/spin-queue/cas-spin-queue-tmpFG7U3LX.fasl ; compilation finished in 0:00:00.036 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/kernel/package-tmpRB2S59DB.fasl ; compilation finished in 0:00:00.000 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/kernel/specials-tmpU1JZ7FXZ.fasl ; compilation finished in 0:00:00.004 ; 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 (PROGN (DEFMACRO WITH-TASK-CONTEXT ...) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/kernel/handling-tmp2DUJ9I.fasl ; compilation finished in 0:00:00.072 ; 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 (LOCALLY (DECLARE #) ...) ; processing (LOCALLY (DECLARE #) ...) ; processing (DEFSLOTS CHANNEL ...) ; processing (LOCALLY (DECLARE #) ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/kernel/classes-tmpU602JQSD.fasl ; compilation finished in 0:00:00.268 ; 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) ; ==> ; (+ 1 ; (SB-KERNEL:THE* ((INTEGER 0) :DERIVE-TYPE-ONLY T) ; (SB-KERNEL:%INSTANCE-REF ; (THE LPARALLEL.KERNEL::SCHEDULER #:OBJ) 5))) ; ; 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 (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; 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 >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; (DECF LPARALLEL.KERNEL::NOTIFY-COUNT) ; --> SB-IMPL::XSUBTRACT BLOCK ; ==> ; (- SB-IMPL::B SB-IMPL::A) ; ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; processing (DEFUN/TYPE STEAL-TASK ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/kernel/stealing-scheduler-tmp5O3OCPXW.fasl ; compilation finished in 0:00:00.056 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/kernel/kill-tmpOLTFAEPG.fasl ; compilation finished in 0:00:00.024 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/kernel/core-tmpUZ4MPL4A.fasl ; compilation finished in 0:00:00.208 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/kernel/timeout-tmpBQS2IZ67.fasl ; compilation finished in 0:00:00.028 ; 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)) ; --> BLOCK LET CEILING ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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))) ; --> LPARALLEL.UTIL:REPEAT LOOP BLOCK LET CEILING ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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))) ; --> LPARALLEL.UTIL:REPEAT LOOP BLOCK LET CEILING ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT (RATIONAL (-1) (1))), 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))) ; --> LPARALLEL.UTIL:REPEAT LOOP BLOCK LET CEILING ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; --> LPARALLEL.UTIL:REPEAT LOOP BLOCK LET TAGBODY IF <= ; ==> ; 1 ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> LPARALLEL.UTIL:REPEAT LOOP BLOCK LET TAGBODY IF DECF SETQ THE ; --> SB-IMPL::XSUBTRACT BLOCK ; ==> ; (- SB-IMPL::B SB-IMPL::A) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER 1), not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES ; (SIGNED-BYTE 64) ; . #1#). ; etc. ; (LPARALLEL.KERNEL:DO-FAST-RECEIVES (LPARALLEL.KERNEL-UTIL::RESULT ; LPARALLEL.KERNEL:CHANNEL COUNT) ; (DECLARE (IGNORE LPARALLEL.KERNEL-UTIL::RESULT))) ; --> LPARALLEL.UTIL:REPEAT LOOP BLOCK LET CEILING ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; --> LPARALLEL.UTIL:REPEAT LOOP BLOCK LET TAGBODY IF <= ; ==> ; 1 ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> LPARALLEL.UTIL:REPEAT LOOP BLOCK LET TAGBODY IF DECF SETQ THE ; --> SB-IMPL::XSUBTRACT BLOCK ; ==> ; (- SB-IMPL::B SB-IMPL::A) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER 1), not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES ; (SIGNED-BYTE 64) ; . #1#). ; etc. ; (LPARALLEL.UTIL:REPEAT COUNT ; (LPARALLEL.KERNEL-UTIL::STEAL-UNTIL-RECEIVE-RESULT LPARALLEL.KERNEL:CHANNEL ; LPARALLEL.KERNEL-UTIL::WORKER LPARALLEL.KERNEL-UTIL::FN)) ; --> BLOCK LET CEILING ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; --> BLOCK LET TAGBODY IF <= ; ==> ; 1 ; ; note: forced to do >-INTEGER-FIXNUM (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; --> BLOCK LET TAGBODY IF DECF SETQ THE SB-IMPL::XSUBTRACT BLOCK ; ==> ; (- SB-IMPL::B SB-IMPL::A) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER 1), not a (SIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES ; (SIGNED-BYTE 64) ; . #1#). ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/kernel-util-tmpDEX1AB43.fasl ; compilation finished in 0:00:00.028 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/promise-tmpXEL4GRQG.fasl ; compilation finished in 0:00:00.252 ; 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) ; --> SB-IMPL::XSUBTRACT BLOCK ; ==> ; (- SB-IMPL::B SB-IMPL::A) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; etc. ; (INCF LPARALLEL.PTREE::PENDING) ; ==> ; (+ 1 ; (SB-KERNEL:THE* (INTEGER :DERIVE-TYPE-ONLY T) ; (SB-KERNEL:%INSTANCE-REF (THE LPARALLEL.PTREE:PTREE #:OBJ) ; 3))) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/ptree-tmpBLHHY8QV.fasl ; compilation finished in 0:00:00.124 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/slet-tmpGMYRLBUL.fasl ; compilation finished in 0:00:00.084 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/defpun-tmpLT3BCQID.fasl ; compilation finished in 0:00:00.188 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/cognate/package-tmp7AGUJ6PJ.fasl ; compilation finished in 0:00:00.068 ; 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: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a T, not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a T, not a (UNSIGNED-BYTE 64). ; etc. ; processing (DEFUN SUBSIZE ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/cognate/util-tmpADFMBTPY.fasl ; compilation finished in 0:00:00.008 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/cognate/option-tmpJ65DAF15.fasl ; compilation finished in 0:00:00.012 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/cognate/subdivide-tmpIXT65XFP.fasl ; compilation finished in 0:00:00.180 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/cognate/pandor-tmpAJ0SGYIK.fasl ; compilation finished in 0:00:00.012 ; 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 (PROGN (DEFUN DECLARATION-INFORMATION ...) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/cognate/plet-tmpJ2HJZECB.fasl ; compilation finished in 0:00:00.112 ; 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))) ; --> 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 full call ; 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. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The second argument is a T, not a (UNSIGNED-BYTE 64). ; etc. ; (INCF LPARALLEL.UTIL:INDEX) ; ; 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 (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/cognate/pmap-tmpXY4FGAPA.fasl ; compilation finished in 0:00:00.052 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/cognate/pmap-open-coded-tmp1MDGH4SW.fasl ; compilation finished in 0:00:00.036 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/cognate/pdotimes-tmpV8WTFLZM.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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/cognate/pquantifier-tmpX2YW1LTJ.fasl ; compilation finished in 0:00:00.008 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/cognate/preduce-tmpLB88W1T5.fasl ; compilation finished in 0:00:00.144 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/cognate/premove-tmp3F80YMF6.fasl ; compilation finished in 0:00:00.064 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/cognate/pfind-tmpJJORT7HU.fasl ; compilation finished in 0:00:00.132 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/cognate/pcount-tmp5DBB8JTB.fasl ; compilation finished in 0:00:00.072 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/cognate/psort-tmpZSBL0HHQ.fasl ; compilation finished in 0:00:00.220 ; 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 (MACROLET (#) ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/lparallel/src/package-tmpV1RXKPB.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/esrap/src/package.lisp" (written 20 DEC 2021 02:01:41 AM): ; processing (DEFPACKAGE #:ESRAP ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/esrap/src/package-tmp3SZ0XWQD.fasl ; compilation finished in 0:00:00.000 ; compiling file "/usr/share/common-lisp/source/esrap/src/types.lisp" (written 07 OCT 2021 11:40:58 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 CACHE-POLICY ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/esrap/src/types-tmp9YHAVVS9.fasl ; compilation finished in 0:00:00.008 ; compiling file "/usr/share/common-lisp/source/esrap/src/protocol.lisp" (written 07 OCT 2021 11:40:58 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/esrap/src/protocol-tmp92WUBED1.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/esrap/src/variables.lisp" (written 07 OCT 2021 11:40:58 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/esrap/src/variables-tmpAHBBVXUF.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/esrap/src/conditions.lisp" (written 07 OCT 2021 11:40:58 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 ...) ; file: /usr/share/common-lisp/source/esrap/src/conditions.lisp ; in: DEFUN ESRAP-PARSE-ERROR ; (DEFUN ESRAP:ESRAP-PARSE-ERROR (ESRAP:TEXT ESRAP::RESULT) ; (ERROR 'ESRAP:ESRAP-PARSE-ERROR :TEXT ESRAP:TEXT :RESULT ESRAP::RESULT)) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; ==> ; (SB-C::%FUNCALL #'ESRAP-PARSE-ERROR #:G1 #:G2) ; ; note: can't open-code test of unknown type RESULT ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/esrap/src/conditions-tmpFIDDIIG7.fasl ; compilation finished in 0:00:00.124 ; compiling file "/usr/share/common-lisp/source/esrap/src/expressions.lisp" (written 07 OCT 2021 11:40:58 PM): ; processing (IN-PACKAGE #:ESRAP) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 EXPRESSION-SIMPLE-P ...) ; processing (DEFUN DESCRIBE-TERMINAL ...) ; processing (DEFUN PRINT-TERMINAL ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/esrap/src/expressions-tmpB1G5I0B3.fasl ; compilation finished in 0:00:06.820 ; compiling file "/usr/share/common-lisp/source/esrap/src/rule.lisp" (written 07 OCT 2021 11:40:58 PM): ; processing (IN-PACKAGE #:ESRAP) ; processing (MACROLET (#) ...) ; processing (DEFCONSTANT +DEFAULT-RULE-PROPERTIES+ ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/esrap/src/rule-tmp6W3P1H2J.fasl ; compilation finished in 0:00:00.143 ; compiling file "/usr/share/common-lisp/source/esrap/src/results.lisp" (written 07 OCT 2021 11:40:58 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 # ...) ...) ; file: /usr/share/common-lisp/source/esrap/src/results.lisp ; in: DEFSTRUCT LEFT-RECURSION-RESULT ; (ESRAP::HEAD NIL :TYPE (OR NULL ESRAP::HEAD)) ; --> SB-INT:NAMED-LAMBDA FUNCTION BLOCK LET SB-KERNEL:THE* MULTIPLE-VALUE-BIND ; --> LET PROGN UNLESS IF OR LET IF ; ==> ; (TYPEP #:G28 'ESRAP::HEAD) ; ; note: can't open-code test of unknown type HEAD ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/esrap/src/results-tmpGOHEOA1Y.fasl ; compilation finished in 0:00:00.448 ; compiling file "/usr/share/common-lisp/source/esrap/src/cache/chunk.lisp" (written 07 OCT 2021 11:40:58 PM): ; processing (IN-PACKAGE #:ESRAP) ; processing (DEFCONSTANT +CHUNK-DIVISOR+ ...) ; processing (DEFTYPE CHUNK ...) ; processing (DECLAIM (INLINE MAKE-CHUNK)) ; processing (DEFUN MAKE-CHUNK ...) ; processing (DEFTYPE CHUNK-ARRAY ...) ; processing (DECLAIM (INLINE %MAKE-CHUNK-ARRAY)) ; processing (DEFUN %MAKE-CHUNK-ARRAY ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN MAKE-CHUNK-ARRAY ...) ; processing (DECLAIM (INLINE CHUNK-CACHE-CHUNKS)) ; processing (DEFSTRUCT (CHUNK-CACHE # ...) ...) ; processing (DECLAIM (SB-EXT:FREEZE-TYPE CHUNK-CACHE)) ; processing (DECLAIM (FTYPE # ...) ...) ; processing (DEFUN FIND-CHUNK ...) ; processing (DECLAIM (NOTINLINE FIND-CHUNK)) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN ENSURE-CHUNK ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/esrap/src/cache/chunk-tmpT2G5POAL.fasl ; compilation finished in 0:00:00.040 ; compiling file "/usr/share/common-lisp/source/esrap/src/cache/packrat.lisp" (written 07 OCT 2021 11:40:58 PM): ; processing (IN-PACKAGE #:ESRAP) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN CACHED ...) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN (SETF CACHED) ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/esrap/src/cache/packrat-tmpT5NQ1VS1.fasl ; compilation finished in 0:00:00.020 ; compiling file "/usr/share/common-lisp/source/esrap/src/context.lisp" (written 07 OCT 2021 11:40:58 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 (SB-EXT:FREEZE-TYPE 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/esrap/src/context-tmpZVTPRQAR.fasl ; compilation finished in 0:00:00.088 ; compiling file "/usr/share/common-lisp/source/esrap/src/evaluator.lisp" (written 07 OCT 2021 11:40:58 PM): ; processing (IN-PACKAGE #:ESRAP) ; processing (DECLAIM (FTYPE # ...)) ; processing (DEFUN RESOLVE-FUNCTION ...) ; processing (DEFVAR *CURRENT-RULE* ...) ; processing (DEFUN RULE-TRIVIAL-P ...) ; 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 (MACROLET (#) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/esrap/src/evaluator-tmpTWZBZGN3.fasl ; compilation finished in 0:00:05.696 ; compiling file "/usr/share/common-lisp/source/esrap/src/macros.lisp" (written 20 DEC 2021 02:01:41 AM): ; processing (IN-PACKAGE #:ESRAP) ; processing (DEFUN TEXT ...) ; processing (DEFUN SINGLETON-OPTION ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/esrap/src/macros-tmpVLA2P6BV.fasl ; compilation finished in 0:00:00.088 ; compiling file "/usr/share/common-lisp/source/esrap/src/interface.lisp" (written 07 OCT 2021 11:40:58 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 UNTRACE-ALL-RULES ...) ; processing (DEFUN RULE-EXPRESSION ...) ; processing (DEFUN (SETF RULE-EXPRESSION) ...) ; processing (DEFUN CHANGE-RULE ...) ; processing (DEFUN DESCRIBE-GRAMMAR ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/esrap/src/interface-tmpC1S9JRL9.fasl ; compilation finished in 0:00:00.156 ; compiling file "/usr/share/common-lisp/source/esrap/src/editor-support.lisp" (written 07 OCT 2021 11:40:58 PM): ; processing (IN-PACKAGE #:ESRAP) ; processing (DEFVAR *INDENTATION-HINT-TABLE* ...) ; processing (DEFUN HINT-SLIME-INDENTATION ...) ; processing (HINT-SLIME-INDENTATION) ; processing (DEFUN HINT-SLY-INDENTATION ...) ; processing (HINT-SLY-INDENTATION) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/esrap/src/editor-support-tmpYZ5WO3E4.fasl ; compilation finished in 0:00:00.008 ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL) ...) ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DEFCLASS URI ...) ; processing (DEFCLASS URN ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :EXECUTE) ...) ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :EXECUTE) ...) ; 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 STRING SYMBOL CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY ; CHARACTER (*)). ; (STRING= "/" PURI::PATH) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY ; CHARACTER (*)). ; (PLUSP PURI::PORT) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; 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. ; 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 STRING SYMBOL CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY ; CHARACTER (*)). ; (STRING= "" (CAR PURI::PL)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY ; CHARACTER (*)). ; 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. ; (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. ; 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 STRING (MEMBER T) STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING (MEMBER . #1=(T)) STREAM), 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 STRING (MEMBER T) STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING (MEMBER . #1=(T)) STREAM), 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. ; (CHAR STRING PURI::I) ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (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. ; (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) ; --> THE ; ==> ; (+ 1 PURI::NEW-I) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -1), not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -1), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -1), not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -1), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; ; 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 (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES (INTEGER 2) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER 1), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 2) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; --> THE ; ==> ; (+ 1 PURI::NEW-I) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -1), not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER -1), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES UNSIGNED-BYTE . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; 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 STRING SYMBOL CHARACTER), not a STRING. ; The second argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL ; CHARACTER), not a SIMPLE-BASE-STRING. ; The second argument is a (OR STRING SYMBOL ; CHARACTER), not a SIMPLE-BASE-STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY ; CHARACTER ; . #1=((*))). ; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY ; CHARACTER ; . #1#). ; (STRING= "." (CAR LAST)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY ; CHARACTER (*)). ; (STRING= "." (CAAR LAST)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY ; CHARACTER (*)). ; (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 STRING SYMBOL CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY ; CHARACTER (*)). ; (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 LIST VECTOR). ; (STRING= PURI::A PURI::B) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; The second argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL ; CHARACTER), not a SIMPLE-BASE-STRING. ; The second argument is a (OR STRING SYMBOL ; CHARACTER), not a SIMPLE-BASE-STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY ; CHARACTER ; . #1=((*))). ; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY ; CHARACTER ; . #1#). ; 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) ; (EQL (OR (PURI:URI-PORT PURI::URI1) PURI::DEFAULT-PORT) ; (OR (PURI:URI-PORT PURI::URI2) PURI::DEFAULT-PORT)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; (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 STRING SYMBOL CHARACTER), not a STRING. ; The second argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL ; CHARACTER), not a SIMPLE-BASE-STRING. ; The second argument is a (OR STRING SYMBOL ; CHARACTER), not a SIMPLE-BASE-STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY ; CHARACTER ; . #1=((*))). ; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY ; CHARACTER ; . #1#). ; (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 STRING SYMBOL CHARACTER), not a STRING. ; The second argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL ; CHARACTER), not a SIMPLE-BASE-STRING. ; The second argument is a (OR STRING SYMBOL ; CHARACTER), not a SIMPLE-BASE-STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY ; CHARACTER ; . #1=((*))). ; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY ; CHARACTER ; . #1#). ; (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 STRING SYMBOL CHARACTER), not a STRING. ; The second argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL ; CHARACTER), not a SIMPLE-BASE-STRING. ; The second argument is a (OR STRING SYMBOL ; CHARACTER), not a SIMPLE-BASE-STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY ; CHARACTER ; . #1=((*))). ; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY ; CHARACTER ; . #1#). ; (EQL (OR (PURI:URI-PORT PURI::URI1) PURI::DEFAULT-PORT) ; (OR (PURI:URI-PORT PURI::URI2) PURI::DEFAULT-PORT)) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a T, not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The second argument is a T, not a (UNSIGNED-BYTE 64). ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/puri/src-tmpHJA5IVPZ.fasl ; compilation finished in 0:00:00.864 ; compiling file "/usr/share/common-lisp/source/chunga/packages.lisp" (written 22 FEB 2022 01:13:47 AM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE :CHUNGA ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/chunga/packages-tmp3WS4A21E.fasl ; compilation finished in 0:00:00.000 ; compiling file "/usr/share/common-lisp/source/chunga/specials.lisp" (written 22 FEB 2022 01:13:47 AM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/chunga/specials-tmpPQ4U054N.fasl ; compilation finished in 0:00:00.012 ; compiling file "/usr/share/common-lisp/source/chunga/util.lisp" (written 22 FEB 2022 01:13:47 AM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/chunga/util-tmpC8SA9SZN.fasl ; compilation finished in 0:00:00.016 ; compiling file "/usr/share/common-lisp/source/chunga/known-words.lisp" (written 22 FEB 2022 01:13:47 AM): ; processing (IN-PACKAGE :CHUNGA) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/chunga/known-words-tmpWC0QU1SK.fasl ; compilation finished in 0:00:00.012 ; compiling file "/usr/share/common-lisp/source/chunga/conditions.lisp" (written 22 FEB 2022 01:13:47 AM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/chunga/conditions-tmpQQZMKNNN.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/chunga/read.lisp" (written 22 FEB 2022 01:13:47 AM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/chunga/read-tmpIDPPBBFN.fasl ; compilation finished in 0:00:00.180 ; compiling file "/usr/share/common-lisp/source/chunga/streams.lisp" (written 22 FEB 2022 01:13:47 AM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/chunga/streams-tmp9FP9ZO2K.fasl ; compilation finished in 0:00:00.020 ; compiling file "/usr/share/common-lisp/source/chunga/input.lisp" (written 22 FEB 2022 01:13:47 AM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/chunga/input-tmpTHQO2IGY.fasl ; compilation finished in 0:00:00.044 ; compiling file "/usr/share/common-lisp/source/chunga/output.lisp" (written 22 FEB 2022 01:13:47 AM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/chunga/output-tmpXGCY36O9.fasl ; compilation finished in 0:00:00.044 ; compiling file "/usr/share/common-lisp/source/drakma/packages.lisp" (written 17 JUL 2021 04:04:50 AM): ; processing (IN-PACKAGE :CL-USER) ; processing (DEFPACKAGE :DRAKMA ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/drakma/packages-tmpAZECCWRG.fasl ; compilation finished in 0:00:00.004 ; compiling file "/usr/share/common-lisp/source/drakma/specials.lisp" (written 17 JUL 2021 04:04:50 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/drakma/specials-tmpG300S9SF.fasl ; compilation finished in 0:00:00.012 ; compiling file "/usr/share/common-lisp/source/drakma/conditions.lisp" (written 17 JUL 2021 04:04:50 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/drakma/conditions-tmp809IFK9M.fasl ; compilation finished in 0:00:00.007 ; compiling file "/usr/share/common-lisp/source/drakma/util.lisp" (written 17 JUL 2021 04:04:50 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") ; --> IF ; ==> ; "Common Lisp" ; ; note: deleting unreachable code ; (OR (LISP-IMPLEMENTATION-VERSION) "") ; --> 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)))) ; --> 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/drakma/util-tmpSB12JM8J.fasl ; compilation finished in 0:00:00.112 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/usr/share/common-lisp/source/drakma/read.lisp" (written 17 JUL 2021 04:04:50 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/drakma/read-tmpBPQSLJ17.fasl ; compilation finished in 0:00:00.024 ; compiling file "/usr/share/common-lisp/source/drakma/cookies.lisp" (written 17 JUL 2021 04:04:50 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/drakma/cookies-tmpTAX50JN7.fasl ; compilation finished in 0:00:00.052 ; compiling file "/usr/share/common-lisp/source/drakma/encoding.lisp" (written 17 JUL 2021 04:04:50 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/drakma/encoding-tmpLPRKFQ4F.fasl ; compilation finished in 0:00:00.028 ; compiling file "/usr/share/common-lisp/source/drakma/request.lisp" (written 17 JUL 2021 04:04:50 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/drakma/request-tmp8VQNX3K0.fasl ; compilation finished in 0:00:00.436 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/local-time/src/package-tmpD0G9A1XR.fasl ; compilation finished in 0:00:00.000 ; 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*) ; --> 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DEFPARAMETER +UTC-ZONE+ ...) ; processing (DEFPARAMETER +GMT-ZONE+ ...) ; processing (DEFPARAMETER +NONE-ZONE+ ...) ; processing (DEFMACRO DEFINE-TIMEZONE ...) ; processing (EVAL-WHEN (:LOAD-TOPLEVEL :EXECUTE) ...) ; 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) ; ; 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) ; ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL) ...) ; 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) ; '(< =))))) ; --> 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (+ (CAAR LOCAL-TIME::PARTS) 2) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-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 ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (+ (CAAR LOCAL-TIME::PARTS) 2) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (DEFUN LOCAL-TIME::%SPLIT-TIMESTRING ; (LOCAL-TIME::TIME-STRING ; &KEY (LOCAL-TIME::START 0) ; (LOCAL-TIME::END (LENGTH LOCAL-TIME::TIME-STRING)) ; (LOCAL-TIME::FAIL-ON-ERROR T) (LOCAL-TIME::TIME-SEPARATOR #\:) ; (LOCAL-TIME::DATE-SEPARATOR #\-) ; (LOCAL-TIME::DATE-TIME-SEPARATOR #\T) ; (LOCAL-TIME::ALLOW-MISSING-ELEMENTS T) ; (LOCAL-TIME::ALLOW-MISSING-DATE-PART ; LOCAL-TIME::ALLOW-MISSING-ELEMENTS) ; (LOCAL-TIME::ALLOW-MISSING-TIME-PART ; LOCAL-TIME::ALLOW-MISSING-ELEMENTS) ; (LOCAL-TIME::ALLOW-MISSING-TIMEZONE-PART ; LOCAL-TIME::ALLOW-MISSING-TIME-PART)) ; #<(SIMPLE-ARRAY CHARACTER ; (257)) Based on http://www.ietf.org/rfc/rfc3339.txt including the function names used. Returns (values year month day hour minute second nsec offset-hour offset-minute). On parsing failure, signals INVALID-T... {100EC76A4F}> ; (DECLARE ; (TYPE CHARACTER LOCAL-TIME::DATE-TIME-SEPARATOR LOCAL-TIME::TIME-SEPARATOR ; LOCAL-TIME::DATE-SEPARATOR) ; (TYPE SIMPLE-STRING LOCAL-TIME::TIME-STRING) ; (OPTIMIZE (SPEED 3))) ; (THE LIST ; (LET (LOCAL-TIME::YEAR ; LOCAL-TIME::MONTH ; LOCAL-TIME::DAY ; LOCAL-TIME::HOUR ; LOCAL-TIME::MINUTE ; SECOND ; LOCAL-TIME::NSEC ; LOCAL-TIME::OFFSET-HOUR ; LOCAL-TIME::OFFSET-MINUTE) ; (DECLARE ; (TYPE # LOCAL-TIME::START LOCAL-TIME::END LOCAL-TIME::YEAR ; LOCAL-TIME::MONTH LOCAL-TIME::DAY LOCAL-TIME::HOUR ; LOCAL-TIME::MINUTE SECOND LOCAL-TIME::OFFSET-HOUR ; LOCAL-TIME::OFFSET-MINUTE) ; (TYPE # LOCAL-TIME::NSEC)) ; (MACROLET (# # #) ; (LABELS # ; #))))) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; ==> ; (BLOCK LOCAL-TIME::%SPLIT-TIMESTRING ; (THE LIST ; (LET (LOCAL-TIME::YEAR ; LOCAL-TIME::MONTH ; LOCAL-TIME::DAY ; LOCAL-TIME::HOUR ; LOCAL-TIME::MINUTE ; SECOND ; LOCAL-TIME::NSEC ; LOCAL-TIME::OFFSET-HOUR ; LOCAL-TIME::OFFSET-MINUTE) ; (DECLARE ; (TYPE # LOCAL-TIME::START LOCAL-TIME::END LOCAL-TIME::YEAR ; LOCAL-TIME::MONTH LOCAL-TIME::DAY LOCAL-TIME::HOUR ; LOCAL-TIME::MINUTE SECOND LOCAL-TIME::OFFSET-HOUR ; LOCAL-TIME::OFFSET-MINUTE) ; (TYPE # LOCAL-TIME::NSEC)) ; (MACROLET (# # #) ; (LABELS # ; #))))) ; ; note: Allocating a value-cell at runtime for checking possibly out of extent exit via ; (RETURN-FROM %SPLIT-TIMESTRING NIL). Use GO/RETURN-FROM with SAFETY 0, or ; declare the exit function DYNAMIC-EXTENT to avoid. ; (- (CDAR LOCAL-TIME::PARTS) (CAAR LOCAL-TIME::PARTS)) ; ; note: forced to do full call ; 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 ; . #2#). ; 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 . #2#). ; etc. ; ; note: forced to do full call ; 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 ; . #2#). ; 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 . #2#). ; etc. ; (+ (CAAR LOCAL-TIME::PARTS) 2) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (+ (CAAR LOCAL-TIME::PARTS) 4) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; 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 ; (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 (RATIONAL * (0)) (SINGLE-FLOAT * (0.0)) ; (DOUBLE-FLOAT * (0.0d0))), not a RATIONAL. ; (MINUSP LOCAL-TIME::VAL) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a T, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; 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 (RATIONAL * #2=(0)) (SINGLE-FLOAT * #3=(0.0)) ; (DOUBLE-FLOAT * #4=(0.0d0))), not a SINGLE-FLOAT. ; The result is a (VALUES ; (OR (DOUBLE-FLOAT #5=(-0.0d0)) (SINGLE-FLOAT #6=(-0.0)) ; (RATIONAL #7=(0))) ; . #8=(&OPTIONAL)), not a (VALUES SINGLE-FLOAT . #8#). ; unable to do #1# (cost 1) because: ; The first argument is a (OR (RATIONAL * #2#) (SINGLE-FLOAT * #3#) ; (DOUBLE-FLOAT * #4#)), not a DOUBLE-FLOAT. ; The result is a (VALUES ; (OR (DOUBLE-FLOAT #5#) (SINGLE-FLOAT #6#) ; (RATIONAL #7#)) ; . #8#), not a (VALUES DOUBLE-FLOAT . #8#). ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/local-time/src/local-time-tmp94C6TZKL.fasl ; compilation finished in 0:00:01.544 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/command-line-arguments/pkgdcl-tmpVSFQJ80K.fasl ; compilation finished in 0:00:00.004 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/command-line-arguments/argv-tmpPLK5HVAF.fasl ; compilation finished in 0:00:00.116 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/command-line-arguments/parse-tmp5FHTGX61.fasl ; compilation finished in 0:00:00.084 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/command-line-arguments/help-tmpKUF556D3.fasl ; compilation finished in 0:00:00.040 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/db3/package-tmpS8HGASGU.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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/db3/db3-tmpLXEY4I7N.fasl ; compilation finished in 0:00:00.156 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ieee-floats/ieee-floats-tmp1PA6XKV0.fasl ; compilation finished in 0:00:00.032 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ixf/package-tmpEW48DPG8.fasl ; compilation finished in 0:00:00.000 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ixf/records-tmp4ULRYCDK.fasl ; compilation finished in 0:00:00.052 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ixf/types-tmpV4ITDAY7.fasl ; compilation finished in 0:00:00.136 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ixf/encodings-tmpTU3G94ZX.fasl ; compilation finished in 0:00:00.004 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ixf/structs-tmp135V1U5P.fasl ; compilation finished in 0:00:00.248 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ixf/data-tmpCWE62HDI.fasl ; compilation finished in 0:00:00.036 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/ixf/ixf-tmpS0IX89E9.fasl ; compilation finished in 0:00:00.024 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/py-configparser/package-tmpYZNO705I.fasl ; compilation finished in 0:00:00.000 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/py-configparser/config-tmpZCDMKLMV.fasl ; compilation finished in 0:00:00.180 ; 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)) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA PY-CONFIGPARSER::EXTEND-INPUT ; (PY-CONFIGPARSER::P PY-CONFIGPARSER::C) ; (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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/py-configparser/parser-tmp8PPPCD7W.fasl ; compilation finished in 0:00:00.092 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/sqlite/sqlite-ffi-tmp9XWMC5IU.fasl ; compilation finished in 0:00:00.116 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/sqlite/cache-tmpHZ96ZBZW.fasl ; compilation finished in 0:00:00.036 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/sqlite/sqlite-tmpBGQALD1G.fasl ; compilation finished in 0:00:00.232 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/trivial-backtrace/dev/packages-tmp2DOYW25X.fasl ; compilation finished in 0:00:00.000 ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DEFUN DATE-TIME-STRING ...) ; processing (DEFUN FORMAT-DATE ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/trivial-backtrace/dev/utilities-tmp9030DGPL.fasl ; compilation finished in 0:00:00.052 ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DEFUN PRINT-BACKTRACE-TO-STREAM ...) ; processing (SETF (DOCUMENTATION # ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/trivial-backtrace/dev/backtrace-tmpU3EEB71F.fasl ; compilation finished in 0:00:00.027 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/trivial-backtrace/dev/map-backtrace-tmpY35TOM58.fasl ; compilation finished in 0:00:00.068 ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/trivial-backtrace/dev/fallback-tmp2N9C8E1O.fasl ; compilation finished in 0:00:00.004 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/metatilities-base/dev/package-tmpK6PVYHW5.fasl ; compilation finished in 0:00:00.000 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/metatilities-base/dev/api-tmpQ4PVTQY4.fasl ; compilation finished in 0:00:00.008 ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DEFUN NEQ ...) ; processing (DECLAIM (INLINE NEQ)) ; processing (DEFINE-COMPILER-MACRO NEQ ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; processing (DEFUN CURRENT-LOAD-FILE ...) ; processing (DEFMACRO WITH-UNIQUE-NAMES ...) ; processing (DEFUN ENSURE-LIST ...) ; processing (DEFUN ENSURE-FUNCTION ...) ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; (> METABANG.UTILITIES::X METABANG.UTILITIES::THRESHOLD) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; (< 0.0 METABANG.UTILITIES::X) ; ; note: forced to do full call ; unable to do #1=inline float comparison (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; unable to do #1# (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; (> METABANG.UTILITIES::THRESHOLD METABANG.UTILITIES::X) ; ; note: forced to do full call ; 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::X METABANG.UTILITIES::THRESHOLD) ; ; note: forced to do full call ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/metatilities-base/dev/l0-utils-tmpQ5W1BFSI.fasl ; compilation finished in 0:00:00.072 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/metatilities-base/dev/l0-strings-tmpKFZB7CG6.fasl ; compilation finished in 0:00:00.048 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/metatilities-base/dev/l0-macros-tmpEBQXHK8C.fasl ; compilation finished in 0:00:00.112 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/metatilities-base/dev/l0-arrays-tmpWFVO1741.fasl ; compilation finished in 0:00:00.008 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/metatilities-base/dev/l0-clos-tmpEGBHF4JG.fasl ; compilation finished in 0:00:00.068 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/metatilities-base/dev/l0-files-tmpDMKZ90UH.fasl ; compilation finished in 0:00:00.312 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/metatilities-base/dev/l0-time-tmpI4CB9XP0.fasl ; compilation finished in 0:00:00.688 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/metatilities-base/dev/set-equal-tmpB6CZFPOR.fasl ; compilation finished in 0:00:00.036 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/metatilities-base/dev/generic-lisp-tmpR0HRL6AF.fasl ; compilation finished in 0:00:00.032 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/metatilities-base/dev/generic-interface-tmpJW9LMMDM.fasl ; compilation finished in 0:00:00.280 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/metatilities-base/dev/defclass-star-tmp5AU4YXDC.fasl ; compilation finished in 0:00:00.476 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/metatilities-base/dev/copy-file-tmpGYUJ95L8.fasl ; compilation finished in 0:00:00.084 ; compiling file "/usr/share/common-lisp/source/metabang-bind/dev/packages.lisp" (written 01 JAN 2020 06:25:26 AM): ; processing (IN-PACKAGE #:COMMON-LISP-USER) ; processing (DEFPACKAGE #:METABANG.BIND ...) ; processing (DEFPACKAGE #:METABANG.BIND.DEVELOPER ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/metabang-bind/dev/packages-tmpSX2NSBN5.fasl ; compilation finished in 0:00:00.000 ; compiling file "/usr/share/common-lisp/source/metabang-bind/dev/macros.lisp" (written 01 JAN 2020 06:25:26 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/metabang-bind/dev/macros-tmpGSOGECKD.fasl ; compilation finished in 0:00:00.064 ; compiling file "/usr/share/common-lisp/source/metabang-bind/dev/bind.lisp" (written 01 JAN 2020 06:25:26 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/metabang-bind/dev/bind-tmpFADXA8WA.fasl ; compilation finished in 0:00:00.272 ; compiling file "/usr/share/common-lisp/source/metabang-bind/dev/binding-forms.lisp" (written 01 JAN 2020 06:25:26 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/metabang-bind/dev/binding-forms-tmpN3NRP2FJ.fasl ; compilation finished in 0:00:00.196 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/dynamic-classes/dev/package-tmpWFHX3XN3.fasl ; compilation finished in 0:00:00.000 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/dynamic-classes/dev/define-class-tmp47S258KN.fasl ; compilation finished in 0:00:00.060 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/dynamic-classes/dev/dynamic-class-tmpE4V4F8OD.fasl ; compilation finished in 0:00:00.044 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-containers/dev/package-tmpLCU5UNL8.fasl ; compilation finished in 0:00:00.004 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-containers/dev/conditions-tmpYY5JG2YX.fasl ; compilation finished in 0:00:00.020 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-containers/dev/container-api-tmpK2OIRK3I.fasl ; compilation finished in 0:00:00.084 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-containers/dev/containers-tmpLMNSRE4F.fasl ; compilation finished in 0:00:00.360 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-containers/dev/basic-operations-tmpFH2B6ZC1.fasl ; compilation finished in 0:00:01.172 ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL) ...) ; 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) ; --> 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)) ; --> 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-containers/dev/queues-tmp9ESR3THZ.fasl ; compilation finished in 0:00:00.256 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-containers/dev/stacks-tmpEP9DKHA4.fasl ; compilation finished in 0:00:00.048 ; 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 ...) ; processing (DEFMETHOD ITEM-AT! ...) ; 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! ...) ; processing (DEFUN RESIZE-VECTOR ...) ; processing (DEFMETHOD SAMEP ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-containers/dev/vectors-tmp6GNWGQ69.fasl ; compilation finished in 0:00:00.100 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-containers/dev/trees-tmpTOEVPV91.fasl ; compilation finished in 0:00:01.352 ; 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 ...) ; 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 ...) ; 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 ...) ; 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) ; (FUNCALL METABANG.CL-CONTAINERS::KEY ; (METABANG.UTILITIES:ELEMENT METABANG.CL-CONTAINERS::N)) ; ; note: could not stack allocate: (FUNCALL KEY (ELEMENT N)) ; ; note: could not stack allocate: (FUNCALL KEY (ELEMENT N)) ; 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) ; (FUNCALL METABANG.CL-CONTAINERS::KEY ; (METABANG.UTILITIES:ELEMENT METABANG.CL-CONTAINERS::N)) ; ; note: could not stack allocate: (FUNCALL KEY (ELEMENT N)) ; 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) ; (FUNCALL METABANG.CL-CONTAINERS::KEY ; (METABANG.UTILITIES:ELEMENT METABANG.CL-CONTAINERS::N)) ; ; note: could not stack allocate: (FUNCALL KEY (ELEMENT N)) ; 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) ; (FUNCALL METABANG.CL-CONTAINERS::KEY ; (METABANG.UTILITIES:ELEMENT METABANG.CL-CONTAINERS::N)) ; ; note: could not stack allocate: (FUNCALL KEY (ELEMENT N)) ; 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) ; (FUNCALL METABANG.CL-CONTAINERS::KEY ; (METABANG.UTILITIES:ELEMENT METABANG.CL-CONTAINERS::NODE)) ; ; note: could not stack allocate: (FUNCALL KEY (ELEMENT 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) ; (FUNCALL METABANG.CL-CONTAINERS::KEY ; (METABANG.UTILITIES:ELEMENT METABANG.CL-CONTAINERS::NODE)) ; ; note: could not stack allocate: (FUNCALL KEY (ELEMENT 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-containers/dev/lists-tmpJKXRXFYA.fasl ; compilation finished in 0:00:00.584 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-containers/dev/bags-and-sets-tmpKW802XDA.fasl ; compilation finished in 0:00:00.312 ; 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 ...) ; processing (DEFMETHOD ITEM-AT! ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-containers/dev/ring-buffers-tmpO26O9DBY.fasl ; compilation finished in 0:00:00.040 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-containers/dev/miscellaneous-tmpYLEULPBM.fasl ; compilation finished in 0:00:00.160 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-containers/dev/associative-tmpF9PT7DQ2.fasl ; compilation finished in 0:00:00.896 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-containers/dev/compatibility-tmpZVXJSSK9.fasl ; compilation finished in 0:00:01.880 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-containers/dev/quad-tree-tmpHE83XZ7O.fasl ; compilation finished in 0:00:00.060 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-containers/dev/heaps-tmpU3H21CW4.fasl ; compilation finished in 0:00:00.560 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-containers/dev/container-mixins-tmp6L9FXRGE.fasl ; compilation finished in 0:00:00.164 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-containers/dev/union-find-container-tmp4SNFF0M5.fasl ; compilation finished in 0:00:00.092 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-containers/dev/package-container-tmpCM27R9AJ.fasl ; compilation finished in 0:00:00.060 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-containers/dev/iterator-api-tmp46E7TEHY.fasl ; compilation finished in 0:00:00.012 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-containers/dev/iterators-tmpMW4DE87N.fasl ; compilation finished in 0:00:00.856 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-containers/dev/file-iterators-tmp2JNAKTBR.fasl ; compilation finished in 0:00:00.480 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-containers/dev/dynamic-classes-tmpMR8VKH1U.fasl ; compilation finished in 0:00:00.244 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-containers/dev/dynamic-class-defs-tmp4HP247ND.fasl ; compilation finished in 0:00:00.196 ; compiling file "/usr/share/common-lisp/source/anaphora/packages.lisp" (written 02 FEB 2022 09:09:24 AM): ; processing (DEFPACKAGE :ANAPHORA ...) ; processing (DEFPACKAGE :ANAPHORA-BASIC ...) ; processing (DEFPACKAGE :ANAPHORA-SYMBOL ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/anaphora/packages-tmpCBPA3J2K.fasl ; compilation finished in 0:00:00.000 ; compiling file "/usr/share/common-lisp/source/anaphora/early.lisp" (written 02 FEB 2022 09:09:24 AM): ; processing (IN-PACKAGE :ANAPHORA) ; processing (DEFMACRO WITH-UNIQUE-NAMES ...) ; processing (DEFMACRO IGNORE-FIRST ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/anaphora/early-tmpUKEKWS3E.fasl ; compilation finished in 0:00:00.028 ; compiling file "/usr/share/common-lisp/source/anaphora/symbolic.lisp" (written 02 FEB 2022 09:09:24 AM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/anaphora/symbolic-tmpP1N1L2FE.fasl ; compilation finished in 0:00:00.032 ; compiling file "/usr/share/common-lisp/source/anaphora/anaphora.lisp" (written 02 FEB 2022 09:09:24 AM): ; 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 ...) ; processing (DEFMACRO ALAMBDA ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/anaphora/anaphora-tmpJZ1AFCDQ.fasl ; compilation finished in 0:00:00.252 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-markdown/dev/package-tmpE2RDUEQF.fasl ; compilation finished in 0:00:00.004 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-markdown/dev/api-tmpB4PWHQTJ.fasl ; compilation finished in 0:00:00.020 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-markdown/dev/definitions-tmpX1YMGP2L.fasl ; compilation finished in 0:00:00.000 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-markdown/dev/macros-tmp10W3LB9F.fasl ; compilation finished in 0:00:00.176 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-markdown/dev/class-defs-tmpK2B1ODJ1.fasl ; compilation finished in 0:00:00.508 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-markdown/dev/utilities-tmp5C6SBQY7.fasl ; compilation finished in 0:00:00.384 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-markdown/dev/regexes-tmpQJDP3B3H.fasl ; compilation finished in 0:00:00.048 ; 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 ...) ; processing (DEFMETHOD UNCONVERT-ESCAPES ...) ; processing (DEFMETHOD UNCONVERT-ESCAPES ...) ; processing (DEFMETHOD UNCONVERT-ESCAPES ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-markdown/dev/spans-tmpT6PBJ345.fasl ; compilation finished in 0:00:00.296 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-markdown/dev/markdown-tmpP7KOSV72.fasl ; compilation finished in 0:00:00.480 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-markdown/dev/html-tmpFERHD10F.fasl ; compilation finished in 0:00:00.380 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-markdown/dev/plain-tmpTVXHO5TD.fasl ; compilation finished in 0:00:00.036 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-markdown/dev/multiple-documents-tmp6XR5LAPW.fasl ; compilation finished in 0:00:00.172 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-markdown/dev/epilogue-tmpGEPT0T15.fasl ; compilation finished in 0:00:00.000 ; 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 (EVAL-WHEN (:LOAD-TOPLEVEL :EXECUTE) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-markdown/dev/extension-mechanisms-tmpMKX5S6TB.fasl ; compilation finished in 0:00:00.088 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-markdown/dev/extensions-tmpT1R329DD.fasl ; compilation finished in 0:00:00.152 ; 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 (EVAL-WHEN (:LOAD-TOPLEVEL :EXECUTE) ...) ; processing (DEFUN FOOTNOTE ...) ; processing (DEFUN FOOTNOTES ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-markdown/dev/footnotes-tmpYV9QWBE7.fasl ; compilation finished in 0:00:00.028 ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 ...) ; file: /usr/share/common-lisp/source/trivial-utf-8/trivial-utf-8.lisp ; in: DEFUN UTF-8-BYTES-TO-STRING ; (COERCE TRIVIAL-UTF-8::BYTES-IN '(SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (AND VECTOR ; (NOT ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; . #1=((*))))), not a (SIMPLE-ARRAY * . #1#). ; processing (DEFUN READ-UTF-8-STRING ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/trivial-utf-8/trivial-utf-8-tmpY7Z87FVE.fasl ; compilation finished in 0:00:00.684 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/uuid/uuid-tmpZD0W6AUM.fasl ; compilation finished in 0:00:00.260 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-utilities/package-tmpRVZ12GJ7.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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-utilities/split-sequence-tmp4T72OGWB.fasl ; compilation finished in 0:00:00.892 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-utilities/with-unique-names-tmp30O6M23N.fasl ; compilation finished in 0:00:00.032 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-utilities/once-only-tmp523JK0GJ.fasl ; compilation finished in 0:00:00.024 ; 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... {100608244F}> ; (CL-UTILITIES::WITH-CHECK-LENGTH (SEQUENCE CL-UTILITIES::START ; CL-UTILITIES::END) ; (REDUCE ; (CL-UTILITIES::COMPARATOR CL-UTILITIES::PREDICATE CL-UTILITIES::KEY) ; SEQUENCE :START CL-UTILITIES::START :END CL-UTILITIES::END))) ; ==> ; (SB-IMPL::%DEFUN 'CL-UTILITIES:EXTREMUM ; (SB-INT:NAMED-LAMBDA CL-UTILITIES:EXTREMUM ; (SEQUENCE CL-UTILITIES::PREDICATE &KEY ; (CL-UTILITIES::KEY #'IDENTITY) (CL-UTILITIES::START 0) ; CL-UTILITIES::END) ; #<(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... {100608244F}> ; (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)) ; --> IF OR LET 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)) ; --> IF OR LET IF >= ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: unable to open code because: The operands might not be the same type. ; ; note: forced to do full call ; 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 full call ; 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. ; processing (DEFUN EXTREMA ...) ; processing (DEFINE-CONDITION N-MOST-EXTREME-NOT-ENOUGH-ELEMENTS ...) ; processing (DEFUN N-MOST-EXTREME ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-utilities/extremum-tmp2T656F3Z.fasl ; compilation finished in 0:00:00.212 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-utilities/read-delimited-tmpU8E6U186.fasl ; compilation finished in 0:00:00.144 ; 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 REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES DOUBLE-FLOAT &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a INTEGER. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a INTEGER. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES DOUBLE-FLOAT &REST T). ; (MOD (EXPT CL-UTILITIES::N CL-UTILITIES::EXPONENT) CL-UTILITIES::MODULUS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a (OR FLOAT INTEGER). ; ; note: unable to ; 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 in mixed 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 in mixed 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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; 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 full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; The result is a (VALUES REAL . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; processing (DEFINE-COMPILER-MACRO EXPT-MOD ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-utilities/expt-mod-tmpUVEMO1OX.fasl ; compilation finished in 0:00:00.020 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-utilities/compose-tmpPDN0DF20.fasl ; compilation finished in 0:00:00.004 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-utilities/collecting-tmp1SCDPCYF.fasl ; compilation finished in 0:00:00.032 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-utilities/rotate-byte-tmp31LDQ8IW.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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-utilities/copy-array-tmpXQHFS7J0.fasl ; compilation finished in 0:00:00.028 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/quri/src/port-tmpZU3XIPN7.fasl ; compilation finished in 0:00:00.000 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/quri/src/uri-tmpOLPZFU22.fasl ; compilation finished in 0:00:00.092 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/quri/src/encode-tmpE8NZG6A8.fasl ; compilation finished in 0:00:00.164 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/quri/src/error-tmpKRRUKJSC.fasl ; compilation finished in 0:00:00.020 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/quri/src/util-tmpU2ISN61U.fasl ; compilation finished in 0:00:00.168 ; 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)))) ; --> QURI.UTIL::%WITH-ARRAY-PARSING LET MACROLET TAGBODY LOCALLY SETQ THE IF ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; --> QURI.UTIL::%WITH-ARRAY-PARSING LET MACROLET TAGBODY LOCALLY SETQ THE IF ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; (QURI.UTIL:GONEXT) ; --> LOCALLY SETQ THE IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; --> LOCALLY SETQ THE IF AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; --> LOCALLY SETQ THE IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; --> LOCALLY SETQ THE IF AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; (QURI.UTIL:GOTO QURI.DECODE::PARSING) ; --> SETQ THE IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; --> SETQ THE IF AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; (QURI.UTIL:REDO) ; --> LOCALLY SETQ THE IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; --> LOCALLY SETQ THE IF AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; --> LOCALLY SETQ THE IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; --> LOCALLY SETQ THE IF AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; (- QURI.DECODE::END QURI.DECODE::START) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (signed-byte 64) arithmetic (cost 5) 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) ; . #1#). ; 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)))) ; --> QURI.UTIL::%WITH-ARRAY-PARSING LET MACROLET TAGBODY WHEN IF = ; ==> ; 1 ; ; note: forced to do full call ; 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. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; etc. ; (INCF QURI.DECODE::I) ; --> THE ; ==> ; (+ 1 QURI.DECODE::I) ; ; 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 (INTEGER 1) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 1) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; 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))))) ; --> QURI.UTIL::%WITH-ARRAY-PARSING LET MACROLET TAGBODY LOCALLY SETQ THE IF ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; --> QURI.UTIL::%WITH-ARRAY-PARSING LET MACROLET TAGBODY LOCALLY SETQ THE IF ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; (QURI.UTIL:GOTO QURI.DECODE::PARSING-VALUE) ; --> SETQ THE IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; --> SETQ THE IF AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; (QURI.UTIL:REDO) ; --> LOCALLY SETQ THE IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; --> LOCALLY SETQ THE IF AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; (QURI.UTIL:GONEXT) ; --> LOCALLY SETQ THE IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; --> LOCALLY SETQ THE IF AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; --> LOCALLY SETQ THE IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; --> LOCALLY SETQ THE IF AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; (QURI.UTIL:GOTO QURI.DECODE::START) ; --> SETQ THE IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; --> SETQ THE IF AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; (QURI.UTIL:REDO) ; --> LOCALLY SETQ THE IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; --> LOCALLY SETQ THE IF AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; (QURI.UTIL:GOTO QURI.DECODE::START) ; --> SETQ THE IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; --> SETQ THE IF AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; (QURI.UTIL:REDO) ; --> LOCALLY SETQ THE IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; --> LOCALLY SETQ THE IF AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (OR STRING ; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) ; (*))), not a SIMPLE-ARRAY. ; (QURI.UTIL:WITH-ARRAY-PARSING (CHAR QURI.DECODE::P QURI.DECODE::DATA ; QURI.DECODE::START QURI.DECODE::END ; (AND (NOT (STRINGP QURI.DECODE::DATA)) ; #'CODE-CHAR)) ; (QURI.DECODE::START (SETQ QURI.DECODE::START-MARK QURI.DECODE::P) ; (IF QURI.DECODE::LENIENT ; (COND (# # #) (# #)) ; (WHEN (OR # #) (ERROR 'QURI.ERROR:URI-MALFORMED-URLENCODED-STRING))) ; (QURI.UTIL:GONEXT)) ; (QURI.DECODE::PARSING-FIELD ; (COND ((CHAR= CHAR #\=) (SETQ #) (QURI.UTIL:GONEXT)) ; ((CHAR= CHAR QURI.DECODE::DELIMITER) ; (QURI.DECODE::COLLECT-FIELD QURI.DECODE::P) ; (QURI.UTIL:GOTO QURI.DECODE::START))) ; (QURI.UTIL:REDO)) ; (QURI.DECODE::PARSING-VALUE ; (COND ((CHAR= CHAR #\=) (UNLESS QURI.DECODE::LENIENT #)) ; ((CHAR= CHAR QURI.DECODE::DELIMITER) ; (QURI.DECODE::COLLECT-PAIR QURI.DECODE::P) ; (QURI.UTIL:GOTO QURI.DECODE::START))) ; (QURI.UTIL:REDO)) ; (:EOF ; (COND (QURI.DECODE::=-MARK (QURI.DECODE::COLLECT-PAIR QURI.DECODE::P)) ; (QURI.DECODE::START-MARK ; (QURI.DECODE::COLLECT-FIELD QURI.DECODE::P))))) ; --> QURI.UTIL::%WITH-ARRAY-PARSING LET MACROLET TAGBODY WHEN IF = ; ==> ; 1 ; ; note: forced to do full call ; 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. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64). ; etc. ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/quri/src/decode-tmpJVKJGHUO.fasl ; compilation finished in 0:00:00.184 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/quri/src/uri/ftp-tmpRFLT88I5.fasl ; compilation finished in 0:00:00.044 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/quri/src/uri/http-tmp9OPB60VM.fasl ; compilation finished in 0:00:00.056 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/quri/src/uri/ldap-tmpSVDN4TBO.fasl ; compilation finished in 0:00:00.128 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/quri/src/uri/file-tmpF5QPE831.fasl ; compilation finished in 0:00:00.040 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/quri/src/etld-tmpLAAFHLHW.fasl ; compilation finished in 0:00:00.012 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/quri/src/domain-tmpBYA9SD1Y.fasl ; compilation finished in 0:00:00.100 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/quri/src/parser-tmpFLAO1CYQ.fasl ; compilation finished in 0:00:01.212 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/quri/src/quri-tmpSKUEHB49.fasl ; compilation finished in 0:00:00.120 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-mustache/packages-tmpDHXMA9ET.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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-mustache/mustache-tmpXPODQDBQ.fasl ; compilation finished in 0:00:00.520 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-mustache/compat-api-v1-tmpON3EBOWQ.fasl ; compilation finished in 0:00:00.032 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/yason/package-tmp5DE7FWXL.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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/yason/encode-tmpNR0FXTOU.fasl ; compilation finished in 0:00:00.244 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/yason/parse-tmpIS216RW.fasl ; compilation finished in 0:00:00.108 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/closure-common/package-tmp11752V0C.fasl ; compilation finished in 0:00:00.156 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/closure-common/definline-tmpONM4L97G.fasl ; compilation finished in 0:00:00.012 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/closure-common/characters-tmpR4BLTE1D.fasl ; compilation finished in 0:00:00.080 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/closure-common/syntax-tmpONQ4LJWF.fasl ; compilation finished in 0:00:00.052 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/closure-common/encodings-tmpFPHBYJPO.fasl ; compilation finished in 0:00:00.860 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/closure-common/encodings-data-tmpXKL3NHA4.fasl ; compilation finished in 0:00:00.044 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/closure-common/xstream-tmp3KKXCXYY.fasl ; compilation finished in 0:00:00.416 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/closure-common/ystream-tmpVACGDARV.fasl ; compilation finished in 0:00:00.552 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/closure-common/hax-tmpYII9B406.fasl ; compilation finished in 0:00:00.068 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cxml/xml/package-tmpA2CNLB7.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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cxml/xml/util-tmpG5J7KPU1.fasl ; compilation finished in 0:00:00.036 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cxml/xml/sax-handler-tmp981UY8DC.fasl ; compilation finished in 0:00:00.892 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cxml/xml/xml-name-rune-p-tmpZ1XIHDCA.fasl ; compilation finished in 0:00:00.124 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cxml/xml/split-sequence-tmpSXW96VDS.fasl ; compilation finished in 0:00:00.084 ; 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*)) ; --> 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*)) ; --> 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))) ; --> 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) ; --> 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)) ; --> 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cxml/xml/xml-parse-tmpJOZ4RWJ2.fasl ; compilation finished in 0:00:03.976 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cxml/xml/unparse-tmpBECHKCQ0.fasl ; compilation finished in 0:00:01.472 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cxml/xml/xmls-compat-tmpOYQY6WIA.fasl ; compilation finished in 0:00:00.216 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cxml/xml/recoder-tmp50O9T7IY.fasl ; compilation finished in 0:00:00.107 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cxml/xml/xmlns-normalizer-tmpGZL21UBE.fasl ; compilation finished in 0:00:00.096 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cxml/xml/space-normalizer-tmpAKRW6QK6.fasl ; compilation finished in 0:00:00.080 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cxml/xml/catalog-tmp8J071LEX.fasl ; compilation finished in 0:00:00.460 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cxml/xml/sax-proxy-tmp9EISPCFY.fasl ; compilation finished in 0:00:00.176 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cxml/xml/atdoc-configuration-tmpRZ31FVZM.fasl ; compilation finished in 0:00:00.004 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cxml/dom/package-tmpT7RFXS2O.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)) ; --> 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cxml/dom/dom-impl-tmpALSWN3ZO.fasl ; compilation finished in 0:00:01.584 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cxml/dom/dom-builder-tmp8525G5XJ.fasl ; compilation finished in 0:00:00.192 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cxml/dom/dom-sax-tmpNBWMKLPF.fasl ; compilation finished in 0:00:00.060 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cxml/klacks/package-tmpZ7NED271.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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cxml/klacks/klacks-tmpVAWG08RM.fasl ; compilation finished in 0:00:00.308 ; 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))))) ; --> 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 ; (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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cxml/klacks/klacks-impl-tmp29JNO94I.fasl ; compilation finished in 0:00:00.896 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cxml/klacks/tap-source-tmp9HJS3WPK.fasl ; compilation finished in 0:00:00.052 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cxml/test/domtest-tmp6OWTJDXT.fasl ; compilation finished in 0:00:00.700 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cxml/test/xmlconf-tmpERQILLDF.fasl ; compilation finished in 0:00:00.091 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/zs3/package-tmpYZQK9040.fasl ; compilation finished in 0:00:00.000 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/zs3/utils-tmpMV6W92GO.fasl ; compilation finished in 0:00:00.196 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/zs3/crypto-tmp886ACX8P.fasl ; compilation finished in 0:00:00.068 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/zs3/xml-binding-tmp34OPD42E.fasl ; compilation finished in 0:00:00.160 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/zs3/xml-output-tmpG6RL7DFQ.fasl ; compilation finished in 0:00:00.004 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/zs3/credentials-tmp523HMA4J.fasl ; compilation finished in 0:00:00.044 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/zs3/post-tmp7QUN41F9.fasl ; compilation finished in 0:00:00.020 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/zs3/redirects-tmp6435NPRK.fasl ; compilation finished in 0:00:00.056 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/zs3/request-tmpHHG39W7F.fasl ; compilation finished in 0:00:00.232 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 ...) ; file: /usr/share/common-lisp/source/zs3/response.lisp ; in: DEFUN SUBMIT-REQUEST ; (HANDLER-CASE ; (LET ((ZS3::RESPONSE ; (ZS3::REQUEST-RESPONSE ZS3::REQUEST :KEEP-STREAM ZS3::KEEP-STREAM ; :BODY-STREAM ZS3::BODY-STREAM :HANDLER ZS3::HANDLER))) ; (ZS3::MAYBE-SIGNAL-ERROR ZS3::RESPONSE) ; (SETF (ZS3::REQUEST ZS3::RESPONSE) ZS3::REQUEST) ; (RETURN ZS3::RESPONSE)) ; (ZS3::TEMPORARY-REDIRECT (CONDITION) ; (SETF (ZS3::ENDPOINT ZS3::REQUEST) ; (ZS3::REQUEST-ERROR-ENDPOINT CONDITION))) ; (ZS3::AUTHORIZATION-HEADER-MALFORMED (CONDITION) ; (LET ((ZS3::REGION #)) ; (SETF # #) ; (SETF # ZS3::REGION))) ; (ZS3::PERMANENT-REDIRECT (CONDITION) ; (LET ((ZS3::NEW-ENDPOINT #) (ZS3::NEW-REGION #)) ; (SETF # #) ; (SETF # ZS3::NEW-ENDPOINT) ; (WHEN ZS3::NEW-REGION (SETF #)))) ; (ZS3:INTERNAL-ERROR (ZS3::E) (ZS3::CLOSE-KEEP-ALIVE) ; (WHEN (MINUSP (DECF ZS3::TRIES)) (ERROR ZS3::E)) (SLEEP ZS3::DELAY) ; (INCF ZS3::DELAY ZS3::DELAY)) ; (ERROR (ZS3::E) (ZS3::CLOSE-KEEP-ALIVE) (ERROR ZS3::E))) ; --> BLOCK RETURN-FROM #:FUN3 BLOCK RETURN-FROM #:FUN5 BLOCK RETURN-FROM ; --> #:FUN7 BLOCK RETURN-FROM #:FUN9 BLOCK RETURN-FROM #:FUN11 BLOCK ; --> SB-KERNEL::%HANDLER-BIND LET SB-INT:DX-FLET FLET SB-INT:DX-LET LET CONS ; ==> ; 1 ; ; note: can't open-code test of unknown type TEMPORARY-REDIRECT ; ; note: can't open-code test of unknown type AUTHORIZATION-HEADER-MALFORMED ; ; note: can't open-code test of unknown type PERMANENT-REDIRECT ; ; note: can't open-code test of unknown type INTERNAL-ERROR ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/zs3/response-tmpIV07R04M.fasl ; compilation finished in 0:00:00.180 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/zs3/objects-tmp2ANY66A8.fasl ; compilation finished in 0:00:00.040 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/zs3/bucket-listing-tmpX4XJNZSN.fasl ; compilation finished in 0:00:00.116 ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/zs3/errors-tmp349SZV56.fasl ; compilation finished in 0:00:00.240 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/zs3/acl-tmpIFTUZKCX.fasl ; compilation finished in 0:00:00.092 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/zs3/logging-tmpJ3BP3DY8.fasl ; compilation finished in 0:00:00.032 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/zs3/location-tmp9NC1M3HR.fasl ; compilation finished in 0:00:00.008 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/zs3/interface-tmpCQV7SEDP.fasl ; compilation finished in 0:00:01.572 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/zs3/cloudfront-tmpOD15IJQ.fasl ; compilation finished in 0:00:00.536 ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/zs3/lifecycle-tmpGB8XX1TU.fasl ; compilation finished in 0:00:00.224 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/params.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/params-tmpMU5GUFP8.fasl ; compilation finished in 0:00:00.208 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/package.lisp" (written 23 OCT 2022 11:12:05 PM): ; processing (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL ...) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/package-tmpBP201KII.fasl ; compilation finished in 0:00:00.108 WARNING: PGLOADER.UTILS also exports the following symbols: (PGLOADER.CATALOG:ADD-COLUMN PGLOADER.STATE:REPORT-PGTABLE-STATS PGLOADER.CATALOG:SQLTYPE-LIST PGLOADER.CATALOG:CITUS-FORMAT-SQL-SELECT PGLOADER.CATALOG:MAKE-CITUS-DISTRIBUTED-RULE PGLOADER.STATE:PGSTATE-TABLES PGLOADER.CATALOG:ADD-INDEX PGLOADER.CATALOG:FKEY-DELETE-RULE PGLOADER.STATE:REPORT-HEADER PGLOADER.CATALOG:COUNT-FKEYS PGLOADER.STATE:STATE-POSTLOAD PGLOADER.QUERIES:SQL-URL-FOR-VARIANT PGLOADER.CATALOG:FKEY-MATCH-RULE PGLOADER.CATALOG:SCHEMA-VIEW-LIST PGLOADER.CATALOG:FIND-INDEX PGLOADER.STATE:PGTABLE-REJECT-DATA PGLOADER.CITUS:CITUS-DISTRIBUTE-SCHEMA PGLOADER.CATALOG:PROCEDURE PGLOADER.STATE:REPORT-TABLE-NAME PGLOADER.CATALOG:SCHEMA PGLOADER.CATALOG:SCHEMA-SOURCE-NAME PGLOADER.CATALOG:COLUMN-NULLABLE PGLOADER.CATALOG:COLUMN-TYPE-MOD PGLOADER.CITUS:CITUS-REFERENCE-RULE-P PGLOADER.STATE:CREATE-STATE PGLOADER.CATALOG:FKEY-FOREIGN-COLUMNS 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.MONITOR:WITH-STATS-COLLECTION PGLOADER.CATALOG:INDEX-CONNAME PGLOADER.MONITOR:PROCESS-BAD-ROW PGLOADER.CATALOG:SQLTYPE-NAME PGLOADER.CATALOG:TABLE PGLOADER.CATALOG:MAYBE-ADD-TABLE PGLOADER.CATALOG:COLUMN-TRANSFORM-DEFAULT PGLOADER.CATALOG:TABLE-CITUS-RULE PGLOADER.CATALOG:INDEX-COLUMNS PGLOADER.CATALOG:FIND-FKEY PGLOADER.CATALOG:INDEX-SCHEMA PGLOADER.CATALOG:CITUS-REFERENCE-RULE-RULE PGLOADER.CATALOG:SCHEMA-TABLE-LIST PGLOADER.MONITOR:START-MONITOR PGLOADER.CATALOG:MAKE-REGEX-MATCH-RULE PGLOADER.CATALOG:CITUS-DISTRIBUTED-RULE-USING PGLOADER.MONITOR:SEND-EVENT PGLOADER.CATALOG:CATALOG-TYPES-WITHOUT-BTREE PGLOADER.CATALOG:FORMAT-CREATE-SQL PGLOADER.CITUS:CITUS-REFERENCE-RULE-TABLE PGLOADER.CATALOG:SQLTYPE PGLOADER.STATE:PGSTATE-SETF PGLOADER.CATALOG:COLUMN-DEFAULT PGLOADER.CATALOG:MAKE-PROCEDURE PGLOADER.STATE:PGSTATE-INCF PGLOADER.CATALOG:ADD-FKEY PGLOADER.STATE:REPORT-PGSTATE-STATS PGLOADER.CATALOG:MATCH-RULE-SCHEMA PGLOADER.STATE:PGTABLE-SECS PGLOADER.MONITOR:FLUSH-SUMMARY PGLOADER.CATALOG:MAKE-SQLTYPE PGLOADER.CATALOG:MAKE-STRING-MATCH-RULE PGLOADER.CATALOG:INDEX-NAME PGLOADER.CATALOG:SCHEMA-EXTENSION-LIST PGLOADER.CATALOG:CITUS-BACKFILL-TABLE-P PGLOADER.CATALOG:FKEY-COLUMNS PGLOADER.CATALOG:MATCH-RULE-ACTION PGLOADER.CATALOG:CATALOG-DISTRIBUTION-RULES PGLOADER.CATALOG:SCHEMA-IN-SEARCH-PATH PGLOADER.CATALOG:FKEY-UPDATE-RULE PGLOADER.MONITOR:NEW-LABEL PGLOADER.CATALOG:STRING-MATCH-RULE-TARGET PGLOADER.CATALOG:MAYBE-ADD-INDEX PGLOADER.CATALOG:PROCEDURE-NAME PGLOADER.CATALOG:INDEX-CONDEF PGLOADER.STATE:REPORT-FOOTER PGLOADER.CATALOG:PUSH-TO-END PGLOADER.CATALOG:PROCEDURE-RETURNS PGLOADER.CATALOG:PROCEDURE-BODY PGLOADER.CATALOG:MATCH-RULE-RULE PGLOADER.STATE:PGSTATE-DECF PGLOADER.CATALOG:ALTER-TABLE PGLOADER.CATALOG:TABLE-ROW-COUNT-ESTIMATE PGLOADER.CATALOG:TRIGGER-TABLE PGLOADER.STATE:PGSTATE-ROWS PGLOADER.CATALOG:INDEX-SQL PGLOADER.CATALOG:MATVIEW PGLOADER.CATALOG:CREATE-TABLE PGLOADER.CATALOG:TABLE-NAME PGLOADER.CATALOG:MAKE-MATVIEW PGLOADER.CATALOG:TABLE-OID PGLOADER.CATALOG:MAYBE-ADD-FKEY PGLOADER.CATALOG:MAKE-TABLE PGLOADER.CATALOG:WITH-SCHEMA PGLOADER.STATE:PGSTATE-TABNAMES PGLOADER.CATALOG:TABLE-INDEX-LIST PGLOADER.STATE:STATE-SECS PGLOADER.MONITOR:ELAPSED-TIME-SINCE PGLOADER.CATALOG:FIND-VIEW PGLOADER.CATALOG: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:TABLE-TRIGGER-LIST PGLOADER.CATALOG:FKEY-FOREIGN-TABLE PGLOADER.CATALOG:REGEX-MATCH-RULE-TARGET PGLOADER.CATALOG:ADD-TABLE PGLOADER.CATALOG:ADD-VIEW PGLOADER.CATALOG:FKEY-NAME PGLOADER.STATE:PGTABLE-START PGLOADER.STATE:PGTABLE-STOP PGLOADER.CATALOG:FORMAT-DEFAULT-VALUE PGLOADER.STATE:PGSTATE-ERRS PGLOADER.CATALOG:FKEY-CONDEF PGLOADER.MONITOR:*MONITORING-KERNEL* PGLOADER.CITUS:CITUS-RULE-IS-MISSING-FROM-LIST PGLOADER.CATALOG:COLUMN-TRANSFORM PGLOADER.CATALOG:CATALOG PGLOADER.CATALOG:CAST PGLOADER.CATALOG:INDEX-FK-DEPS PGLOADER.CATALOG:MATCHES PGLOADER.STATE:PGTABLE-BYTES PGLOADER.CATALOG:COLUMN-TYPE-NAME PGLOADER.MONITOR:MONITOR-ERROR PGLOADER.CATALOG:CITUS-REFERENCE-RULE PGLOADER.CATALOG:TABLE-TABLESPACE PGLOADER.CATALOG:ADD-FIELD PGLOADER.CATALOG:FORMAT-DROP-SQL PGLOADER.CATALOG:COLUMN-NAME PGLOADER.MONITOR:TIMING PGLOADER.CATALOG:MAYBE-ADD-SCHEMA PGLOADER.CATALOG:COUNT-TABLES PGLOADER.CATALOG:INDEX-TYPE PGLOADER.CATALOG:COLUMN-COMMENT PGLOADER.STATE:PGTABLE-ROWS PGLOADER.CITUS:CITUS-DISTRIBUTED-RULE-P PGLOADER.CATALOG:MATCH-RULE PGLOADER.QUERIES:*QUERIES* PGLOADER.CATALOG:TABLE-SCHEMA PGLOADER.QUOTING:QUOTED-P PGLOADER.CATALOG:FKEY PGLOADER.STATE:PGSTATE-NEW-LABEL PGLOADER.STATE:PGSTATE-SECS PGLOADER.CATALOG:MAKE-INDEX PGLOADER.CATALOG:INDEX-PRIMARY PGLOADER.MONITOR:STOP-MONITOR PGLOADER.CATALOG:INDEX-OID PGLOADER.CATALOG:SQLTYPE-SOURCE-DEF PGLOADER.CATALOG:REGEX-MATCH-RULE PGLOADER.QUOTING:ENSURE-UNQUOTED PGLOADER.CITUS:CITUS-RULE-TABLE-NOT-FOUND PGLOADER.CATALOG:ADD-SCHEMA PGLOADER.CATALOG:EXTENSION-SCHEMA PGLOADER.STATE:STATE-DATA PGLOADER.MONITOR:UPDATE-STATS PGLOADER.CATALOG:TRIGGER PGLOADER.CATALOG:FKEY-TABLE PGLOADER.CATALOG:FKEY-INITIALLY-DEFERRED PGLOADER.CATALOG:SQLTYPE-TYPE PGLOADER.CATALOG:INDEX-FILTER PGLOADER.CATALOG:TABLE-LIST PGLOADER.CATALOG:FKEY-OID PGLOADER.CATALOG:TABLE-COLUMN-LIST PGLOADER.CATALOG:SCHEMA-SQLTYPE-LIST PGLOADER.CATALOG:TRIGGER-PROCEDURE PGLOADER.STATE:MAKE-PGSTATE PGLOADER.CATALOG:MAYBE-ADD-VIEW PGLOADER.CATALOG:MATCH-RULE-ARGS PGLOADER.MONITOR:WITH-MONITOR PGLOADER.CATALOG:MAKE-COLUMN PGLOADER.CATALOG:CITUS-DISTRIBUTED-RULE PGLOADER.CATALOG:SQLTYPE-EXTENSION PGLOADER.CATALOG:FORMAT-TABLE-NAME PGLOADER.CATALOG:STRING-MATCH-RULE PGLOADER.CATALOG:TABLE-STORAGE-PARAMETER-LIST PGLOADER.MONITOR:LOG-MESSAGE PGLOADER.CATALOG:EXTENSION-LIST PGLOADER.STATE:GET-STATE-SECTION PGLOADER.CATALOG:TRIGGER-P PGLOADER.CATALOG:SCHEMA-CATALOG PGLOADER.CATALOG:TABLE-SOURCE-NAME PGLOADER.CATALOG:MATVIEW-DEFINITION PGLOADER.CATALOG:SCHEMA-NAME PGLOADER.CATALOG:MAX-INDEXES-PER-TABLE PGLOADER.CATALOG:ADD-SQLTYPE PGLOADER.STATE:REPORT-RESULTS PGLOADER.STATE:REPORT-SUMMARY PGLOADER.CATALOG:ALTER-SCHEMA PGLOADER.QUOTING:ENSURE-QUOTED PGLOADER.STATE:PGSTATE-GET-LABEL PGLOADER.CATALOG:MAKE-CATALOG PGLOADER.QUOTING:BUILD-IDENTIFIER PGLOADER.CATALOG:TABLE-COMMENT PGLOADER.STATE:PGTABLE-INITIALIZE-REJECT-FILES PGLOADER.STATE:STATE-PRELOAD PGLOADER.CATALOG:TABLE-FIELD-LIST PGLOADER.CATALOG:CATALOG-SCHEMA-LIST PGLOADER.CATALOG:FIND-EXTENSION PGLOADER.STATE:MAKE-STATE PGLOADER.STATE:REPORT-FULL-SUMMARY PGLOADER.CATALOG:ADD-EXTENSION PGLOADER.CATALOG:MAKE-SCHEMA PGLOADER.CATALOG:MAKE-TRIGGER PGLOADER.CATALOG:CITUS-DISTRIBUTED-RULE-FROM PGLOADER.CATALOG:SQLTYPE-SCHEMA PGLOADER.CATALOG:COUNT-VIEWS PGLOADER.CATALOG:FIND-TABLE PGLOADER.CATALOG:PROCEDURE-LANGUAGE PGLOADER.CATALOG:MAKE-MATCH-RULE PGLOADER.CATALOG:SQLTYPE-EXTRA PGLOADER.CATALOG:CATALOG-NAME PGLOADER.CATALOG:COUNT-INDEXES PGLOADER.CATALOG:PROCEDURE-SCHEMA PGLOADER.CATALOG:INDEX-UNIQUE PGLOADER.MONITOR:*MONITORING-QUEUE* PGLOADER.CATALOG:TRIGGER-NAME PGLOADER.CATALOG:VIEW-LIST PGLOADER.CATALOG:FIND-SCHEMA PGLOADER.QUOTING:APPLY-IDENTIFIER-CASE PGLOADER.CATALOG:MATVIEW-SOURCE-NAME PGLOADER.STATE:PGTABLE-REJECT-LOGS PGLOADER.CATALOG:EXTENSION 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.9/src/monkey/bind.lisp" (written 23 OCT 2022 11:12:05 PM): ; processing (IN-PACKAGE #:METABANG.BIND) ; processing (DEFUN VAR-IGNORABLE-P ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/monkey/bind-tmp6LJFJXCQ.fasl ; compilation finished in 0:00:00.004 WARNING: redefining METABANG.BIND::VAR-IGNORABLE-P in DEFUN ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/monkey/mssql.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/monkey/mssql-tmpCXNAFKK5.fasl ; compilation finished in 0:00:00.204 WARNING: redefining MSSQL::SYSDB-DATA-TO-LISP in DEFUN ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/utils/charsets.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/utils/charsets-tmpAG4HDK79.fasl ; compilation finished in 0:00:00.220 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/utils/logs.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/utils/logs-tmpTX55LUC3.fasl ; compilation finished in 0:00:00.104 WARNING: redefining PRINT-OBJECT (# #) in DEFMETHOD ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/utils/utils.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/utils/utils-tmpOFPBS7B8.fasl ; compilation finished in 0:00:00.156 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/utils/state.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/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))) ; --> UNWIND-PROTECT FLET #:CLEANUP-FUN-6 BLOCK WHEN IF ; ==> ; PGLOADER.STATE::DATA ; ; caught STYLE-WARNING: ; reading an ignored variable: DATA ; --> 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))) ; --> UNWIND-PROTECT FLET #:CLEANUP-FUN-10 BLOCK WHEN IF ; ==> ; PGLOADER.STATE::LOGS ; ; caught STYLE-WARNING: ; reading an ignored variable: LOGS ; --> 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 ...) ; file: /build/reproducible-path/pgloader-3.6.9/src/utils/state.lisp ; in: DEFUN PGSTATE-NEW-LABEL ; 'PGLOADER.CATALOG:TABLE ; ; note: can't open-code test of unknown type TABLE ; processing (DEFUN PGSTATE-SETF ...) ; processing (DEFUN PGSTATE-INCF ...) ; processing (DEFUN PGSTATE-DECF ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/utils/state-tmpN94P6QHO.fasl ; compilation finished in 0:00:00.492 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/utils/transforms.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/utils/transforms-tmp7PI54QD2.fasl ; compilation finished in 0:00:00.704 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/utils/read-sql-files.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/utils/read-sql-files-tmp2KPVYDA8.fasl ; compilation finished in 0:00:00.152 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/utils/queries.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/utils/queries-tmp96FLK53O.fasl ; compilation finished in 0:00:00.052 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/utils/quoting.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/utils/quoting-tmpVXGJXF6B.fasl ; compilation finished in 0:00:00.064 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/utils/catalog.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/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::ROW-COUNT-ESTIMATE 0 :TYPE FIXNUM) ; PGLOADER.CATALOG::FIELD-LIST ; PGLOADER.CATALOG::COLUMN-LIST ; ...) ; --> 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/utils/catalog-tmp6TIYUV96.fasl ; compilation finished in 0:00:02.308 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/utils/alter-table.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/utils/alter-table-tmpSE0QLD5B.fasl ; compilation finished in 0:00:00.148 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/utils/citus.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/utils/citus-tmp65JBUOWY.fasl ; compilation finished in 0:00:00.208 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/utils/reject.lisp" (written 23 OCT 2022 11:12:05 PM): ; processing (IN-PACKAGE :PGLOADER.MONITOR) ; processing (DEFUN %PROCESS-BAD-ROW ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/utils/reject-tmpE8RY5GCJ.fasl ; compilation finished in 0:00:00.004 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/utils/pretty-print-state.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/utils/pretty-print-state-tmpK6B9YU0C.fasl ; compilation finished in 0:00:00.816 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/utils/report.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/utils/report-tmp6RAYVCZW.fasl ; compilation finished in 0:00:00.052 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/utils/monitor.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/utils/monitor-tmpA61ZVGEL.fasl ; compilation finished in 0:00:00.544 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/utils/threads.lisp" (written 23 OCT 2022 11:12:05 PM): ; processing (IN-PACKAGE :PGLOADER.UTILS) ; processing (DEFUN MAKE-KERNEL ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/utils/threads-tmp4RW61Z3D.fasl ; compilation finished in 0:00:00.016 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/utils/archive.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/utils/archive-tmpLUSCH4I7.fasl ; compilation finished in 0:00:00.080 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/utils/connection.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/utils/connection-tmp7IXFX52H.fasl ; compilation finished in 0:00:00.100 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/pgsql/connection.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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-NUMBER ...) ; processing (DEFUN PARSE-POSTGRESQL-VERSION-VARIANT ...) ; processing (DEFUN PARSE-POSTGRESQL-VERSION-STRING ...) ; processing (DEFVAR *TEST/VERSIONS* ...) ; processing (DEFUN TEST/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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/pgsql/connection-tmp2R82LQR0.fasl ; compilation finished in 0:00:00.372 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/pgsql/pgsql-ddl.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/pgsql/pgsql-ddl-tmpN3B5JWXT.fasl ; compilation finished in 0:00:01.640 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/pgsql/pgsql-ddl-citus.lisp" (written 23 OCT 2022 11:12:05 PM): ; processing (IN-PACKAGE :PGLOADER.PGSQL) ; processing (DEFMETHOD FORMAT-CREATE-SQL ...) ; processing (DEFMETHOD FORMAT-CREATE-SQL ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/pgsql/pgsql-ddl-citus-tmp5K3D12M0.fasl ; compilation finished in 0:00:00.156 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/pgsql/pgsql-schema.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/pgsql/pgsql-schema-tmpYZS9ORGN.fasl ; compilation finished in 0:00:00.828 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/pgsql/merge-catalogs.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/pgsql/merge-catalogs-tmpKA4LL4BN.fasl ; compilation finished in 0:00:00.052 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/pgsql/pgsql-trigger.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/pgsql/pgsql-trigger-tmpKRR1J698.fasl ; compilation finished in 0:00:00.063 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/pgsql/pgsql-index-filter.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/pgsql/pgsql-index-filter-tmp570ISN87.fasl ; compilation finished in 0:00:00.132 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/pgsql/pgsql-finalize-catalogs.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/pgsql/pgsql-finalize-catalogs-tmpIPPJG5IK.fasl ; compilation finished in 0:00:00.312 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/pgsql/pgsql-create-schema.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/pgsql/pgsql-create-schema-tmpCY2HPI62.fasl ; compilation finished in 0:00:01.236 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/common/api.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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-TABLE-ROW-COUNT ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/common/api-tmpL4PLYSMQ.fasl ; compilation finished in 0:00:00.064 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/common/methods.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/common/methods-tmp90WIGG8R.fasl ; compilation finished in 0:00:00.064 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/common/md-methods.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/common/md-methods-tmpPHN42PM1.fasl ; compilation finished in 0:00:00.112 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/common/matviews.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/common/matviews-tmpFXGWJOII.fasl ; compilation finished in 0:00:00.044 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/common/casting-rules.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/common/casting-rules-tmp61U154E8.fasl ; compilation finished in 0:00:00.124 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/common/files-and-pathnames.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/common/files-and-pathnames-tmpJL840EJB.fasl ; compilation finished in 0:00:00.544 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/common/project-fields.lisp" (written 23 OCT 2022 11:12:05 PM): ; processing (IN-PACKAGE #:PGLOADER.SOURCES) ; processing (DEFUN PROJECT-FIELDS ...) ; file: /build/reproducible-path/pgloader-3.6.9/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... {1004EB95AF}> ; (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)))) ; ==> ; (SB-IMPL::%DEFUN 'PGLOADER.SOURCES:PROJECT-FIELDS ; (SB-INT:NAMED-LAMBDA 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... {1004EB95AF}> ; (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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/common/project-fields-tmpP6WT67MY.fasl ; compilation finished in 0:00:00.280 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/csv/csv-guess.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/csv/csv-guess-tmpHKLMC92Z.fasl ; compilation finished in 0:00:00.372 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/csv/csv.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/csv/csv-tmpI2PYUEMW.fasl ; compilation finished in 0:00:00.220 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/fixed/fixed-guess.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/fixed/fixed-guess-tmpOKTALX52.fasl ; compilation finished in 0:00:00.236 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/fixed/fixed.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/src/sources/fixed/fixed.lisp ; in: DECLAIM (INLINE PARSE-ROW) ; (DECLAIM (INLINE PGLOADER.SOURCE.FIXED::PARSE-ROW)) ; ==> ; (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 ...) ; processing (DEFMETHOD PROCESS-ROWS ...) ; file: /build/reproducible-path/pgloader-3.6.9/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) ; ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/fixed/fixed-tmpGJIHCBMO.fasl ; compilation finished in 0:00:00.200 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/copy.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/copy-tmp59XTDCD6.fasl ; compilation finished in 0:00:00.132 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/db3/db3-cast-rules.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/db3/db3-cast-rules-tmp1Z52HZRL.fasl ; compilation finished in 0:00:00.024 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/db3/db3-connection.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/db3/db3-connection-tmp24DFEJ91.fasl ; compilation finished in 0:00:00.080 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/db3/db3-schema.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/db3/db3-schema-tmpIGJ98JSU.fasl ; compilation finished in 0:00:00.064 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/db3/db3.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/db3/db3-tmpP7GRL47U.fasl ; compilation finished in 0:00:00.160 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/ixf/ixf-cast-rules.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/ixf/ixf-cast-rules-tmp6WQCTWZY.fasl ; compilation finished in 0:00:00.184 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/ixf/ixf-connection.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/ixf/ixf-connection-tmp1RW346KS.fasl ; compilation finished in 0:00:00.083 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/ixf/ixf-schema.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/ixf/ixf-schema-tmpDHMOASYF.fasl ; compilation finished in 0:00:00.080 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/ixf/ixf.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/ixf/ixf-tmpLV9XXT6H.fasl ; compilation finished in 0:00:00.160 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/sqlite/sqlite-cast-rules.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/sqlite/sqlite-cast-rules-tmp49ODV8UF.fasl ; compilation finished in 0:00:00.132 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/sqlite/sqlite-connection.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/sqlite/sqlite-connection-tmpCGWUF3C1.fasl ; compilation finished in 0:00:00.132 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/sqlite/sqlite-schema.lisp" (written 23 OCT 2022 11:12:05 PM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.SQLITE) ; processing (DEFCLASS COPY-SQLITE ...) ; processing (DEFUN SQLITE-PRAGMA-ENCODING ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/sqlite/sqlite-schema-tmpWYLQBKV1.fasl ; compilation finished in 0:00:00.444 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/sqlite/sqlite.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/sqlite/sqlite-tmpQZJT0GSW.fasl ; compilation finished in 0:00:00.244 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/mssql/mssql-cast-rules.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/mssql/mssql-cast-rules-tmp80IHNYG7.fasl ; compilation finished in 0:00:00.196 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/mssql/mssql-connection.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/mssql/mssql-connection-tmp4W6239QB.fasl ; compilation finished in 0:00:00.168 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/mssql/mssql-schema.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/mssql/mssql-schema-tmpPLIY2OU6.fasl ; compilation finished in 0:00:00.228 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/mssql/mssql.lisp" (written 23 OCT 2022 11:12:05 PM): ; processing (IN-PACKAGE :PGLOADER.SOURCE.MSSQL) ; processing (DEFMETHOD MAP-ROWS ...) ; processing (DEFMETHOD COPY-COLUMN-LIST ...) ; processing (DEFMETHOD FETCH-METADATA ...) ; processing (DEFMETHOD CLEANUP ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/mssql/mssql-tmpDQVK0IID.fasl ; compilation finished in 0:00:00.224 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/mssql/mssql-index-filters.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/mssql/mssql-index-filters-tmp4IEM0NNS.fasl ; compilation finished in 0:00:00.260 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/mysql/mysql-cast-rules.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/mysql/mysql-cast-rules-tmpIBGLG2RO.fasl ; compilation finished in 0:00:00.440 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/mysql/mysql-connection.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/mysql/mysql-connection-tmpEGCLAL00.fasl ; compilation finished in 0:00:00.180 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/mysql/mysql-schema.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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 (DEFMETHOD FETCH-TABLE-ROW-COUNT ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/mysql/mysql-schema-tmpSZHJVKDY.fasl ; compilation finished in 0:00:00.608 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/mysql/mysql.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/mysql/mysql-tmpUAHIESL5.fasl ; compilation finished in 0:00:00.436 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/pgsql/pgsql-cast-rules.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/pgsql/pgsql-cast-rules-tmpW9B68D3X.fasl ; compilation finished in 0:00:00.032 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/sources/pgsql/pgsql.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/sources/pgsql/pgsql-tmpIEKBGFG3.fasl ; compilation finished in 0:00:00.272 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/pg-copy/copy-batch.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/pg-copy/copy-batch-tmpK26E5ZH.fasl ; compilation finished in 0:00:00.212 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/pg-copy/copy-format.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (LOOP :FOR PGLOADER.PGCOPY::COL :ACROSS PGLOADER.PGCOPY::ROW ; :FOR PGLOADER.PGCOPY::I FIXNUM :FROM 1 ; :FOR POSITION ...) ; --> LET LET LET LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (+ PGLOADER.PGCOPY::NB-COLS (REDUCE #'+ PGLOADER.PGCOPY::LENS)) ; ; note: forced to do full call ; 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 ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (PGLOADER.PGCOPY::INSERT-COPY-SEPARATOR PGLOADER.PGCOPY::BUF ; (+ POSITION PGLOADER.PGCOPY::COL-LEN) PGLOADER.PGCOPY::I ; PGLOADER.PGCOPY::NB-COLS) ; ; note: doing signed word to integer coercion (cost 20) ; processing (DEFUN FORMAT-ESCAPED-VECTOR-ROW ...) ; file: /build/reproducible-path/pgloader-3.6.9/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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (LOOP :FOR PGLOADER.PGCOPY::COL :ACROSS PGLOADER.PGCOPY::ROW ; :FOR PGLOADER.PGCOPY::I :FROM 1 ; :FOR POSITION := ...) ; --> LET LET LET LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (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 * (*)). ; (+ POSITION PGLOADER.PGCOPY::COL-LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (LOOP :FOR PGLOADER.PGCOPY::COL :ACROSS PGLOADER.PGCOPY::ROW ; :FOR PGLOADER.PGCOPY::I :FROM 1 ; :FOR POSITION := ...) ; --> LET LET LET LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (+ POSITION PGLOADER.PGCOPY::COL-LEN 1) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 full call ; 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 ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (+ POSITION PGLOADER.PGCOPY::COL-LEN) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (LOOP :FOR PGLOADER.PGCOPY::COL :ACROSS PGLOADER.PGCOPY::ROW ; :FOR PGLOADER.PGCOPY::I :FROM 1 ; :FOR POSITION := ...) ; --> LET LET LET LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE 1+ ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES (INTEGER 2) . #1=(&OPTIONAL)), not a (VALUES ; FIXNUM ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a (INTEGER 1), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES (INTEGER 2) . #1#), not a (VALUES ; (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (+ POSITION PGLOADER.PGCOPY::COL-LEN 1) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER . #1=(&OPTIONAL)), not a (VALUES FIXNUM ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; processing (DECLAIM (INLINE INSERT-COPY-SEPARATOR ...)) ; file: /build/reproducible-path/pgloader-3.6.9/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)) ; ==> ; (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.9/src/pg-copy/copy-format.lisp ; in: DEFUN COPY-UTF-8-BYTE-LENGTH ; (INCF LENGTH 1) ; --> THE ; ==> ; (+ 1 LENGTH) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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))) ; --> THE ; ==> ; (+ ; (COND ((< PGLOADER.PGCOPY::CODE 2048) 1) ((< PGLOADER.PGCOPY::CODE 65536) 2) ; (T 3)) ; LENGTH) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The second argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (INCF LENGTH 1) ; --> THE ; ==> ; (+ 1 LENGTH) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; processing (DEFMACRO AS-COPY-UTF-8-BYTES ...) ; processing (DEFUN STRING-TO-COPY-UTF-8-BYTES ...) ; file: /build/reproducible-path/pgloader-3.6.9/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) ; --> COND IF PROGN PGLOADER.PGCOPY::ADD-BYTE PROGN SETF LET* FUNCALL ; ==> ; 1 ; ; 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. ; --> COND IF IF PROGN PGLOADER.PGCOPY::ADD-BYTE PROGN SETF LET* FUNCALL ; ==> ; 1 ; ; 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. ; --> COND IF IF IF PROGN PGLOADER.PGCOPY::ADD-BYTE PROGN SETF LET* FUNCALL ; ==> ; 1 ; ; 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. ; --> COND IF IF IF IF PROGN PGLOADER.PGCOPY::ADD-BYTE PROGN SETF LET* FUNCALL ; ==> ; 1 ; ; 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. ; --> COND IF IF IF IF IF PROGN PGLOADER.PGCOPY::ADD-BYTE PROGN SETF LET* ; --> FUNCALL ; ==> ; 1 ; ; 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. ; --> COND IF IF IF IF IF IF PROGN PGLOADER.PGCOPY::ADD-BYTE PROGN SETF LET* ; --> FUNCALL ; ==> ; 1 ; ; 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. ; --> COND IF IF IF IF IF IF IF PGLOADER.PGCOPY::ADD-BYTE PROGN SETF LET* ; --> FUNCALL ; ==> ; 1 ; ; 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. ; --> COND IF IF IF IF IF IF IF IF PROGN PGLOADER.PGCOPY::ADD-BYTE PROGN SETF ; --> LET* FUNCALL ; ==> ; 1 ; ; 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. ; --> COND IF IF IF IF IF IF IF IF IF PROGN PGLOADER.PGCOPY::ADD-BYTE PROGN ; --> SETF LET* FUNCALL ; ==> ; 1 ; ; 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. ; --> COND IF IF IF IF IF IF IF IF IF THE PROGN PGLOADER.PGCOPY::ADD-BYTE PROGN ; --> SETF LET* FUNCALL ; ==> ; 1 ; ; 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. ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/pg-copy/copy-format-tmpVCL2WD00.fasl ; compilation finished in 0:00:00.300 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/pg-copy/copy-db-write.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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))) ...) ; --> LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (LOOP :FOR CHAR :ACROSS PGLOADER.PGCOPY::COL ; :DO (PGLOADER.PGCOPY::AS-COPY-UTF-8-BYTES CHAR ; PGLOADER.PGCOPY::SEND-BYTE)) ; --> LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (INCF (CL-POSTGRES::COPIER-COUNT PGLOADER.PGCOPY::COPIER)) ; ==> ; (+ 1 (CL-POSTGRES::COPIER-COUNT #:COPIER34)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (< PGLOADER.PGCOPY::I PGLOADER.PGCOPY::NBCOLS) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The second argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (+ PGLOADER.PGCOPY::NBCOLS (REDUCE #'+ PGLOADER.PGCOPY::COL-BYTES)) ; ; note: forced to do full call ; 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 ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (INCF (CL-POSTGRES::COPIER-COUNT PGLOADER.PGCOPY::COPIER)) ; ==> ; (+ 1 (CL-POSTGRES::COPIER-COUNT #:COPIER34)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; 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 # ...))))) ; --> 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.9/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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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))) ...) ; --> LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (LOOP :FOR CHAR :ACROSS PGLOADER.PGCOPY::COL ; :DO (CL-POSTGRES-TRIVIAL-UTF-8::AS-UTF-8-BYTES CHAR ; PGLOADER.PGCOPY::SEND-BYTE)) ; --> LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; because: ; Upgraded element type of array is not known at compile time. ; (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 in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (INCF (CL-POSTGRES::COPIER-COUNT PGLOADER.PGCOPY::COPIER)) ; ==> ; (+ 1 (CL-POSTGRES::COPIER-COUNT #:COPIER34)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (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 full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; etc. ; (< PGLOADER.PGCOPY::I PGLOADER.PGCOPY::NBCOLS) ; ; note: forced to do full call ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; unable to do inline (unsigned-byte 64) comparison (cost 6) because: ; The second argument is a REAL, not a (UNSIGNED-BYTE 64). ; etc. ; (+ PGLOADER.PGCOPY::NBCOLS (REDUCE #'+ PGLOADER.PGCOPY::COL-BYTES)) ; ; note: forced to do full call ; 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 ; . #1#). ; 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 . #1#), not a (VALUES SINGLE-FLOAT . #1#). ; etc. ; (INCF (CL-POSTGRES::COPIER-COUNT PGLOADER.PGCOPY::COPIER)) ; ==> ; (+ 1 (CL-POSTGRES::COPIER-COUNT #:COPIER34)) ; ; note: forced to do full call ; 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 ; . #1#). ; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because: ; The first argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER . #1#), not a (VALUES (UNSIGNED-BYTE 64) ; . #1#). ; 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 # ...))))) ; --> 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/pg-copy/copy-db-write-tmpZQ9PPEAP.fasl ; compilation finished in 0:00:00.220 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/pg-copy/copy-rows-in-stream.lisp" (written 23 OCT 2022 11:12:05 PM): ; processing (IN-PACKAGE :PGLOADER.PGCOPY) ; processing (DEFUN STREAM-ROWS-TO-COPY ...) ; processing (DEFUN STREAM-ROW ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/pg-copy/copy-rows-in-stream-tmpNRJPZMRB.fasl ; compilation finished in 0:00:00.108 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/pg-copy/copy-rows-in-batch.lisp" (written 23 OCT 2022 11:12:05 PM): ; processing (IN-PACKAGE :PGLOADER.PGCOPY) ; processing (DEFUN BATCH-ROWS-TO-COPY ...) ; processing (DEFUN SEND-BATCH ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/pg-copy/copy-rows-in-batch-tmpPP68IXIC.fasl ; compilation finished in 0:00:00.068 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/pg-copy/copy-rows-in-batch-through-s3.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/pg-copy/copy-rows-in-batch-through-s3-tmpR43VJ9D9.fasl ; compilation finished in 0:00:00.140 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/pg-copy/copy-retry-batch.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/pg-copy/copy-retry-batch-tmpRFKXLIA4.fasl ; compilation finished in 0:00:00.088 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/pg-copy/copy-from-queue.lisp" (written 23 OCT 2022 11:12:05 PM): ; processing (IN-PACKAGE :PGLOADER.PGCOPY) ; processing (DEFUN COPY-ROWS-FROM-QUEUE ...) ; processing (DEFUN PREPARE-COPY-PARAMETERS ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/pg-copy/copy-from-queue-tmpULFHDN08.fasl ; compilation finished in 0:00:00.092 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/load/api.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/load/api-tmpOPRDPHFK.fasl ; compilation finished in 0:00:00.004 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/load/copy-data.lisp" (written 23 OCT 2022 11:12:05 PM): ; processing (IN-PACKAGE :PGLOADER.LOAD) ; processing (DEFMETHOD QUEUE-RAW-DATA ...) ; processing (DEFMETHOD COPY-TO ...) ; file: /build/reproducible-path/pgloader-3.6.9/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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/load/copy-data-tmp8WFA6KMU.fasl ; compilation finished in 0:00:00.152 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/load/load-file.lisp" (written 23 OCT 2022 11:12:05 PM): ; processing (IN-PACKAGE :PGLOADER.LOAD) ; processing (DEFMETHOD COPY-DATABASE ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/load/load-file-tmpZIM0NZGF.fasl ; compilation finished in 0:00:00.268 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/load/migrate-database.lisp" (written 23 OCT 2022 11:12:05 PM): ; processing (IN-PACKAGE :PGLOADER.LOAD) ; processing (DEFMETHOD PREPARE-PGSQL-DATABASE ...) ; processing (DEFMETHOD COMPLETE-PGSQL-DATABASE ...) ; processing (DEFUN PROCESS-CATALOG ...) ; processing (DEFUN OPTIMIZE-TABLE-COPY-ORDERING ...) ; processing (DEFMETHOD COPY-DATABASE ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/load/migrate-database-tmp3R1UUX74.fasl ; compilation finished in 0:00:00.916 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/parse-ini.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/parse-ini-tmpJE96SV6A.fasl ; compilation finished in 0:00:01.228 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/template.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/template-tmpM126WEAV.fasl ; compilation finished in 0:00:00.084 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/command-utils.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/command-utils-tmpS2HNWOVW.fasl ; compilation finished in 0:00:00.108 WARNING: Prefix " " before " " in an ESRAP OR expression. WARNING: Prefix " " before " " in an ESRAP OR expression. ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/command-keywords.lisp" (written 23 OCT 2022 11:12:05 PM): ; processing (IN-PACKAGE :PGLOADER.PARSER) ; processing (DEFMACRO DEF-KEYWORD-RULE ...) ; processing (EVAL-WHEN (:LOAD-TOPLEVEL :COMPILE-TOPLEVEL ...) ...) ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/command-keywords-tmpR3PRZE8Z.fasl ; compilation finished in 0:00:00.812 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/command-regexp.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/command-regexp-tmpBE4ZJXFG.fasl ; compilation finished in 0:00:00.032 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/parse-pgpass.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/parse-pgpass-tmpICLLCELY.fasl ; compilation finished in 0:00:00.148 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/command-db-uri.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/command-db-uri-tmpGJJYZTZA.fasl ; compilation finished in 0:00:00.256 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/command-source.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/command-source-tmpO5YPH4GB.fasl ; compilation finished in 0:00:00.036 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/command-options.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/command-options-tmpCVBSS8KL.fasl ; compilation finished in 0:00:00.260 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/command-sql-block.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/command-sql-block-tmpWOI7FLUF.fasl ; compilation finished in 0:00:00.060 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/command-sexp.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/command-sexp-tmpYSK53869.fasl ; compilation finished in 0:00:00.052 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/command-csv.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/command-csv-tmpUIKNFBUS.fasl ; compilation finished in 0:00:00.356 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/command-ixf.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/command-ixf-tmpEEFFEPQ0.fasl ; compilation finished in 0:00:00.084 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/command-fixed.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/command-fixed-tmpXUIGXRCX.fasl ; compilation finished in 0:00:00.111 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/command-copy.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/command-copy-tmp5WEDM9IY.fasl ; compilation finished in 0:00:00.096 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/command-dbf.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/command-dbf-tmpG3DC7RC6.fasl ; compilation finished in 0:00:00.128 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/command-cast-rules.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/command-cast-rules-tmp7RSTX2RJ.fasl ; compilation finished in 0:00:00.172 WARNING: Prefix ":" before "::" in an ESRAP OR expression. ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/command-materialize-views.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/command-materialize-views-tmpMYAZIBWI.fasl ; compilation finished in 0:00:00.036 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/command-alter-table.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/command-alter-table-tmp93L20JIY.fasl ; compilation finished in 0:00:00.076 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/command-distribute.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/command-distribute-tmpTC0DH7S0.fasl ; compilation finished in 0:00:00.052 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/command-mysql.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/command-mysql-tmpC2C32579.fasl ; compilation finished in 0:00:00.152 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/command-including-like.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/command-including-like-tmpK1GRILVK.fasl ; compilation finished in 0:00:00.012 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/command-mssql.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/command-mssql-tmpDO67TKN4.fasl ; compilation finished in 0:00:00.144 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/command-sqlite.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/command-sqlite-tmpABZ5EEBJ.fasl ; compilation finished in 0:00:00.080 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/command-pgsql.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/command-pgsql-tmp2E3UPG8J.fasl ; compilation finished in 0:00:00.072 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/command-archive.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/command-archive-tmpJ9Q6NV59.fasl ; compilation finished in 0:00:00.028 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/command-parser.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/src/parsers/command-parser.lisp ; in: DEFUN PARSE-COMMANDS-FROM-FILE ; (ERROR "Inline data not found in '~a'." PGLOADER.PARSER::FILENAME) ; ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/command-parser-tmpAD6DHN5B.fasl ; compilation finished in 0:00:00.148 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/parse-sqlite-type-name.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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 (DEFRULE SQLITE-TYPE-EXPR ...) ; processing (DEFUN PARSE-SQLITE-TYPE-NAME ...) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/parse-sqlite-type-name-tmpEV76XDJ7.fasl ; compilation finished in 0:00:00.040 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/parsers/date-format.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/parsers/date-format-tmp6NE9XUCB.fasl ; compilation finished in 0:00:00.184 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/api.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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 COMPILE-LISP-COMMAND ...) ; file: /build/reproducible-path/pgloader-3.6.9/src/api.lisp ; in: DEFUN COMPILE-LISP-COMMAND ; (COND ; (PGLOADER::FAILURE-P ; (ERROR "Failed to compile code: ~a~%~a" PGLOADER::SOURCE PGLOADER::NOTES)) ; (PGLOADER::WARNINGS-P FUNCTION) (T FUNCTION)) ; --> IF THE ; ==> ; FUNCTION ; ; note: deleting unreachable code ; processing (DEFUN LOAD-DATA ...) ; file: /build/reproducible-path/pgloader-3.6.9/src/api.lisp ; in: DEFUN LOAD-DATA ; (TYPEP PGLOADER::SOURCE ; (OR 'PGLOADER.SOURCE.CSV:CSV-CONNECTION ; 'PGLOADER.SOURCE.COPY:COPY-CONNECTION ; '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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/api-tmpHG4AAN1T.fasl ; compilation finished in 0:00:00.340 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/regress/regress.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/regress/regress-tmp6TLO0BDD.fasl ; compilation finished in 0:00:00.496 ; compiling file "/build/reproducible-path/pgloader-3.6.9/src/main.lisp" (written 23 OCT 2022 11:12:05 PM): ; 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.9/src/main.lisp ; in: DEFUN MAIN ; (HANDLER-CASE ; (PGLOADER::LOAD-EXTRA-TRANSFORMATION-FUNCTIONS PGLOADER::FILENAME DEBUG) ; ((OR SIMPLE-CONDITION SERIOUS-CONDITION) (PGLOADER::E) ; (FORMAT *ERROR-OUTPUT* "Failed to load lisp source file ~s~%" ; PGLOADER::FILENAME) ; (FORMAT *ERROR-OUTPUT* "~a~%~%" PGLOADER::E) ; (UIOP/IMAGE:QUIT PGLOADER.PARAMS:+OS-CODE-ERROR+))) ; --> BLOCK RETURN-FROM #:FUN42 BLOCK SB-KERNEL::%HANDLER-BIND LET ; --> SB-INT:DX-FLET FLET SB-INT:DX-LET LET CONS ; ==> ; 1 ; ; note: deleting unreachable code ; ; note: deleting unreachable code ; ; note: deleting unreachable code ; ; note: deleting unreachable code ; ; note: deleting unreachable code ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/build/reproducible-path/pgloader-3.6.9/src/main-tmpDAM8R5KO.fasl ; compilation finished in 0:00:00.288 ; file: /usr/share/common-lisp/source/uax-15/src/precomputed-tables.lisp ; in: ; MAPHASH (LAMBDA (UAX-15::SRC-CHAR UAX-15::DECOMPED-CHARS) ; (WHEN ; (AND (= 2 (LENGTH UAX-15::DECOMPED-CHARS)) ; (NOT ; (GETHASH UAX-15::SRC-CHAR ; UAX-15::*COMPOSITION-EXCLUSIONS-DATA*))) ; (SETF (GETHASH # UAX-15::*CANONICAL-COMP-MAP*) UAX-15::SRC-CHAR))) ; (MAPHASH ; (LAMBDA (UAX-15::SRC-CHAR UAX-15::DECOMPED-CHARS) ; (WHEN (AND (= 2 #) (NOT #)) (SETF # UAX-15::SRC-CHAR))) ; UAX-15::*CANONICAL-DECOMP-MAP*) ; --> LET* SB-IMPL::HASH-TABLE-PAIRS ; ==> ; 1 ; ; caught WARNING: ; undefined variable: UAX-15::*CANONICAL-DECOMP-MAP* ; file: /usr/share/common-lisp/source/cl-mustache/mustache.lisp ; in: DEFUN MUSTACHE::%OUTPUT ; (IF (EQ MUSTACHE:*MUSTACHE-OUTPUT* MUSTACHE::*REAL-STANDARD-OUTPUT*) ; MUSTACHE:*OUTPUT-STREAM* ; MUSTACHE:*MUSTACHE-OUTPUT*) ; ; caught WARNING: ; undefined variable: MUSTACHE:*MUSTACHE-OUTPUT* ; (EQ MUSTACHE:*MUSTACHE-OUTPUT* MUSTACHE::*REAL-STANDARD-OUTPUT*) ; ; caught WARNING: ; undefined variable: MUSTACHE:*MUSTACHE-OUTPUT* ; file: /build/reproducible-path/pgloader-3.6.9/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.9/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.9/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: ; UAX-15::*CANONICAL-DECOMP-MAP* MUSTACHE:*MUSTACHE-OUTPUT* PGLOADER.CATALOG:SCHEMA ; caught 4 WARNING conditions ; caught 101 STYLE-WARNING conditions ; printed 9273 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 (EVAL-WHEN (:COMPILE-TOPLEVEL) ...) ; processing (MAKE-LOAD-FORM* ABSTRACT-CONTAINER) ; processing (MAKE-LOAD-FORM* CONTAINER-NODE-MIXIN) ; wrote /build/reproducible-path/pgloader-3.6.9/debian/home/.cache/common-lisp/sbcl-2.2.9.debian-linux-arm64/usr/share/common-lisp/source/cl-containers/dev/utilities-integration-tmp4TY0DSV3.fasl ; compilation finished in 0:00:00.004 test ! -f buildapp.fail ls -l build/bin/pgloader -rwxr-xr-x 1 root root 23742624 Jan 7 23:56 build/bin/pgloader /usr/bin/make -C docs html make[2]: Entering directory '/build/reproducible-path/pgloader-3.6.9/docs' Running Sphinx v5.3.0 making output directory... done building [mo]: targets for 0 po files that are out of date building [html]: targets for 28 source files that are out of date updating environment: [new config] 28 added, 0 changed, 0 removed reading sources... [ 3%] batches reading sources... [ 7%] bugreport reading sources... [ 10%] command reading sources... [ 14%] index reading sources... [ 17%] install reading sources... [ 21%] intro reading sources... [ 25%] pgloader reading sources... [ 28%] quickstart reading sources... [ 32%] ref/archive reading sources... [ 35%] ref/copy reading sources... [ 39%] ref/csv reading sources... [ 42%] ref/dbf reading sources... [ 46%] ref/fixed reading sources... [ 50%] ref/ixf reading sources... [ 53%] ref/mssql reading sources... [ 57%] ref/mysql reading sources... [ 60%] ref/pgsql reading sources... [ 64%] ref/pgsql-citus-target reading sources... [ 67%] ref/pgsql-redshift reading sources... [ 71%] ref/sqlite reading sources... [ 75%] ref/transforms reading sources... [ 78%] tutorial/csv reading sources... [ 82%] tutorial/dBase reading sources... [ 85%] tutorial/fixed reading sources... [ 89%] tutorial/geolite reading sources... [ 92%] tutorial/mysql reading sources... [ 96%] tutorial/sqlite reading sources... [100%] tutorial/tutorial looking for now-outdated files... none found pickling environment... done checking consistency... done preparing documents... done writing output... [ 3%] batches writing output... [ 7%] bugreport writing output... [ 10%] command writing output... [ 14%] index writing output... [ 17%] install writing output... [ 21%] intro writing output... [ 25%] pgloader writing output... [ 28%] quickstart writing output... [ 32%] ref/archive writing output... [ 35%] ref/copy writing output... [ 39%] ref/csv writing output... [ 42%] ref/dbf writing output... [ 46%] ref/fixed writing output... [ 50%] ref/ixf writing output... [ 53%] ref/mssql writing output... [ 57%] ref/mysql writing output... [ 60%] ref/pgsql writing output... [ 64%] ref/pgsql-citus-target writing output... [ 67%] ref/pgsql-redshift writing output... [ 71%] ref/sqlite writing output... [ 75%] ref/transforms writing output... [ 78%] tutorial/csv writing output... [ 82%] tutorial/dBase writing output... [ 85%] tutorial/fixed writing output... [ 89%] 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. The HTML pages are in _build/html. make[2]: Leaving directory '/build/reproducible-path/pgloader-3.6.9/docs' make[1]: Leaving directory '/build/reproducible-path/pgloader-3.6.9' debian/rules override_dh_auto_test make[1]: Entering directory '/build/reproducible-path/pgloader-3.6.9' PATH=/build/reproducible-path/pgloader-3.6.9/build/bin:/usr/sbin:/usr/bin:/sbin:/bin:/usr/games debian/tests/testsuite + PGSUPERUSER=pbuilder1 + PGLOADER=pgloader PGSUPERUSER=pbuilder1 pg_virtualenv -i-Atrust make -C test prepare regress Creating new PostgreSQL cluster 15/regress ... make[2]: Entering directory '/build/reproducible-path/pgloader-3.6.9/test' dropdb -U pbuilder1 pgloader dropdb: error: database removal failed: ERROR: database "pgloader" does not exist make[2]: [Makefile:67: prepare] Error 1 (ignored) dropdb -U pbuilder1 stocks dropdb: error: database removal failed: ERROR: database "stocks" does not exist make[2]: [Makefile:68: prepare] Error 1 (ignored) dropdb -U pbuilder1 ip4r dropdb: error: database removal failed: ERROR: database "ip4r" does not exist make[2]: [Makefile:69: prepare] Error 1 (ignored) createuser -U pbuilder1 --superuser `whoami` createdb -U pbuilder1 -O `whoami` pgloader createdb -U pbuilder1 -O `whoami` stocks createdb -U pbuilder1 -O `whoami` ip4r psql -d pgloader -c 'create schema expected' CREATE SCHEMA psql -U pbuilder1 -d pgloader -c 'create extension ip4r' CREATE EXTENSION psql -U pbuilder1 -d ip4r -c 'create extension ip4r' CREATE EXTENSION psql -d stocks -f bossa.sql psql:bossa.sql:7: NOTICE: table "intf_derivatives" does not exist, skipping psql:bossa.sql:7: NOTICE: table "intf_stocks" does not exist, skipping DROP TABLE CREATE TABLE CREATE TABLE rm -f regress/out/* pgloader --regress allcols.load 2024-01-08T11:57:06.088000Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:57:06.148001Z LOG Parsing commands from file #P"/build/reproducible-path/pgloader-3.6.9/test/allcols.load" 2024-01-08T11:57:06.344002Z WARNING pgloader always talk to PostgreSQL in utf-8, client_encoding has been forced to 'utf8'. 2024-01-08T11:57:07.516009Z WARNING Target table "\"public\".\"allcols\"" has 1 indexes defined against it. 2024-01-08T11:57:07.516009Z WARNING That could impact loading performance badly. 2024-01-08T11:57:07.520009Z WARNING Consider the option 'drop indexes'. 2024-01-08T11:57:08.020011Z WARNING pgloader always talk to PostgreSQL in utf-8, client_encoding has been forced to 'utf8'. 2024-01-08T11:57:08.224012Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/allcols.out") 2024-01-08T11:57:08.404013Z WARNING PostgreSQL warning: table "allcols" does not exist, skipping 2024-01-08T11:57:09.156017Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.016s before load 0 2 0.336s ----------------------- --------- --------- --------- -------------- "public"."allcols" 0 8 0.2 kB 0.256s "expected"."allcols" 0 8 0.2 kB 0.256s ----------------------- --------- --------- --------- -------------- Files Processed 0 2 0.152s COPY Threads Completion 0 4 0.520s ----------------------- --------- --------- --------- -------------- Total import time ✓ 16 0.4 kB 0.672s 2024-01-08T11:57:09.316018Z LOG Regress pass. touch regress/out/allcols.out pgloader --regress csv-before-after.load 2024-01-08T11:57:11.092001Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:57:15.884027Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/csv-before-after.out") 2024-01-08T11:57:16.012028Z WARNING PostgreSQL warning: table "blocks" does not exist, skipping 2024-01-08T11:57:16.592031Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.020s before load 0 6 0.548s ----------------------- --------- --------- --------- -------------- "csv"."blocks" 0 460 15.9 kB 2.188s "expected"."blocks" 0 460 12.4 kB 0.256s ----------------------- --------- --------- --------- -------------- Files Processed 0 2 0.436s COPY Threads Completion 0 4 2.456s after load 0 1 0.140s ----------------------- --------- --------- --------- -------------- Total import time ✓ 920 28.2 kB 3.032s 2024-01-08T11:57:16.748032Z LOG Regress pass. touch regress/out/csv-before-after.out pgloader --regress csv-districts.load 2024-01-08T11:57:18.116001Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:57:20.628014Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/csv-districts.out") 2024-01-08T11:57:20.804015Z WARNING PostgreSQL warning: table "districts" does not exist, skipping 2024-01-08T11:57:21.700020Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.020s before load 0 2 0.164s ----------------------- --------- --------- --------- -------------- "public"."districts" 0 440 29.3 kB 0.912s "expected"."districts" 0 440 29.1 kB 0.296s ----------------------- --------- --------- --------- -------------- Files Processed 0 2 0.108s COPY Threads Completion 0 4 1.216s ----------------------- --------- --------- --------- -------------- Total import time ✓ 880 58.3 kB 1.324s 2024-01-08T11:57:21.920021Z LOG Regress pass. touch regress/out/csv-districts.out pgloader --regress csv-parse-date.load 2024-01-08T11:57:25.064001Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:57:26.816010Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/csv-parse-date.out") 2024-01-08T11:57:26.944011Z WARNING PostgreSQL warning: table "dateformat" does not exist, skipping 2024-01-08T11:57:27.604015Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.012s before load 0 2 0.172s ----------------------- --------- --------- --------- -------------- "public"."dateformat" 0 4 0.1 kB 0.188s "expected"."dateformat" 0 4 0.1 kB 0.224s ----------------------- --------- --------- --------- -------------- Files Processed 0 2 0.088s COPY Threads Completion 0 4 0.444s ----------------------- --------- --------- --------- -------------- Total import time ✓ 8 0.3 kB 0.532s 2024-01-08T11:57:27.832016Z LOG Regress pass. touch regress/out/csv-parse-date.out pgloader --regress csv-error.load 2024-01-08T11:57:28.087999Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:57:29.408006Z FATAL :ASCII stream decoding error on #: the octet sequence #(195) cannot be decoded. 2024-01-08T11:57:29.468007Z ERROR PostgreSQL ["\"public\".\"jordane\""] Database error 22001: value too long for type character(20) CONTEXT: COPY jordane, line 4, column PRENOM: "testprenombe~aucouptroplong" 2024-01-08T11:57:29.696008Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/csv-error.out") 2024-01-08T11:57:29.864010Z WARNING PostgreSQL warning: table "jordane" does not exist, skipping 2024-01-08T11:57:30.376012Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.024s before load 0 2 0.296s ----------------------- --------- --------- --------- -------------- "public"."jordane" 3 3 0.1 kB 0.180s "expected"."jordane" 0 3 0.1 kB 0.132s ----------------------- --------- --------- --------- -------------- Files Processed 0 2 0.084s COPY Threads Completion 0 4 0.340s ----------------------- --------- --------- --------- -------------- Total import time 3 6 0.2 kB 0.424s 2024-01-08T11:57:30.504012Z LOG Regress pass. touch regress/out/csv-error.out pgloader --regress csv-escape-mode.load 2024-01-08T11:57:32.028000Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:57:33.164006Z WARNING Target table "\"public\".\"csv_escape_mode\"" has 1 indexes defined against it. 2024-01-08T11:57:33.164006Z WARNING That could impact loading performance badly. 2024-01-08T11:57:33.164006Z WARNING Consider the option 'drop indexes'. 2024-01-08T11:57:33.712008Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/csv-escape-mode.out") 2024-01-08T11:57:33.856010Z WARNING PostgreSQL warning: table "csv_escape_mode" does not exist, skipping 2024-01-08T11:57:34.396013Z LOG report summary reset table name errors rows bytes total time ---------------------------- --------- --------- --------- -------------- fetch 0 0 0.020s before load 0 2 0.240s ---------------------------- --------- --------- --------- -------------- "public"."csv_escape_mode" 0 5 0.1 kB 0.244s "expected"."csv_escape_mode" 0 5 0.1 kB 0.112s ---------------------------- --------- --------- --------- -------------- Files Processed 0 2 0.112s COPY Threads Completion 0 4 0.384s ---------------------------- --------- --------- --------- -------------- Total import time ✓ 10 0.2 kB 0.496s 2024-01-08T11:57:34.512014Z LOG Regress pass. touch regress/out/csv-escape-mode.out pgloader --regress csv-filename-pattern.load 2024-01-08T11:57:36.156001Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:57:43.812043Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/csv-filename-pattern.out") 2024-01-08T11:57:43.888043Z WARNING PostgreSQL warning: table "matching" does not exist, skipping 2024-01-08T11:57:44.572047Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.020s before load 0 2 0.328s ----------------------- --------- --------- --------- -------------- "public"."matching" 0 3 0.0 kB 2.400s "expected"."matching" 0 3 0.0 kB 0.256s ----------------------- --------- --------- --------- -------------- Files Processed 0 4 0.100s COPY Threads Completion 0 8 2.872s ----------------------- --------- --------- --------- -------------- Total import time ✓ 6 0.0 kB 2.972s 2024-01-08T11:57:44.712047Z LOG Regress pass. touch regress/out/csv-filename-pattern.out pgloader --regress csv-guess.load 2024-01-08T11:57:47.024000Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:57:48.196007Z WARNING Target table "\"csv\".\"track\"" has 1 indexes defined against it. 2024-01-08T11:57:48.196007Z WARNING That could impact loading performance badly. 2024-01-08T11:57:48.196007Z WARNING Consider the option 'drop indexes'. 2024-01-08T11:57:49.480014Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/csv-guess.out") 2024-01-08T11:57:49.628014Z WARNING PostgreSQL warning: table "track" does not exist, skipping 2024-01-08T11:57:50.500019Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.028s before load 0 2 0.308s ----------------------- --------- --------- --------- -------------- "csv"."track" 0 3503 366.8 kB 0.888s "expected"."track" 0 3503 366.8 kB 0.316s ----------------------- --------- --------- --------- -------------- Files Processed 0 2 0.156s COPY Threads Completion 0 4 1.212s ----------------------- --------- --------- --------- -------------- Total import time ✓ 7006 733.5 kB 1.368s 2024-01-08T11:57:50.676020Z LOG Regress pass. touch regress/out/csv-guess.out pgloader --regress csv-header.load 2024-01-08T11:57:53.088000Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:57:54.260007Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/csv-header.out") 2024-01-08T11:57:54.392007Z WARNING PostgreSQL warning: table "group" does not exist, skipping 2024-01-08T11:57:54.760009Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.008s before load 0 2 0.084s ----------------------- --------- --------- --------- -------------- "public"."group" 0 2 0.0 kB 0.180s "expected"."group" 0 2 0.0 kB 0.064s ----------------------- --------- --------- --------- -------------- Files Processed 0 2 0.184s COPY Threads Completion 0 4 0.264s ----------------------- --------- --------- --------- -------------- Total import time ✓ 4 0.1 kB 0.448s 2024-01-08T11:57:54.880010Z LOG Regress pass. touch regress/out/csv-header.out pgloader --regress csv-json.load 2024-01-08T11:57:57.076001Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:57:58.240007Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/csv-json.out") 2024-01-08T11:57:58.308007Z WARNING PostgreSQL warning: table "json" does not exist, skipping 2024-01-08T11:57:58.864010Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.016s before load 0 2 0.088s ----------------------- --------- --------- --------- -------------- "public"."json" 0 15 1.1 kB 0.212s "expected"."json" 0 15 1.1 kB 0.128s ----------------------- --------- --------- --------- -------------- Files Processed 0 2 0.068s COPY Threads Completion 0 4 0.376s ----------------------- --------- --------- --------- -------------- Total import time ✓ 30 2.3 kB 0.444s 2024-01-08T11:57:59.024011Z LOG Regress pass. touch regress/out/csv-json.out pgloader --regress csv-keep-extra-blanks.load 2024-01-08T11:58:01.108000Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:58:02.872010Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/csv-keep-extra-blanks.out") 2024-01-08T11:58:02.968011Z WARNING PostgreSQL warning: table "nulls" does not exist, skipping 2024-01-08T11:58:03.356012Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.024s before load 0 2 0.136s ----------------------- --------- --------- --------- -------------- "public"."nulls" 0 7 0.3 kB 0.232s "expected"."nulls" 0 6 0.3 kB 0.100s ----------------------- --------- --------- --------- -------------- Files Processed 0 2 0.120s COPY Threads Completion 0 4 0.344s ----------------------- --------- --------- --------- -------------- Total import time ✓ 13 0.6 kB 0.464s 2024-01-08T11:58:03.508012Z LOG Regress pass. touch regress/out/csv-keep-extra-blanks.out pgloader --regress csv-missing-col.load 2024-01-08T11:58:05.052000Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:58:05.900005Z LOG COPY INIT ERROR 2024-01-08T11:58:05.904005Z FATAL Can't init COPY to "public"."missingcol"("a", "b", "c", "d", "e", "f", "g"): Database error 42703: column "c" of relation "missingcol" does not exist 2024-01-08T11:58:06.028005Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/csv-missing-col.out") 2024-01-08T11:58:06.064005Z WARNING PostgreSQL warning: table "missingcol" does not exist, skipping 2024-01-08T11:58:06.380007Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.012s before load 0 2 0.084s ----------------------- --------- --------- --------- -------------- "public"."missingcol" 1 0 0.072s "expected"."missingcol" 0 0 0.132s ----------------------- --------- --------- --------- -------------- Files Processed 0 2 0.048s COPY Threads Completion 0 4 0.256s ----------------------- --------- --------- --------- -------------- Total import time 1 0 0.304s 2024-01-08T11:58:06.452008Z LOG Regress pass. touch regress/out/csv-missing-col.out pgloader --regress csv-non-printable.load 2024-01-08T11:58:07.032001Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:58:08.520008Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/csv-non-printable.out") 2024-01-08T11:58:08.608009Z WARNING PostgreSQL warning: table "tab_csv" does not exist, skipping 2024-01-08T11:58:09.140012Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.024s before load 0 2 0.148s ----------------------- --------- --------- --------- -------------- "public"."tab_csv" 0 7 0.2 kB 0.232s "expected"."tab_csv" 0 7 0.2 kB 0.152s ----------------------- --------- --------- --------- -------------- Files Processed 0 2 0.108s COPY Threads Completion 0 4 0.400s ----------------------- --------- --------- --------- -------------- Total import time ✓ 14 0.4 kB 0.508s 2024-01-08T11:58:09.276013Z LOG Regress pass. touch regress/out/csv-non-printable.out pgloader --regress csv-nulls.load 2024-01-08T11:58:10.036000Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:58:10.932005Z WARNING Target table "\"public\".\"nullif\"" has 1 indexes defined against it. 2024-01-08T11:58:10.932005Z WARNING That could impact loading performance badly. 2024-01-08T11:58:10.932005Z WARNING Consider the option 'drop indexes'. 2024-01-08T11:58:11.580009Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/csv-nulls.out") 2024-01-08T11:58:11.644010Z WARNING PostgreSQL warning: table "nullif" does not exist, skipping 2024-01-08T11:58:12.100012Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.020s before load 0 2 0.116s ----------------------- --------- --------- --------- -------------- "public"."nullif" 0 2 0.0 kB 0.224s "expected"."nullif" 0 2 0.0 kB 0.184s ----------------------- --------- --------- --------- -------------- Files Processed 0 2 0.108s COPY Threads Completion 0 4 0.408s ----------------------- --------- --------- --------- -------------- Total import time ✓ 4 0.1 kB 0.516s 2024-01-08T11:58:12.308013Z LOG Regress pass. touch regress/out/csv-nulls.out pgloader --regress csv-temp.load 2024-01-08T11:58:14.080000Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:58:15.104007Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/csv-temp.out") 2024-01-08T11:58:15.200008Z WARNING PostgreSQL warning: table "temp" does not exist, skipping 2024-01-08T11:58:15.640009Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.008s before load 0 2 0.048s ----------------------- --------- --------- --------- -------------- "public"."temp" 0 5 0.2 kB 0.172s "expected"."temp" 0 5 0.2 kB 0.084s ----------------------- --------- --------- --------- -------------- Files Processed 0 2 0.076s COPY Threads Completion 0 4 0.284s ----------------------- --------- --------- --------- -------------- Total import time ✓ 10 0.3 kB 0.360s 2024-01-08T11:58:15.796010Z LOG Regress pass. touch regress/out/csv-temp.out pgloader --regress csv-trim-extra-blanks.load 2024-01-08T11:58:17.092001Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:58:18.668008Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/csv-trim-extra-blanks.out") 2024-01-08T11:58:19.188012Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.016s before load 0 2 0.184s ----------------------- --------- --------- --------- -------------- "public"."nulls" 0 7 0.3 kB 0.208s "expected"."nulls" 0 7 0.3 kB 0.084s ----------------------- --------- --------- --------- -------------- Files Processed 0 2 0.060s COPY Threads Completion 0 4 0.336s ----------------------- --------- --------- --------- -------------- Total import time ✓ 14 0.6 kB 0.396s 2024-01-08T11:58:19.324013Z LOG Regress pass. touch regress/out/csv-trim-extra-blanks.out pgloader --regress csv-using-sexp.load 2024-01-08T11:58:20.056000Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:58:21.564007Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/csv-using-sexp.out") 2024-01-08T11:58:21.732008Z WARNING PostgreSQL warning: table "sexp" does not exist, skipping 2024-01-08T11:58:22.540013Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.012s before load 0 2 0.104s ----------------------- --------- --------- --------- -------------- "public"."sexp" 0 3 0.0 kB 0.232s "expected"."sexp" 0 3 0.0 kB 0.180s ----------------------- --------- --------- --------- -------------- Files Processed 0 2 0.096s COPY Threads Completion 0 4 0.448s ----------------------- --------- --------- --------- -------------- Total import time ✓ 6 0.1 kB 0.544s 2024-01-08T11:58:22.792014Z LOG Regress pass. touch regress/out/csv-using-sexp.out pgloader --regress csv.load 2024-01-08T11:58:27.100001Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:58:27.468003Z WARNING pgloader always talk to PostgreSQL in utf-8, client_encoding has been forced to 'utf8'. 2024-01-08T11:58:29.472014Z WARNING pgloader always talk to PostgreSQL in utf-8, client_encoding has been forced to 'utf8'. 2024-01-08T11:58:29.760016Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/csv.out") 2024-01-08T11:58:29.972017Z WARNING PostgreSQL warning: table "csv" does not exist, skipping 2024-01-08T11:58:30.424019Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.052s before load 0 2 0.224s ----------------------- --------- --------- --------- -------------- "public"."csv" 0 6 0.2 kB 0.328s "expected"."csv" 0 6 0.2 kB 0.096s ----------------------- --------- --------- --------- -------------- Files Processed 0 2 0.108s COPY Threads Completion 0 4 0.472s ----------------------- --------- --------- --------- -------------- Total import time ✓ 12 0.4 kB 0.580s 2024-01-08T11:58:30.540020Z LOG Regress pass. touch regress/out/csv.out pgloader --regress copy.load 2024-01-08T11:58:31.044000Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:58:31.096001Z WARNING pgloader always talk to PostgreSQL in utf-8, client_encoding has been forced to 'utf8'. 2024-01-08T11:58:32.484008Z WARNING pgloader always talk to PostgreSQL in utf-8, client_encoding has been forced to 'utf8'. 2024-01-08T11:58:32.604009Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/copy.out") 2024-01-08T11:58:32.740010Z WARNING PostgreSQL warning: table "track_full" does not exist, skipping 2024-01-08T11:58:33.396013Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.008s before load 0 2 0.080s ----------------------- --------- --------- --------- -------------- "public"."track_full" 0 3503 366.8 kB 0.340s "expected"."track_full" 0 3503 366.8 kB 0.304s ----------------------- --------- --------- --------- -------------- Files Processed 0 2 0.108s COPY Threads Completion 0 4 0.648s Index Build Completion 0 0 0.140s Create Indexes 0 1 0.004s Constraints 0 1 0.000s ----------------------- --------- --------- --------- -------------- Total import time ✓ 7006 733.5 kB 0.900s 2024-01-08T11:58:33.592014Z LOG Regress pass. touch regress/out/copy.out pgloader --regress copy-hex.load 2024-01-08T11:58:35.036000Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:58:35.684004Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/copy-hex.out") 2024-01-08T11:58:35.732004Z WARNING PostgreSQL warning: table "copyhex" does not exist, skipping 2024-01-08T11:58:35.980006Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.004s before load 0 2 0.088s ----------------------- --------- --------- --------- -------------- "public"."copyhex" 0 6 0.0 kB 0.128s "expected"."copyhex" 0 6 0.0 kB 0.028s ----------------------- --------- --------- --------- -------------- Files Processed 0 2 0.040s COPY Threads Completion 0 4 0.180s ----------------------- --------- --------- --------- -------------- Total import time ✓ 12 0.1 kB 0.220s 2024-01-08T11:58:36.016006Z LOG Regress pass. touch regress/out/copy-hex.out pgloader --regress dbf.load 2024-01-08T11:58:36.036001Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:58:36.232002Z LOG Migrating from # 2024-01-08T11:58:36.232002Z LOG Migrating into # 2024-01-08T11:58:36.420003Z WARNING Forcing encoding to CP850, db3 file has ASCII 2024-01-08T11:58:36.668003Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/dbf.out") 2024-01-08T11:58:36.716003Z WARNING PostgreSQL warning: table "reg2013" does not exist, skipping 2024-01-08T11:58:36.976006Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.008s Create Schemas 0 0 0.000s Create SQL Types 0 0 0.012s Create tables 0 2 0.028s ----------------------- --------- --------- --------- -------------- public.reg2013 0 27 1.0 kB 0.096s "expected"."reg2013" 0 27 1.0 kB 0.056s ----------------------- --------- --------- --------- -------------- COPY Threads Completion 0 6 0.156s Create Triggers 0 0 0.000s Install Comments 0 0 0.000s Files Processed 0 1 0.012s ----------------------- --------- --------- --------- -------------- Total import time ✓ 54 1.9 kB 0.168s 2024-01-08T11:58:37.056006Z LOG Regress pass. touch regress/out/dbf.out pgloader --regress errors.load 2024-01-08T11:58:38.028001Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:58:38.088001Z WARNING pgloader always talk to PostgreSQL in utf-8, client_encoding has been forced to 'utf8'. 2024-01-08T11:58:38.388003Z WARNING Target table "\"err\".\"errors\"" has 1 indexes defined against it. 2024-01-08T11:58:38.388003Z WARNING That could impact loading performance badly. 2024-01-08T11:58:38.388003Z WARNING Consider the option 'drop indexes'. 2024-01-08T11:58:38.500003Z ERROR End of file while collecting quoted item: # 2024-01-08T11:58:38.500003Z FATAL End of file while collecting quoted item: # 2024-01-08T11:58:38.544003Z ERROR PostgreSQL ["\"err\".\"errors\""] Database error 22008: date/time field value out of range: "2006-13-11" HINT: Perhaps you need a different "datestyle" setting. CONTEXT: COPY errors, line 3, column b: "2006-13-11" 2024-01-08T11:58:38.544003Z ERROR PostgreSQL ["\"err\".\"errors\""] Database error 22008: date/time field value out of range: "2006-16-4" HINT: Perhaps you need a different "datestyle" setting. CONTEXT: COPY errors, line 1, column b: "2006-16-4" 2024-01-08T11:58:38.544003Z ERROR PostgreSQL ["\"err\".\"errors\""] Database error 22008: date/time field value out of range: "2006-13-10" HINT: Perhaps you need a different "datestyle" setting. CONTEXT: COPY errors, line 2, column b: "2006-13-10" 2024-01-08T11:58:38.576004Z WARNING pgloader always talk to PostgreSQL in utf-8, client_encoding has been forced to 'utf8'. 2024-01-08T11:58:38.648004Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/errors.out") 2024-01-08T11:58:38.696004Z WARNING PostgreSQL warning: table "errors" does not exist, skipping 2024-01-08T11:58:38.984006Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.004s before load 0 4 0.048s ----------------------- --------- --------- --------- -------------- "err"."errors" 8 7 0.3 kB 0.100s "expected"."errors" 0 7 0.2 kB 0.088s ----------------------- --------- --------- --------- -------------- Files Processed 0 2 0.052s COPY Threads Completion 0 4 0.204s ----------------------- --------- --------- --------- -------------- Total import time 8 14 0.6 kB 0.256s 2024-01-08T11:58:39.064006Z LOG Regress pass. touch regress/out/errors.out pgloader --regress fixed.load 2024-01-08T11:58:40.048001Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:58:40.100001Z WARNING pgloader always talk to PostgreSQL in utf-8, client_encoding has been forced to 'utf8'. 2024-01-08T11:58:40.776005Z WARNING pgloader always talk to PostgreSQL in utf-8, client_encoding has been forced to 'utf8'. 2024-01-08T11:58:40.836005Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/fixed.out") 2024-01-08T11:58:40.904005Z WARNING PostgreSQL warning: table "fixed" does not exist, skipping 2024-01-08T11:58:41.156007Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.008s before load 0 2 0.044s ----------------------- --------- --------- --------- -------------- "public"."fixed" 0 5 0.2 kB 0.096s "expected"."fixed" 0 5 0.2 kB 0.064s ----------------------- --------- --------- --------- -------------- Files Processed 0 2 0.060s COPY Threads Completion 0 4 0.172s Index Build Completion 0 0 0.080s Create Indexes 0 1 0.000s Constraints 0 1 0.000s ----------------------- --------- --------- --------- -------------- Total import time ✓ 10 0.4 kB 0.312s 2024-01-08T11:58:41.228007Z LOG Regress pass. touch regress/out/fixed.out pgloader --regress fields-with-periods.load 2024-01-08T11:58:41.052001Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:58:41.656003Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/fields-with-periods.out") 2024-01-08T11:58:42.008006Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.008s before load 0 2 0.044s ----------------------- --------- --------- --------- -------------- "public"."fixed" 0 3 0.0 kB 0.128s "expected"."fixed" 0 3 0.0 kB 0.084s ----------------------- --------- --------- --------- -------------- Files Processed 0 2 0.044s COPY Threads Completion 0 4 0.216s ----------------------- --------- --------- --------- -------------- Total import time ✓ 6 0.0 kB 0.260s 2024-01-08T11:58:42.100006Z LOG Regress pass. touch regress/out/fields-with-periods.out pgloader --regress ixf.load 2024-01-08T11:58:43.048001Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:58:43.248003Z LOG Migrating from # 2024-01-08T11:58:43.248003Z LOG Migrating into # 2024-01-08T11:58:43.700004Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/ixf.out") 2024-01-08T11:58:43.748005Z WARNING PostgreSQL warning: table "test1" does not exist, skipping 2024-01-08T11:58:44.048006Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.004s before load 0 3 0.040s Create Schemas 0 0 0.004s Create SQL Types 0 0 0.008s Create tables 0 2 0.028s ----------------------- --------- --------- --------- -------------- nsitra.test1 0 4 0.2 kB 0.096s "expected"."test1" 0 4 0.2 kB 0.088s ----------------------- --------- --------- --------- -------------- COPY Threads Completion 0 6 0.192s Index Build Completion 0 0 0.008s Primary Keys 0 0 0.000s Create Triggers 0 0 0.004s Install Comments 0 0 0.000s Files Processed 0 1 0.016s ----------------------- --------- --------- --------- -------------- Total import time ✓ 8 0.3 kB 0.220s 2024-01-08T11:58:44.132008Z LOG Regress pass. touch regress/out/ixf.out pgloader --regress overflow.load 2024-01-08T11:58:45.048001Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:58:45.552004Z ERROR PostgreSQL ["\"public\".\"overflow\""] Database error 22003: value "18446744073709551596" is out of range for type integer CONTEXT: COPY overflow, line 1, column id: "18446744073709551596" 2024-01-08T11:58:45.552004Z ERROR PostgreSQL ["\"public\".\"overflow\""] Database error 23502: null value in column "f1" of relation "overflow" violates not-null constraint DETAIL: Failing row contains (12, null). CONTEXT: COPY overflow, line 1: "12 \N" 2024-01-08T11:58:45.656004Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/overflow.out") 2024-01-08T11:58:45.732004Z WARNING PostgreSQL warning: table "overflow" does not exist, skipping 2024-01-08T11:58:46.032006Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.004s before load 0 2 0.044s ----------------------- --------- --------- --------- -------------- "public"."overflow" 4 0 0.0 kB 0.116s "expected"."overflow" 0 0 0.092s ----------------------- --------- --------- --------- -------------- Files Processed 0 2 0.048s COPY Threads Completion 0 4 0.208s ----------------------- --------- --------- --------- -------------- Total import time 4 0 0.0 kB 0.256s 2024-01-08T11:58:46.124007Z LOG Regress pass. touch regress/out/overflow.out pgloader --regress partial.load 2024-01-08T11:58:47.056001Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:58:47.104001Z WARNING pgloader always talk to PostgreSQL in utf-8, client_encoding has been forced to 'utf8'. 2024-01-08T11:58:47.816005Z WARNING pgloader always talk to PostgreSQL in utf-8, client_encoding has been forced to 'utf8'. 2024-01-08T11:58:47.876005Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/partial.out") 2024-01-08T11:58:47.940006Z WARNING PostgreSQL warning: table "partial" does not exist, skipping 2024-01-08T11:58:48.212007Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.008s before load 0 4 0.048s ----------------------- --------- --------- --------- -------------- "csv"."partial" 0 7 0.1 kB 0.096s "expected"."partial" 0 7 0.1 kB 0.080s ----------------------- --------- --------- --------- -------------- Files Processed 0 2 0.060s COPY Threads Completion 0 4 0.180s Index Build Completion 0 0 0.108s Create Indexes 0 2 0.008s Constraints 0 1 0.004s ----------------------- --------- --------- --------- -------------- Total import time ✓ 14 0.2 kB 0.360s 2024-01-08T11:58:48.292008Z LOG Regress pass. touch regress/out/partial.out pgloader --regress serial.load 2024-01-08T11:58:48.048001Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:58:48.096001Z WARNING pgloader always talk to PostgreSQL in utf-8, client_encoding has been forced to 'utf8'. 2024-01-08T11:58:48.484002Z WARNING Target table "\"public\".\"serial\"" has 1 indexes defined against it. 2024-01-08T11:58:48.484002Z WARNING That could impact loading performance badly. 2024-01-08T11:58:48.484002Z WARNING Consider the option 'drop indexes'. 2024-01-08T11:58:48.624003Z WARNING pgloader always talk to PostgreSQL in utf-8, client_encoding has been forced to 'utf8'. 2024-01-08T11:58:48.668003Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/serial.out") 2024-01-08T11:58:48.704003Z WARNING PostgreSQL warning: table "serial" does not exist, skipping 2024-01-08T11:58:48.880005Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.008s before load 0 2 0.052s ----------------------- --------- --------- --------- -------------- "public"."serial" 0 7 0.2 kB 0.048s "expected"."serial" 0 7 0.2 kB 0.036s ----------------------- --------- --------- --------- -------------- Files Processed 0 2 0.060s COPY Threads Completion 0 4 0.096s ----------------------- --------- --------- --------- -------------- Total import time ✓ 14 0.4 kB 0.156s 2024-01-08T11:58:48.924005Z LOG Regress pass. touch regress/out/serial.out pgloader --regress udc.load 2024-01-08T11:58:50.028000Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:58:50.032000Z LOG Regression testing: "udc.load" 2024-01-08T11:58:50.032000Z LOG Parsing commands from file #P"/build/reproducible-path/pgloader-3.6.9/test/udc.load" 2024-01-08T11:58:50.088001Z WARNING pgloader always talk to PostgreSQL in utf-8, client_encoding has been forced to 'utf8'. 2024-01-08T11:58:50.408004Z WARNING Target table "\"public\".\"udc\"" has 1 indexes defined against it. 2024-01-08T11:58:50.412004Z WARNING That could impact loading performance badly. 2024-01-08T11:58:50.412004Z WARNING Consider the option 'drop indexes'. 2024-01-08T11:58:50.544003Z WARNING pgloader always talk to PostgreSQL in utf-8, client_encoding has been forced to 'utf8'. 2024-01-08T11:58:50.600004Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/udc.out") 2024-01-08T11:58:50.656004Z WARNING PostgreSQL warning: table "udc" does not exist, skipping 2024-01-08T11:58:50.936005Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.012s before load 0 2 0.060s ----------------------- --------- --------- --------- -------------- "public"."udc" 0 5 0.1 kB 0.052s "expected"."udc" 0 5 0.1 kB 0.092s ----------------------- --------- --------- --------- -------------- Files Processed 0 2 0.052s COPY Threads Completion 0 4 0.148s ----------------------- --------- --------- --------- -------------- Total import time ✓ 10 0.2 kB 0.200s 2024-01-08T11:58:51.032006Z LOG Regress pass. touch regress/out/udc.out pgloader --regress xzero.load 2024-01-08T11:58:51.052001Z LOG pgloader version "3.6.7~devel" 2024-01-08T11:58:51.092001Z WARNING pgloader always talk to PostgreSQL in utf-8, client_encoding has been forced to 'utf8'. 2024-01-08T11:58:51.444003Z WARNING Target table "\"public\".\"xzero\"" has 1 indexes defined against it. 2024-01-08T11:58:51.444003Z WARNING That could impact loading performance badly. 2024-01-08T11:58:51.444003Z WARNING Consider the option 'drop indexes'. 2024-01-08T11:58:51.648003Z WARNING pgloader always talk to PostgreSQL in utf-8, client_encoding has been forced to 'utf8'. 2024-01-08T11:58:51.712003Z LOG Comparing loaded data against (#P"/build/reproducible-path/pgloader-3.6.9/test/regress/expected/xzero.out") 2024-01-08T11:58:51.788005Z WARNING PostgreSQL warning: table "xzero" does not exist, skipping 2024-01-08T11:58:52.080006Z LOG report summary reset table name errors rows bytes total time ----------------------- --------- --------- --------- -------------- fetch 0 0 0.004s before load 0 2 0.048s ----------------------- --------- --------- --------- -------------- "public"."xzero" 0 7 0.2 kB 0.100s "expected"."xzero" 0 7 0.2 kB 0.040s ----------------------- --------- --------- --------- -------------- Files Processed 0 2 0.064s COPY Threads Completion 0 4 0.148s ----------------------- --------- --------- --------- -------------- Total import time ✓ 14 0.4 kB 0.212s 2024-01-08T11:58:52.200007Z LOG Regress pass. touch regress/out/xzero.out make[2]: Leaving directory '/build/reproducible-path/pgloader-3.6.9/test' Dropping cluster 15/regress ... make[1]: Leaving directory '/build/reproducible-path/pgloader-3.6.9' create-stamp debian/debhelper-build-stamp dh_testroot dh_prep dh_auto_install --destdir=debian/pgloader/ dh_install dh_installdocs dh_installchangelogs debian/rules override_dh_installman-arch make[1]: Entering directory '/build/reproducible-path/pgloader-3.6.9' 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.9 \ --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.9' 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.9' # do nothing, sbcl doesn't write any debug info make[1]: Leaving directory '/build/reproducible-path/pgloader-3.6.9' debian/rules override_dh_strip make[1]: Entering directory '/build/reproducible-path/pgloader-3.6.9' # do nothing, sbcl doesn't write any debug info make[1]: Leaving directory '/build/reproducible-path/pgloader-3.6.9' dh_makeshlibs -a dh_shlibdeps -a dpkg-shlibdeps: warning: debian/pgloader/usr/bin/pgloader contains an unresolvable reference to symbol current_binding_stack_pointer: it's probably a plugin dpkg-shlibdeps: warning: 1 similar warning has been skipped (use -v to see it) dpkg-shlibdeps: warning: package could avoid a useless dependency if debian/pgloader/usr/bin/pgloader was not linked against ld-linux-aarch64.so.1 (it uses none of the library's symbols) dh_installdeb debian/rules override_dh_gencontrol make[1]: Entering directory '/build/reproducible-path/pgloader-3.6.9' dh_gencontrol -- \ -V"sqlite:Depends=libsqlite3-0" \ -V"ssl:Depends=libssl3" make[1]: Leaving directory '/build/reproducible-path/pgloader-3.6.9' dh_md5sums dh_builddeb dpkg-deb: building package 'pgloader' in '../pgloader_3.6.9-1_arm64.deb'. dpkg-genbuildinfo --build=binary -O../pgloader_3.6.9-1_arm64.buildinfo dpkg-genchanges --build=binary -O../pgloader_3.6.9-1_arm64.changes dpkg-genchanges: info: binary-only upload (no source code included) dpkg-source --after-build . dpkg-source: info: using options from pgloader-3.6.9/debian/source/options: --extend-diff-ignore=src/params.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/2293027 and its subdirectories I: Current time: Sun Jan 7 23:59:37 -12 2024 I: pbuilder-time-stamp: 1704715177 Mon Jan 8 11:59:40 UTC 2024 I: 1st build successful. Starting 2nd build on remote node codethink02-arm64.debian.net. Mon Jan 8 11:59:40 UTC 2024 I: Preparing to do remote build '2' on codethink02-arm64.debian.net. Mon Jan 8 12:13:26 UTC 2024 I: Deleting $TMPDIR on codethink02-arm64.debian.net. Mon Jan 8 12:13:27 UTC 2024 I: pgloader_3.6.9-1_arm64.changes: Format: 1.8 Date: Mon, 24 Oct 2022 12:58:09 +0200 Source: pgloader Binary: pgloader Architecture: arm64 Version: 3.6.9-1 Distribution: unstable Urgency: medium Maintainer: Dimitri Fontaine Changed-By: Christoph Berg Description: pgloader - extract, transform and load data into PostgreSQL Closes: 1022296 Changes: pgloader (3.6.9-1) unstable; urgency=medium . * New upstream version. * Bump ip4r dependencies to 15. (Closes: #1022296) Checksums-Sha1: dbb152b9a1daa0b32461337a2de94f66c4ae0fec 10261 pgloader_3.6.9-1_arm64.buildinfo 6dacabfb8ba8c261816ba73b53c5afa54334a42b 25484632 pgloader_3.6.9-1_arm64.deb Checksums-Sha256: 8b0270b10821ccbb57118ac7eebcbabf9ff0212237d7e5a71f2459939d15a600 10261 pgloader_3.6.9-1_arm64.buildinfo 76d076e97a9f680e14eb6d3e2cdcc5ac44f74fd9da47b8cda7252f13e050d556 25484632 pgloader_3.6.9-1_arm64.deb Files: 34f8405ff183dc8271100dd06388bf05 10261 database optional pgloader_3.6.9-1_arm64.buildinfo 80023ce142046e6d0d0f6386b4f40e6f 25484632 database optional pgloader_3.6.9-1_arm64.deb Mon Jan 8 12:13:28 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.I6MWnjUg/pgloader_3.6.9-1.diffoscope.html --text /srv/reproducible-results/rbuild-debian/r-b-build.I6MWnjUg/pgloader_3.6.9-1.diffoscope.txt --json /srv/reproducible-results/rbuild-debian/r-b-build.I6MWnjUg/pgloader_3.6.9-1.diffoscope.json --profile=- /srv/reproducible-results/rbuild-debian/r-b-build.I6MWnjUg/b1/pgloader_3.6.9-1_arm64.changes /srv/reproducible-results/rbuild-debian/r-b-build.I6MWnjUg/b2/pgloader_3.6.9-1_arm64.changes ## close_archive (total time: 0.000s) 0.000s 8 calls diffoscope.comparators.xz.XzContainer 0.000s 4 calls diffoscope.comparators.deb.DebContainer 0.000s 6 calls diffoscope.comparators.tar.TarContainer 0.000s 2 calls diffoscope.comparators.deb.DebTarContainer ## command (total time: 14.504s) 5.690s 88 calls objdump 5.133s 57 calls diff 1.853s 468 calls readelf 1.236s 8 calls xz 0.431s 11 calls strings 0.161s 2 calls objcopy 0.000s 7 calls cmp (internal) ## compare_files (cumulative) (total time: 50.847s) 9.708s 1 call abc.DotChangesFile 9.686s 1 call abc.DebFile 9.533s 2 calls abc.XzFile 8.242s 1 call abc.DebDataTarFile 7.932s 1 call abc.ElfFile 5.344s 4 calls diffoscope.comparators.elf.ElfCodeSection 0.327s 16 calls diffoscope.comparators.elf.ElfSection 0.051s 1 call abc.TarFile 0.017s 1 call abc.TextFile 0.007s 1 call abc.Md5sumsFile ## container_extract (total time: 1.638s) 1.237s 8 calls diffoscope.comparators.xz.XzContainer 0.230s 10 calls diffoscope.comparators.deb.DebContainer 0.165s 194 calls diffoscope.comparators.deb.DebTarContainer 0.005s 8 calls diffoscope.comparators.tar.TarContainer ## diff (total time: 0.060s) 0.060s 8 calls linediff ## has_same_content_as (total time: 0.001s) 0.000s 2 calls abc.TextFile 0.000s 2 calls abc.Md5sumsFile 0.000s 2 calls abc.XzFile 0.000s 1 call abc.DotChangesFile 0.000s 1 call abc.DebFile 0.000s 16 calls diffoscope.comparators.elf.ElfSection 0.000s 1 call abc.TarFile 0.000s 1 call abc.DebDataTarFile 0.000s 1 call abc.ElfFile 0.000s 4 calls diffoscope.comparators.elf.ElfCodeSection ## main (total time: 10.354s) 10.354s 2 calls outputs 0.000s 1 call cleanup ## open_archive (total time: 0.000s) 0.000s 8 calls diffoscope.comparators.xz.XzContainer 0.000s 6 calls diffoscope.comparators.tar.TarContainer 0.000s 4 calls diffoscope.comparators.deb.DebContainer 0.000s 2 calls diffoscope.comparators.deb.DebTarContainer ## output (total time: 0.103s) 0.099s 1 call html 0.003s 1 call text 0.002s 1 call json ## recognizes (total time: 0.683s) 0.271s 12 calls diffoscope.comparators.binary.FilesystemFile 0.187s 720 calls diffoscope.comparators.utils.libarchive.LibarchiveMember 0.140s 352 calls diffoscope.comparators.elf.ElfSection 0.036s 88 calls diffoscope.comparators.elf.ElfCodeSection 0.027s 374 calls diffoscope.comparators.utils.archive.ArchiveMember 0.022s 108 calls diffoscope.comparators.debian.DebControlMember 0.000s 10 calls abc.DotChangesFile 0.000s 16 calls abc.Md5sumsFile ## specialize (total time: 0.259s) 0.259s 31 calls specialize Mon Jan 8 12:13:39 UTC 2024 E: pgloader failed to build reproducibly in bookworm on arm64. Mon Jan 8 12:13:39 UTC 2024 E: diffoscope 240 found issues, please check https://tests.reproducible-builds.org/debian/dbd/bookworm/arm64/pgloader_3.6.9-1.diffoscope.html Mon Jan 8 12:13:41 UTC 2024 I: Submitting .buildinfo files to external archives: Mon Jan 8 12:13:41 UTC 2024 I: Submitting 12K b1/pgloader_3.6.9-1_arm64.buildinfo.asc Mon Jan 8 12:13:42 UTC 2024 I: Submitting 12K b2/pgloader_3.6.9-1_arm64.buildinfo.asc Mon Jan 8 12:13:43 UTC 2024 I: Done submitting .buildinfo files to http://buildinfo.debian.net/api/submit. Mon Jan 8 12:13:43 UTC 2024 I: Done submitting .buildinfo files. Mon Jan 8 12:13:43 UTC 2024 I: Removing signed pgloader_3.6.9-1_arm64.buildinfo.asc files: removed './b1/pgloader_3.6.9-1_arm64.buildinfo.asc' removed './b2/pgloader_3.6.9-1_arm64.buildinfo.asc'