RUN: /usr/share/launchpad-buildd/slavebin/slave-prep Forking launchpad-buildd slave process... Kernel version: Linux lgw01-amd64-015 4.4.0-101-generic #124-Ubuntu SMP Fri Nov 10 18:29:59 UTC 2017 x86_64 Buildd toolchain package versions: launchpad-buildd_157 python-lpbuildd_157 sbuild_0.67.0-2ubuntu7.1 bzr-builder_0.7.3+bzr174~ppa13~ubuntu14.10.1 bzr_2.7.0-2ubuntu3.1 git-build-recipe_0.3.4~git201611291343.dcee459~ubuntu16.04.1 git_1:2.7.4-0ubuntu1.3 dpkg-dev_1.18.4ubuntu1.3 python-debian_0.1.27ubuntu2. Syncing the system clock with the buildd NTP service... 23 Dec 21:23:32 ntpdate[1804]: adjust time server 10.211.37.1 offset -0.000180 sec RUN: /usr/share/launchpad-buildd/slavebin/in-target unpack-chroot --backend=chroot --series=bionic --arch=i386 PACKAGEBUILD-13891773 /home/buildd/filecache-default/b6762bcd0bec7d108ffb0fb3fb0b7d1ce32df8bb Creating target for build PACKAGEBUILD-13891773 RUN: /usr/share/launchpad-buildd/slavebin/in-target mount-chroot --backend=chroot --series=bionic --arch=i386 PACKAGEBUILD-13891773 Starting target for build PACKAGEBUILD-13891773 RUN: /usr/share/launchpad-buildd/slavebin/in-target override-sources-list --backend=chroot --series=bionic --arch=i386 PACKAGEBUILD-13891773 'deb http://ftpmaster.internal/ubuntu bionic main restricted universe multiverse' 'deb http://ftpmaster.internal/ubuntu bionic-security main restricted universe multiverse' 'deb http://ftpmaster.internal/ubuntu bionic-updates main restricted universe multiverse' Overriding sources.list in build-PACKAGEBUILD-13891773 RUN: /usr/share/launchpad-buildd/slavebin/in-target update-debian-chroot --backend=chroot --series=bionic --arch=i386 PACKAGEBUILD-13891773 Updating target for build PACKAGEBUILD-13891773 Get:1 http://ftpmaster.internal/ubuntu bionic InRelease [235 kB] Get:2 http://ftpmaster.internal/ubuntu bionic-security InRelease [65.4 kB] Get:3 http://ftpmaster.internal/ubuntu bionic-updates InRelease [65.4 kB] Get:4 http://ftpmaster.internal/ubuntu bionic/main i386 Packages [1006 kB] Get:5 http://ftpmaster.internal/ubuntu bionic/main Translation-en [517 kB] Get:6 http://ftpmaster.internal/ubuntu bionic/restricted i386 Packages [8836 B] Get:7 http://ftpmaster.internal/ubuntu bionic/restricted Translation-en [2788 B] Get:8 http://ftpmaster.internal/ubuntu bionic/universe i386 Packages [8334 kB] Get:9 http://ftpmaster.internal/ubuntu bionic/universe Translation-en [4918 kB] Get:10 http://ftpmaster.internal/ubuntu bionic/multiverse i386 Packages [144 kB] Get:11 http://ftpmaster.internal/ubuntu bionic/multiverse Translation-en [109 kB] Fetched 15.4 MB in 3s (4965 kB/s) Reading package lists... Reading package lists... Building dependency tree... Reading state information... Calculating upgrade... The following packages were automatically installed and are no longer required: libasn1-8-heimdal libcurl3-gnutls libgssapi-krb5-2 libgssapi3-heimdal libhcrypto4-heimdal libheimbase1-heimdal libheimntlm0-heimdal libhx509-5-heimdal libidn2-0 libk5crypto3 libkeyutils1 libkrb5-26-heimdal libkrb5-3 libkrb5support0 libldap-2.4-2 libldap-common libnghttp2-14 libpsl5 libroken18-heimdal librtmp1 libsasl2-2 libsasl2-modules-db libunistring0 libustr-1.0-1 libwind0-heimdal Use 'sudo apt autoremove' to remove them. The following NEW packages will be installed: libnghttp2-14 The following packages will be upgraded: adduser apt apt-transport-https base-files base-passwd binutils binutils-common binutils-i686-linux-gnu bsdutils build-essential coreutils cpp-7 debconf debianutils dpkg dpkg-dev e2fslibs e2fsprogs fdisk findutils g++-7 gcc-7 gcc-7-base gnupg gnupg-agent gpgv libapparmor1 libapt-pkg5.0 libasan4 libasn1-8-heimdal libassuan0 libatomic1 libbinutils libblkid1 libc-bin libc-dev-bin libc6 libc6-dev libcap-ng0 libcap2 libcc1-0 libcilkrts5 libcomerr2 libcurl3-gnutls libdpkg-perl libfdisk1 libgcc-7-dev libgcc1 libgcrypt20 libgomp1 libgpg-error0 libgssapi3-heimdal libhcrypto4-heimdal libheimbase1-heimdal libheimntlm0-heimdal libhogweed4 libhx509-5-heimdal libidn11 libidn2-0 libip4tc0 libitm1 libkeyutils1 libkrb5-26-heimdal liblockfile-bin liblockfile1 libmount1 libmpx2 libnettle6 libnpth0 libp11-kit0 libpcre3 libperl5.26 libpng16-16 libpsl5 libquadmath0 libroken18-heimdal libseccomp2 libselinux1 libsemanage-common libsemanage1 libsmartcols1 libsqlite3-0 libss2 libssl1.0.0 libstdc++-7-dev libstdc++6 libsystemd0 libtasn1-6 libubsan0 libudev1 libuuid1 libwind0-heimdal linux-libc-dev lsb-base mount multiarch-support openssl optipng perl perl-base perl-modules-5.26 pinentry-curses sensible-utils systemd systemd-sysv sysvinit-utils tzdata util-linux 108 upgraded, 1 newly installed, 0 to remove and 0 not upgraded. Need to get 62.9 MB of archives. After this operation, 1227 kB of additional disk space will be used. Get:1 http://ftpmaster.internal/ubuntu bionic/main i386 base-files i386 10ubuntu1 [55.9 kB] Get:2 http://ftpmaster.internal/ubuntu bionic/main i386 bsdutils i386 1:2.30.2-0.1ubuntu1 [62.5 kB] Get:3 http://ftpmaster.internal/ubuntu bionic/main i386 coreutils i386 8.26-3ubuntu4 [1283 kB] Get:4 http://ftpmaster.internal/ubuntu bionic/main i386 debianutils i386 4.8.3 [86.3 kB] Get:5 http://ftpmaster.internal/ubuntu bionic/main i386 dpkg i386 1.19.0.4ubuntu1 [1166 kB] Get:6 http://ftpmaster.internal/ubuntu bionic/main i386 libc6-dev i386 2.26-0ubuntu2 [2144 kB] Get:7 http://ftpmaster.internal/ubuntu bionic/main i386 libc-dev-bin i386 2.26-0ubuntu2 [67.0 kB] Get:8 http://ftpmaster.internal/ubuntu bionic/main i386 linux-libc-dev i386 4.13.0-17.20 [962 kB] Get:9 http://ftpmaster.internal/ubuntu bionic/main i386 libquadmath0 i386 7.2.0-18ubuntu2 [205 kB] Get:10 http://ftpmaster.internal/ubuntu bionic/main i386 libitm1 i386 7.2.0-18ubuntu2 [30.3 kB] Get:11 http://ftpmaster.internal/ubuntu bionic/main i386 gcc-7-base i386 7.2.0-18ubuntu2 [19.0 kB] Get:12 http://ftpmaster.internal/ubuntu bionic/main i386 libgcc1 i386 1:7.2.0-18ubuntu2 [47.0 kB] Get:13 http://ftpmaster.internal/ubuntu bionic/main i386 libmpx2 i386 7.2.0-18ubuntu2 [13.1 kB] Get:14 http://ftpmaster.internal/ubuntu bionic/main i386 libgomp1 i386 7.2.0-18ubuntu2 [80.2 kB] Get:15 http://ftpmaster.internal/ubuntu bionic/main i386 libatomic1 i386 7.2.0-18ubuntu2 [9736 B] Get:16 http://ftpmaster.internal/ubuntu bionic/main i386 libasan4 i386 7.2.0-18ubuntu2 [360 kB] Get:17 http://ftpmaster.internal/ubuntu bionic/main i386 libubsan0 i386 7.2.0-18ubuntu2 [141 kB] Get:18 http://ftpmaster.internal/ubuntu bionic/main i386 libcilkrts5 i386 7.2.0-18ubuntu2 [47.2 kB] Get:19 http://ftpmaster.internal/ubuntu bionic/main i386 cpp-7 i386 7.2.0-18ubuntu2 [6962 kB] Get:20 http://ftpmaster.internal/ubuntu bionic/main i386 libcc1-0 i386 7.2.0-18ubuntu2 [41.4 kB] Get:21 http://ftpmaster.internal/ubuntu bionic/main i386 g++-7 i386 7.2.0-18ubuntu2 [7804 kB] Get:22 http://ftpmaster.internal/ubuntu bionic/main i386 gcc-7 i386 7.2.0-18ubuntu2 [7670 kB] Get:23 http://ftpmaster.internal/ubuntu bionic/main i386 libgcc-7-dev i386 7.2.0-18ubuntu2 [2399 kB] Get:24 http://ftpmaster.internal/ubuntu bionic/main i386 libstdc++-7-dev i386 7.2.0-18ubuntu2 [1498 kB] Get:25 http://ftpmaster.internal/ubuntu bionic/main i386 libstdc++6 i386 7.2.0-18ubuntu2 [429 kB] Get:26 http://ftpmaster.internal/ubuntu bionic/main i386 libbinutils i386 2.29.1-12ubuntu1 [547 kB] Get:27 http://ftpmaster.internal/ubuntu bionic/main i386 binutils i386 2.29.1-12ubuntu1 [3408 B] Get:28 http://ftpmaster.internal/ubuntu bionic/main i386 binutils-common i386 2.29.1-12ubuntu1 [190 kB] Get:29 http://ftpmaster.internal/ubuntu bionic/main i386 binutils-i686-linux-gnu i386 2.29.1-12ubuntu1 [1998 kB] Get:30 http://ftpmaster.internal/ubuntu bionic/main i386 libc6 i386 2.26-0ubuntu2 [2544 kB] Get:31 http://ftpmaster.internal/ubuntu bionic/main i386 e2fslibs i386 1.43.7-1 [184 kB] Get:32 http://ftpmaster.internal/ubuntu bionic/main i386 e2fsprogs i386 1.43.7-1 [535 kB] Get:33 http://ftpmaster.internal/ubuntu bionic/main i386 findutils i386 4.6.0+git+20170828-2 [305 kB] Get:34 http://ftpmaster.internal/ubuntu bionic/main i386 perl-modules-5.26 all 5.26.1-3 [2761 kB] Get:35 http://ftpmaster.internal/ubuntu bionic/main i386 libperl5.26 i386 5.26.1-3 [3181 kB] Get:36 http://ftpmaster.internal/ubuntu bionic/main i386 perl i386 5.26.1-3 [201 kB] Get:37 http://ftpmaster.internal/ubuntu bionic/main i386 perl-base i386 5.26.1-3 [1493 kB] Get:38 http://ftpmaster.internal/ubuntu bionic/main i386 libuuid1 i386 2.30.2-0.1ubuntu1 [16.0 kB] Get:39 http://ftpmaster.internal/ubuntu bionic/main i386 libblkid1 i386 2.30.2-0.1ubuntu1 [133 kB] Get:40 http://ftpmaster.internal/ubuntu bionic/main i386 libsmartcols1 i386 2.30.2-0.1ubuntu1 [85.6 kB] Get:41 http://ftpmaster.internal/ubuntu bionic/main i386 libfdisk1 i386 2.30.2-0.1ubuntu1 [173 kB] Get:42 http://ftpmaster.internal/ubuntu bionic/main i386 libpcre3 i386 2:8.39-8 [228 kB] Get:43 http://ftpmaster.internal/ubuntu bionic/main i386 libselinux1 i386 2.7-2 [73.0 kB] Get:44 http://ftpmaster.internal/ubuntu bionic/main i386 libmount1 i386 2.30.2-0.1ubuntu1 [143 kB] Get:45 http://ftpmaster.internal/ubuntu bionic/main i386 fdisk i386 2.30.2-0.1ubuntu1 [115 kB] Get:46 http://ftpmaster.internal/ubuntu bionic/main i386 util-linux i386 2.30.2-0.1ubuntu1 [905 kB] Get:47 http://ftpmaster.internal/ubuntu bionic/main i386 base-passwd i386 3.5.44 [47.8 kB] Get:48 http://ftpmaster.internal/ubuntu bionic/main i386 libc-bin i386 2.26-0ubuntu2 [569 kB] Get:49 http://ftpmaster.internal/ubuntu bionic/main i386 sysvinit-utils i386 2.88dsf-59.10ubuntu1 [19.3 kB] Get:50 http://ftpmaster.internal/ubuntu bionic/main i386 libudev1 i386 235-3ubuntu2 [58.2 kB] Get:51 http://ftpmaster.internal/ubuntu bionic/main i386 libapt-pkg5.0 i386 1.6~alpha5 [847 kB] Get:52 http://ftpmaster.internal/ubuntu bionic/main i386 debconf all 1.5.65 [124 kB] Get:53 http://ftpmaster.internal/ubuntu bionic/main i386 adduser all 3.116ubuntu1 [163 kB] Get:54 http://ftpmaster.internal/ubuntu bionic/main i386 libgpg-error0 i386 1.27-5 [40.2 kB] Get:55 http://ftpmaster.internal/ubuntu bionic/main i386 libgcrypt20 i386 1.8.1-4 [398 kB] Get:56 http://ftpmaster.internal/ubuntu bionic/main i386 gpgv i386 2.1.15-1ubuntu8 [206 kB] Get:57 http://ftpmaster.internal/ubuntu bionic/main i386 libseccomp2 i386 2.3.1-2.1ubuntu3 [35.4 kB] Get:58 http://ftpmaster.internal/ubuntu bionic/main i386 apt i386 1.6~alpha5 [1169 kB] Get:59 http://ftpmaster.internal/ubuntu bionic/main i386 libapparmor1 i386 2.11.0-2ubuntu18 [30.3 kB] Get:60 http://ftpmaster.internal/ubuntu bionic/main i386 libcap2 i386 1:2.25-1.2 [13.4 kB] Get:61 http://ftpmaster.internal/ubuntu bionic/main i386 libidn11 i386 1.33-2.1 [46.8 kB] Get:62 http://ftpmaster.internal/ubuntu bionic/main i386 libip4tc0 i386 1.6.1-2ubuntu2 [20.4 kB] Get:63 http://ftpmaster.internal/ubuntu bionic/main i386 mount i386 2.30.2-0.1ubuntu1 [115 kB] Get:64 http://ftpmaster.internal/ubuntu bionic/main i386 systemd i386 235-3ubuntu2 [2926 kB] Get:65 http://ftpmaster.internal/ubuntu bionic/main i386 libsystemd0 i386 235-3ubuntu2 [213 kB] Get:66 http://ftpmaster.internal/ubuntu bionic/main i386 systemd-sysv i386 235-3ubuntu2 [13.1 kB] Get:67 http://ftpmaster.internal/ubuntu bionic/main i386 libcap-ng0 i386 0.7.7-3.1 [11.2 kB] Get:68 http://ftpmaster.internal/ubuntu bionic/main i386 libcomerr2 i386 1.43.7-1 [11.7 kB] Get:69 http://ftpmaster.internal/ubuntu bionic/main i386 libsemanage-common all 2.7-2 [6916 B] Get:70 http://ftpmaster.internal/ubuntu bionic/main i386 libsemanage1 i386 2.7-2 [93.4 kB] Get:71 http://ftpmaster.internal/ubuntu bionic/main i386 libss2 i386 1.43.7-1 [11.6 kB] Get:72 http://ftpmaster.internal/ubuntu bionic/main i386 libnettle6 i386 3.3-2 [109 kB] Get:73 http://ftpmaster.internal/ubuntu bionic/main i386 libhogweed4 i386 3.3-2 [137 kB] Get:74 http://ftpmaster.internal/ubuntu bionic/main i386 libp11-kit0 i386 0.23.9-2 [185 kB] Get:75 http://ftpmaster.internal/ubuntu bionic/main i386 libtasn1-6 i386 4.12-3 [38.9 kB] Get:76 http://ftpmaster.internal/ubuntu bionic/main i386 lsb-base all 9.20170808ubuntu1 [12.5 kB] Get:77 http://ftpmaster.internal/ubuntu bionic/main i386 sensible-utils all 0.0.11 [14.8 kB] Get:78 http://ftpmaster.internal/ubuntu bionic/main i386 libassuan0 i386 2.5.1-1 [36.9 kB] Get:79 http://ftpmaster.internal/ubuntu bionic/main i386 pinentry-curses i386 1.0.0-3 [36.6 kB] Get:80 http://ftpmaster.internal/ubuntu bionic/main i386 libnpth0 i386 1.5-3 [7988 B] Get:81 http://ftpmaster.internal/ubuntu bionic/main i386 gnupg i386 2.1.15-1ubuntu8 [823 kB] Get:82 http://ftpmaster.internal/ubuntu bionic/main i386 gnupg-agent i386 2.1.15-1ubuntu8 [276 kB] Get:83 http://ftpmaster.internal/ubuntu bionic/main i386 libsqlite3-0 i386 3.21.0-1 [526 kB] Get:84 http://ftpmaster.internal/ubuntu bionic/main i386 libroken18-heimdal i386 7.5.0+dfsg-1 [44.8 kB] Get:85 http://ftpmaster.internal/ubuntu bionic/main i386 libasn1-8-heimdal i386 7.5.0+dfsg-1 [183 kB] Get:86 http://ftpmaster.internal/ubuntu bionic/main i386 libheimbase1-heimdal i386 7.5.0+dfsg-1 [32.1 kB] Get:87 http://ftpmaster.internal/ubuntu bionic/main i386 libhcrypto4-heimdal i386 7.5.0+dfsg-1 [92.6 kB] Get:88 http://ftpmaster.internal/ubuntu bionic/main i386 libwind0-heimdal i386 7.5.0+dfsg-1 [48.3 kB] Get:89 http://ftpmaster.internal/ubuntu bionic/main i386 libhx509-5-heimdal i386 7.5.0+dfsg-1 [118 kB] Get:90 http://ftpmaster.internal/ubuntu bionic/main i386 libkrb5-26-heimdal i386 7.5.0+dfsg-1 [232 kB] Get:91 http://ftpmaster.internal/ubuntu bionic/main i386 libheimntlm0-heimdal i386 7.5.0+dfsg-1 [16.4 kB] Get:92 http://ftpmaster.internal/ubuntu bionic/main i386 libgssapi3-heimdal i386 7.5.0+dfsg-1 [106 kB] Get:93 http://ftpmaster.internal/ubuntu bionic/main i386 libssl1.0.0 i386 1.0.2g-1ubuntu14 [907 kB] Get:94 http://ftpmaster.internal/ubuntu bionic/main i386 multiarch-support i386 2.26-0ubuntu2 [6830 B] Get:95 http://ftpmaster.internal/ubuntu bionic/main i386 openssl i386 1.0.2g-1ubuntu14 [508 kB] Get:96 http://ftpmaster.internal/ubuntu bionic/main i386 tzdata all 2017c-1 [188 kB] Get:97 http://ftpmaster.internal/ubuntu bionic/main i386 libidn2-0 i386 2.0.4-1 [94.8 kB] Get:98 http://ftpmaster.internal/ubuntu bionic/main i386 libkeyutils1 i386 1.5.9-9.2ubuntu1 [9544 B] Get:99 http://ftpmaster.internal/ubuntu bionic/main i386 libpng16-16 i386 1.6.34-1 [183 kB] Get:100 http://ftpmaster.internal/ubuntu bionic/universe i386 apt-transport-https all 1.6~alpha5 [1692 B] Get:101 http://ftpmaster.internal/ubuntu bionic/main i386 dpkg-dev all 1.19.0.4ubuntu1 [607 kB] Get:102 http://ftpmaster.internal/ubuntu bionic/main i386 libdpkg-perl all 1.19.0.4ubuntu1 [211 kB] Get:103 http://ftpmaster.internal/ubuntu bionic/main i386 build-essential i386 12.4ubuntu1 [4752 B] Get:104 http://ftpmaster.internal/ubuntu bionic/main i386 libnghttp2-14 i386 1.28.0-1 [83.0 kB] Get:105 http://ftpmaster.internal/ubuntu bionic/main i386 libpsl5 i386 0.19.1-4 [41.9 kB] Get:106 http://ftpmaster.internal/ubuntu bionic/main i386 libcurl3-gnutls i386 7.57.0-1ubuntu1 [233 kB] Get:107 http://ftpmaster.internal/ubuntu bionic/main i386 liblockfile-bin i386 1.14-1.1 [12.5 kB] Get:108 http://ftpmaster.internal/ubuntu bionic/main i386 liblockfile1 i386 1.14-1.1 [7144 B] Get:109 http://ftpmaster.internal/ubuntu bionic/main i386 optipng i386 0.7.6-1.1 [87.7 kB] debconf: delaying package configuration, since apt-utils is not installed Fetched 62.9 MB in 1s (49.1 MB/s) (Reading database ... 12671 files and directories currently installed.) Preparing to unpack .../base-files_10ubuntu1_i386.deb ... Unpacking base-files (10ubuntu1) over (9.6ubuntu101) ... Setting up base-files (10ubuntu1) ... Installing new version of config file /etc/debian_version ... Installing new version of config file /etc/issue ... Installing new version of config file /etc/issue.net ... Installing new version of config file /etc/lsb-release ... (Reading database ... 12671 files and directories currently installed.) Preparing to unpack .../bsdutils_1%3a2.30.2-0.1ubuntu1_i386.deb ... Unpacking bsdutils (1:2.30.2-0.1ubuntu1) over (1:2.30.1-0ubuntu4) ... Setting up bsdutils (1:2.30.2-0.1ubuntu1) ... (Reading database ... 12671 files and directories currently installed.) Preparing to unpack .../coreutils_8.26-3ubuntu4_i386.deb ... Unpacking coreutils (8.26-3ubuntu4) over (8.26-3ubuntu3) ... Setting up coreutils (8.26-3ubuntu4) ... (Reading database ... 12671 files and directories currently installed.) Preparing to unpack .../debianutils_4.8.3_i386.deb ... Unpacking debianutils (4.8.3) over (4.8.2) ... Setting up debianutils (4.8.3) ... (Reading database ... 12671 files and directories currently installed.) Preparing to unpack .../dpkg_1.19.0.4ubuntu1_i386.deb ... Unpacking dpkg (1.19.0.4ubuntu1) over (1.18.24ubuntu1) ... Setting up dpkg (1.19.0.4ubuntu1) ... Installing new version of config file /etc/alternatives/README ... Installing new version of config file /etc/cron.daily/dpkg ... Installing new version of config file /etc/logrotate.d/dpkg ... (Reading database ... 12673 files and directories currently installed.) Preparing to unpack .../0-libc6-dev_2.26-0ubuntu2_i386.deb ... Unpacking libc6-dev:i386 (2.26-0ubuntu2) over (2.26-0ubuntu1) ... Preparing to unpack .../1-libc-dev-bin_2.26-0ubuntu2_i386.deb ... Unpacking libc-dev-bin (2.26-0ubuntu2) over (2.26-0ubuntu1) ... Preparing to unpack .../2-linux-libc-dev_4.13.0-17.20_i386.deb ... Unpacking linux-libc-dev:i386 (4.13.0-17.20) over (4.13.0-11.12) ... Preparing to unpack .../3-libquadmath0_7.2.0-18ubuntu2_i386.deb ... Unpacking libquadmath0:i386 (7.2.0-18ubuntu2) over (7.2.0-6ubuntu1) ... Preparing to unpack .../4-libitm1_7.2.0-18ubuntu2_i386.deb ... Unpacking libitm1:i386 (7.2.0-18ubuntu2) over (7.2.0-6ubuntu1) ... Preparing to unpack .../5-gcc-7-base_7.2.0-18ubuntu2_i386.deb ... Unpacking gcc-7-base:i386 (7.2.0-18ubuntu2) over (7.2.0-6ubuntu1) ... Setting up gcc-7-base:i386 (7.2.0-18ubuntu2) ... (Reading database ... 12673 files and directories currently installed.) Preparing to unpack .../libgcc1_1%3a7.2.0-18ubuntu2_i386.deb ... Unpacking libgcc1:i386 (1:7.2.0-18ubuntu2) over (1:7.2.0-6ubuntu1) ... Setting up libgcc1:i386 (1:7.2.0-18ubuntu2) ... (Reading database ... 12673 files and directories currently installed.) Preparing to unpack .../00-libmpx2_7.2.0-18ubuntu2_i386.deb ... Unpacking libmpx2:i386 (7.2.0-18ubuntu2) over (7.2.0-6ubuntu1) ... Preparing to unpack .../01-libgomp1_7.2.0-18ubuntu2_i386.deb ... Unpacking libgomp1:i386 (7.2.0-18ubuntu2) over (7.2.0-6ubuntu1) ... Preparing to unpack .../02-libatomic1_7.2.0-18ubuntu2_i386.deb ... Unpacking libatomic1:i386 (7.2.0-18ubuntu2) over (7.2.0-6ubuntu1) ... Preparing to unpack .../03-libasan4_7.2.0-18ubuntu2_i386.deb ... Unpacking libasan4:i386 (7.2.0-18ubuntu2) over (7.2.0-6ubuntu1) ... Preparing to unpack .../04-libubsan0_7.2.0-18ubuntu2_i386.deb ... Unpacking libubsan0:i386 (7.2.0-18ubuntu2) over (7.2.0-6ubuntu1) ... Preparing to unpack .../05-libcilkrts5_7.2.0-18ubuntu2_i386.deb ... Unpacking libcilkrts5:i386 (7.2.0-18ubuntu2) over (7.2.0-6ubuntu1) ... Preparing to unpack .../06-cpp-7_7.2.0-18ubuntu2_i386.deb ... Unpacking cpp-7 (7.2.0-18ubuntu2) over (7.2.0-6ubuntu1) ... Preparing to unpack .../07-libcc1-0_7.2.0-18ubuntu2_i386.deb ... Unpacking libcc1-0:i386 (7.2.0-18ubuntu2) over (7.2.0-6ubuntu1) ... Preparing to unpack .../08-g++-7_7.2.0-18ubuntu2_i386.deb ... Unpacking g++-7 (7.2.0-18ubuntu2) over (7.2.0-6ubuntu1) ... Preparing to unpack .../09-gcc-7_7.2.0-18ubuntu2_i386.deb ... Unpacking gcc-7 (7.2.0-18ubuntu2) over (7.2.0-6ubuntu1) ... Preparing to unpack .../10-libgcc-7-dev_7.2.0-18ubuntu2_i386.deb ... Unpacking libgcc-7-dev:i386 (7.2.0-18ubuntu2) over (7.2.0-6ubuntu1) ... Preparing to unpack .../11-libstdc++-7-dev_7.2.0-18ubuntu2_i386.deb ... Unpacking libstdc++-7-dev:i386 (7.2.0-18ubuntu2) over (7.2.0-6ubuntu1) ... Preparing to unpack .../12-libstdc++6_7.2.0-18ubuntu2_i386.deb ... Unpacking libstdc++6:i386 (7.2.0-18ubuntu2) over (7.2.0-6ubuntu1) ... Setting up libstdc++6:i386 (7.2.0-18ubuntu2) ... (Reading database ... 12677 files and directories currently installed.) Preparing to unpack .../libbinutils_2.29.1-12ubuntu1_i386.deb ... Unpacking libbinutils:i386 (2.29.1-12ubuntu1) over (2.29.1-1ubuntu1) ... Preparing to unpack .../binutils_2.29.1-12ubuntu1_i386.deb ... Unpacking binutils (2.29.1-12ubuntu1) over (2.29.1-1ubuntu1) ... Preparing to unpack .../binutils-common_2.29.1-12ubuntu1_i386.deb ... Unpacking binutils-common:i386 (2.29.1-12ubuntu1) over (2.29.1-1ubuntu1) ... Preparing to unpack .../binutils-i686-linux-gnu_2.29.1-12ubuntu1_i386.deb ... Unpacking binutils-i686-linux-gnu (2.29.1-12ubuntu1) over (2.29.1-1ubuntu1) ... Preparing to unpack .../libc6_2.26-0ubuntu2_i386.deb ... Unpacking libc6:i386 (2.26-0ubuntu2) over (2.26-0ubuntu1) ... Setting up libc6:i386 (2.26-0ubuntu2) ... (Reading database ... 12677 files and directories currently installed.) Preparing to unpack .../e2fslibs_1.43.7-1_i386.deb ... Unpacking e2fslibs:i386 (1.43.7-1) over (1.43.5-1) ... Setting up e2fslibs:i386 (1.43.7-1) ... (Reading database ... 12677 files and directories currently installed.) Preparing to unpack .../e2fsprogs_1.43.7-1_i386.deb ... Unpacking e2fsprogs (1.43.7-1) over (1.43.5-1) ... Setting up e2fsprogs (1.43.7-1) ... Installing new version of config file /etc/mke2fs.conf ... (Reading database ... 12677 files and directories currently installed.) Preparing to unpack .../findutils_4.6.0+git+20170828-2_i386.deb ... Unpacking findutils (4.6.0+git+20170828-2) over (4.6.0+git+20170729-2) ... Setting up findutils (4.6.0+git+20170828-2) ... (Reading database ... 12677 files and directories currently installed.) Preparing to unpack .../perl_5.26.1-3_i386.deb ... Unpacking perl (5.26.1-3) over (5.26.0-8ubuntu1) ... Preparing to unpack .../perl-modules-5.26_5.26.1-3_all.deb ... Unpacking perl-modules-5.26 (5.26.1-3) over (5.26.0-8ubuntu1) ... Preparing to unpack .../libperl5.26_5.26.1-3_i386.deb ... Unpacking libperl5.26:i386 (5.26.1-3) over (5.26.0-8ubuntu1) ... Preparing to unpack .../perl-base_5.26.1-3_i386.deb ... Unpacking perl-base (5.26.1-3) over (5.26.0-8ubuntu1) ... Setting up perl-base (5.26.1-3) ... (Reading database ... 12677 files and directories currently installed.) Preparing to unpack .../libuuid1_2.30.2-0.1ubuntu1_i386.deb ... Unpacking libuuid1:i386 (2.30.2-0.1ubuntu1) over (2.30.1-0ubuntu4) ... Setting up libuuid1:i386 (2.30.2-0.1ubuntu1) ... (Reading database ... 12677 files and directories currently installed.) Preparing to unpack .../libblkid1_2.30.2-0.1ubuntu1_i386.deb ... Unpacking libblkid1:i386 (2.30.2-0.1ubuntu1) over (2.30.1-0ubuntu4) ... Setting up libblkid1:i386 (2.30.2-0.1ubuntu1) ... (Reading database ... 12677 files and directories currently installed.) Preparing to unpack .../libsmartcols1_2.30.2-0.1ubuntu1_i386.deb ... Unpacking libsmartcols1:i386 (2.30.2-0.1ubuntu1) over (2.30.1-0ubuntu4) ... Setting up libsmartcols1:i386 (2.30.2-0.1ubuntu1) ... (Reading database ... 12677 files and directories currently installed.) Preparing to unpack .../libfdisk1_2.30.2-0.1ubuntu1_i386.deb ... Unpacking libfdisk1:i386 (2.30.2-0.1ubuntu1) over (2.30.1-0ubuntu4) ... Setting up libfdisk1:i386 (2.30.2-0.1ubuntu1) ... (Reading database ... 12677 files and directories currently installed.) Preparing to unpack .../libpcre3_2%3a8.39-8_i386.deb ... Unpacking libpcre3:i386 (2:8.39-8) over (2:8.39-4) ... Setting up libpcre3:i386 (2:8.39-8) ... (Reading database ... 12677 files and directories currently installed.) Preparing to unpack .../libselinux1_2.7-2_i386.deb ... Unpacking libselinux1:i386 (2.7-2) over (2.7-1) ... Setting up libselinux1:i386 (2.7-2) ... (Reading database ... 12677 files and directories currently installed.) Preparing to unpack .../libmount1_2.30.2-0.1ubuntu1_i386.deb ... Unpacking libmount1:i386 (2.30.2-0.1ubuntu1) over (2.30.1-0ubuntu4) ... Setting up libmount1:i386 (2.30.2-0.1ubuntu1) ... (Reading database ... 12677 files and directories currently installed.) Preparing to unpack .../fdisk_2.30.2-0.1ubuntu1_i386.deb ... Unpacking fdisk (2.30.2-0.1ubuntu1) over (2.30.1-0ubuntu4) ... Setting up fdisk (2.30.2-0.1ubuntu1) ... (Reading database ... 12677 files and directories currently installed.) Preparing to unpack .../util-linux_2.30.2-0.1ubuntu1_i386.deb ... Unpacking util-linux (2.30.2-0.1ubuntu1) over (2.30.1-0ubuntu4) ... Setting up util-linux (2.30.2-0.1ubuntu1) ... (Reading database ... 12678 files and directories currently installed.) Preparing to unpack .../base-passwd_3.5.44_i386.deb ... Unpacking base-passwd (3.5.44) over (3.5.43) ... Setting up base-passwd (3.5.44) ... (Reading database ... 12678 files and directories currently installed.) Preparing to unpack .../libc-bin_2.26-0ubuntu2_i386.deb ... Unpacking libc-bin (2.26-0ubuntu2) over (2.26-0ubuntu1) ... Setting up libc-bin (2.26-0ubuntu2) ... (Reading database ... 12678 files and directories currently installed.) Preparing to unpack .../sysvinit-utils_2.88dsf-59.10ubuntu1_i386.deb ... Unpacking sysvinit-utils (2.88dsf-59.10ubuntu1) over (2.88dsf-59.8git1) ... Setting up sysvinit-utils (2.88dsf-59.10ubuntu1) ... (Reading database ... 12678 files and directories currently installed.) Preparing to unpack .../libudev1_235-3ubuntu2_i386.deb ... Unpacking libudev1:i386 (235-3ubuntu2) over (234-2ubuntu10) ... Setting up libudev1:i386 (235-3ubuntu2) ... (Reading database ... 12678 files and directories currently installed.) Preparing to unpack .../libapt-pkg5.0_1.6~alpha5_i386.deb ... Unpacking libapt-pkg5.0:i386 (1.6~alpha5) over (1.5~rc4) ... Setting up libapt-pkg5.0:i386 (1.6~alpha5) ... (Reading database ... 12678 files and directories currently installed.) Preparing to unpack .../debconf_1.5.65_all.deb ... Unpacking debconf (1.5.65) over (1.5.63) ... Setting up debconf (1.5.65) ... (Reading database ... 12672 files and directories currently installed.) Preparing to unpack .../adduser_3.116ubuntu1_all.deb ... Unpacking adduser (3.116ubuntu1) over (3.113+nmu3ubuntu5) ... Setting up adduser (3.116ubuntu1) ... (Reading database ... 12670 files and directories currently installed.) Preparing to unpack .../libgpg-error0_1.27-5_i386.deb ... Unpacking libgpg-error0:i386 (1.27-5) over (1.27-3) ... Setting up libgpg-error0:i386 (1.27-5) ... (Reading database ... 12670 files and directories currently installed.) Preparing to unpack .../libgcrypt20_1.8.1-4_i386.deb ... Unpacking libgcrypt20:i386 (1.8.1-4) over (1.7.8-2ubuntu1) ... Setting up libgcrypt20:i386 (1.8.1-4) ... (Reading database ... 12670 files and directories currently installed.) Preparing to unpack .../gpgv_2.1.15-1ubuntu8_i386.deb ... Unpacking gpgv (2.1.15-1ubuntu8) over (2.1.15-1ubuntu7) ... Setting up gpgv (2.1.15-1ubuntu8) ... (Reading database ... 12670 files and directories currently installed.) Preparing to unpack .../libseccomp2_2.3.1-2.1ubuntu3_i386.deb ... Unpacking libseccomp2:i386 (2.3.1-2.1ubuntu3) over (2.3.1-2.1ubuntu2) ... Setting up libseccomp2:i386 (2.3.1-2.1ubuntu3) ... (Reading database ... 12670 files and directories currently installed.) Preparing to unpack .../apt_1.6~alpha5_i386.deb ... Unpacking apt (1.6~alpha5) over (1.5~rc4) ... Setting up apt (1.6~alpha5) ... (Reading database ... 12666 files and directories currently installed.) Preparing to unpack .../libapparmor1_2.11.0-2ubuntu18_i386.deb ... Unpacking libapparmor1:i386 (2.11.0-2ubuntu18) over (2.11.0-2ubuntu17) ... Preparing to unpack .../libcap2_1%3a2.25-1.2_i386.deb ... Unpacking libcap2:i386 (1:2.25-1.2) over (1:2.25-1) ... Preparing to unpack .../libidn11_1.33-2.1_i386.deb ... Unpacking libidn11:i386 (1.33-2.1) over (1.33-2) ... Setting up libidn11:i386 (1.33-2.1) ... (Reading database ... 12666 files and directories currently installed.) Preparing to unpack .../libip4tc0_1.6.1-2ubuntu2_i386.deb ... Unpacking libip4tc0:i386 (1.6.1-2ubuntu2) over (1.6.1-2ubuntu1) ... Preparing to unpack .../mount_2.30.2-0.1ubuntu1_i386.deb ... Unpacking mount (2.30.2-0.1ubuntu1) over (2.30.1-0ubuntu4) ... Preparing to unpack .../systemd_235-3ubuntu2_i386.deb ... Unpacking systemd (235-3ubuntu2) over (234-2ubuntu10) ... Preparing to unpack .../libsystemd0_235-3ubuntu2_i386.deb ... Unpacking libsystemd0:i386 (235-3ubuntu2) over (234-2ubuntu10) ... Setting up libsystemd0:i386 (235-3ubuntu2) ... Setting up libapparmor1:i386 (2.11.0-2ubuntu18) ... Setting up libcap2:i386 (1:2.25-1.2) ... Setting up libip4tc0:i386 (1.6.1-2ubuntu2) ... Setting up mount (2.30.2-0.1ubuntu1) ... Setting up systemd (235-3ubuntu2) ... Installing new version of config file /etc/systemd/journald.conf ... Installing new version of config file /etc/systemd/system.conf ... Removing empty /etc/rc.local Removed /etc/systemd/system/network-online.target.wants/systemd-networkd-wait-online.service. Removing user `systemd-bus-proxy' ... Warning: group `systemd-bus-proxy' has no more members. Done. (Reading database ... 12672 files and directories currently installed.) Preparing to unpack .../systemd-sysv_235-3ubuntu2_i386.deb ... Unpacking systemd-sysv (235-3ubuntu2) over (234-2ubuntu10) ... Preparing to unpack .../libcap-ng0_0.7.7-3.1_i386.deb ... Unpacking libcap-ng0:i386 (0.7.7-3.1) over (0.7.7-3build1) ... Setting up libcap-ng0:i386 (0.7.7-3.1) ... (Reading database ... 12672 files and directories currently installed.) Preparing to unpack .../libcomerr2_1.43.7-1_i386.deb ... Unpacking libcomerr2:i386 (1.43.7-1) over (1.43.5-1) ... Setting up libcomerr2:i386 (1.43.7-1) ... (Reading database ... 12672 files and directories currently installed.) Preparing to unpack .../libsemanage-common_2.7-2_all.deb ... Unpacking libsemanage-common (2.7-2) over (2.7-1) ... Setting up libsemanage-common (2.7-2) ... (Reading database ... 12672 files and directories currently installed.) Preparing to unpack .../libsemanage1_2.7-2_i386.deb ... Unpacking libsemanage1:i386 (2.7-2) over (2.7-1) ... Setting up libsemanage1:i386 (2.7-2) ... (Reading database ... 12672 files and directories currently installed.) Preparing to unpack .../libss2_1.43.7-1_i386.deb ... Unpacking libss2:i386 (1.43.7-1) over (1.43.5-1) ... Setting up libss2:i386 (1.43.7-1) ... (Reading database ... 12672 files and directories currently installed.) Preparing to unpack .../libnettle6_3.3-2_i386.deb ... Unpacking libnettle6:i386 (3.3-2) over (3.3-1) ... Setting up libnettle6:i386 (3.3-2) ... (Reading database ... 12672 files and directories currently installed.) Preparing to unpack .../libhogweed4_3.3-2_i386.deb ... Unpacking libhogweed4:i386 (3.3-2) over (3.3-1) ... Setting up libhogweed4:i386 (3.3-2) ... (Reading database ... 12672 files and directories currently installed.) Preparing to unpack .../libp11-kit0_0.23.9-2_i386.deb ... Unpacking libp11-kit0:i386 (0.23.9-2) over (0.23.7-3) ... Setting up libp11-kit0:i386 (0.23.9-2) ... (Reading database ... 12672 files and directories currently installed.) Preparing to unpack .../libtasn1-6_4.12-3_i386.deb ... Unpacking libtasn1-6:i386 (4.12-3) over (4.12-2.1) ... Setting up libtasn1-6:i386 (4.12-3) ... (Reading database ... 12672 files and directories currently installed.) Preparing to unpack .../00-lsb-base_9.20170808ubuntu1_all.deb ... Unpacking lsb-base (9.20170808ubuntu1) over (9.20160110ubuntu5) ... Preparing to unpack .../01-sensible-utils_0.0.11_all.deb ... Unpacking sensible-utils (0.0.11) over (0.0.10) ... Preparing to unpack .../02-libassuan0_2.5.1-1_i386.deb ... Unpacking libassuan0:i386 (2.5.1-1) over (2.4.3-3) ... Preparing to unpack .../03-pinentry-curses_1.0.0-3_i386.deb ... Unpacking pinentry-curses (1.0.0-3) over (1.0.0-2) ... Preparing to unpack .../04-libnpth0_1.5-3_i386.deb ... Unpacking libnpth0:i386 (1.5-3) over (1.5-2) ... Preparing to unpack .../05-gnupg_2.1.15-1ubuntu8_i386.deb ... Unpacking gnupg (2.1.15-1ubuntu8) over (2.1.15-1ubuntu7) ... Preparing to unpack .../06-gnupg-agent_2.1.15-1ubuntu8_i386.deb ... Unpacking gnupg-agent (2.1.15-1ubuntu8) over (2.1.15-1ubuntu7) ... Preparing to unpack .../07-libsqlite3-0_3.21.0-1_i386.deb ... Unpacking libsqlite3-0:i386 (3.21.0-1) over (3.19.3-3) ... Preparing to unpack .../08-libroken18-heimdal_7.5.0+dfsg-1_i386.deb ... Unpacking libroken18-heimdal:i386 (7.5.0+dfsg-1) over (7.4.0.dfsg.1-2) ... Preparing to unpack .../09-libasn1-8-heimdal_7.5.0+dfsg-1_i386.deb ... Unpacking libasn1-8-heimdal:i386 (7.5.0+dfsg-1) over (7.4.0.dfsg.1-2) ... Preparing to unpack .../10-libheimbase1-heimdal_7.5.0+dfsg-1_i386.deb ... Unpacking libheimbase1-heimdal:i386 (7.5.0+dfsg-1) over (7.4.0.dfsg.1-2) ... Preparing to unpack .../11-libhcrypto4-heimdal_7.5.0+dfsg-1_i386.deb ... Unpacking libhcrypto4-heimdal:i386 (7.5.0+dfsg-1) over (7.4.0.dfsg.1-2) ... Preparing to unpack .../12-libwind0-heimdal_7.5.0+dfsg-1_i386.deb ... Unpacking libwind0-heimdal:i386 (7.5.0+dfsg-1) over (7.4.0.dfsg.1-2) ... Preparing to unpack .../13-libhx509-5-heimdal_7.5.0+dfsg-1_i386.deb ... Unpacking libhx509-5-heimdal:i386 (7.5.0+dfsg-1) over (7.4.0.dfsg.1-2) ... Preparing to unpack .../14-libkrb5-26-heimdal_7.5.0+dfsg-1_i386.deb ... Unpacking libkrb5-26-heimdal:i386 (7.5.0+dfsg-1) over (7.4.0.dfsg.1-2) ... Preparing to unpack .../15-libheimntlm0-heimdal_7.5.0+dfsg-1_i386.deb ... Unpacking libheimntlm0-heimdal:i386 (7.5.0+dfsg-1) over (7.4.0.dfsg.1-2) ... Preparing to unpack .../16-libgssapi3-heimdal_7.5.0+dfsg-1_i386.deb ... Unpacking libgssapi3-heimdal:i386 (7.5.0+dfsg-1) over (7.4.0.dfsg.1-2) ... Preparing to unpack .../17-libssl1.0.0_1.0.2g-1ubuntu14_i386.deb ... Unpacking libssl1.0.0:i386 (1.0.2g-1ubuntu14) over (1.0.2g-1ubuntu13) ... Preparing to unpack .../18-multiarch-support_2.26-0ubuntu2_i386.deb ... Unpacking multiarch-support (2.26-0ubuntu2) over (2.26-0ubuntu1) ... Preparing to unpack .../19-openssl_1.0.2g-1ubuntu14_i386.deb ... Unpacking openssl (1.0.2g-1ubuntu14) over (1.0.2g-1ubuntu13) ... Preparing to unpack .../20-tzdata_2017c-1_all.deb ... Unpacking tzdata (2017c-1) over (2017b-2) ... Preparing to unpack .../21-libidn2-0_2.0.4-1_i386.deb ... Unpacking libidn2-0:i386 (2.0.4-1) over (2.0.2-5) ... Preparing to unpack .../22-libkeyutils1_1.5.9-9.2ubuntu1_i386.deb ... Unpacking libkeyutils1:i386 (1.5.9-9.2ubuntu1) over (1.5.9-9ubuntu1) ... Preparing to unpack .../23-libpng16-16_1.6.34-1_i386.deb ... Unpacking libpng16-16:i386 (1.6.34-1) over (1.6.32-2) ... Preparing to unpack .../24-apt-transport-https_1.6~alpha5_all.deb ... Unpacking apt-transport-https (1.6~alpha5) over (1.5~rc4) ... Preparing to unpack .../25-dpkg-dev_1.19.0.4ubuntu1_all.deb ... Unpacking dpkg-dev (1.19.0.4ubuntu1) over (1.18.24ubuntu1) ... Preparing to unpack .../26-libdpkg-perl_1.19.0.4ubuntu1_all.deb ... Unpacking libdpkg-perl (1.19.0.4ubuntu1) over (1.18.24ubuntu1) ... Preparing to unpack .../27-build-essential_12.4ubuntu1_i386.deb ... Unpacking build-essential (12.4ubuntu1) over (12.1ubuntu2) ... Selecting previously unselected package libnghttp2-14:i386. Preparing to unpack .../28-libnghttp2-14_1.28.0-1_i386.deb ... Unpacking libnghttp2-14:i386 (1.28.0-1) ... Preparing to unpack .../29-libpsl5_0.19.1-4_i386.deb ... Unpacking libpsl5:i386 (0.19.1-4) over (0.18.0-2) ... Preparing to unpack .../30-libcurl3-gnutls_7.57.0-1ubuntu1_i386.deb ... Unpacking libcurl3-gnutls:i386 (7.57.0-1ubuntu1) over (7.55.1-1ubuntu1) ... Preparing to unpack .../31-liblockfile-bin_1.14-1.1_i386.deb ... Unpacking liblockfile-bin (1.14-1.1) over (1.14-1) ... Preparing to unpack .../32-liblockfile1_1.14-1.1_i386.deb ... Unpacking liblockfile1:i386 (1.14-1.1) over (1.14-1) ... Preparing to unpack .../33-optipng_0.7.6-1.1_i386.deb ... Unpacking optipng (0.7.6-1.1) over (0.7.6-1build1) ... Setting up libquadmath0:i386 (7.2.0-18ubuntu2) ... Setting up libnpth0:i386 (1.5-3) ... Setting up libgomp1:i386 (7.2.0-18ubuntu2) ... Setting up libatomic1:i386 (7.2.0-18ubuntu2) ... Setting up liblockfile-bin (1.14-1.1) ... Setting up libcc1-0:i386 (7.2.0-18ubuntu2) ... Setting up apt-transport-https (1.6~alpha5) ... Setting up libidn2-0:i386 (2.0.4-1) ... Setting up libssl1.0.0:i386 (1.0.2g-1ubuntu14) ... Setting up libnghttp2-14:i386 (1.28.0-1) ... Setting up libasan4:i386 (7.2.0-18ubuntu2) ... Setting up libpng16-16:i386 (1.6.34-1) ... Setting up libcilkrts5:i386 (7.2.0-18ubuntu2) ... Setting up libpsl5:i386 (0.19.1-4) ... Setting up multiarch-support (2.26-0ubuntu2) ... Setting up tzdata (2017c-1) ... Current default time zone: 'Etc/UTC' Local time is now: Sat Dec 23 21:23:53 UTC 2017. Universal Time is now: Sat Dec 23 21:23:53 UTC 2017. Run 'dpkg-reconfigure tzdata' if you wish to change it. Setting up systemd-sysv (235-3ubuntu2) ... Setting up libubsan0:i386 (7.2.0-18ubuntu2) ... Setting up liblockfile1:i386 (1.14-1.1) ... Setting up linux-libc-dev:i386 (4.13.0-17.20) ... Setting up libroken18-heimdal:i386 (7.5.0+dfsg-1) ... Setting up perl-modules-5.26 (5.26.1-3) ... Setting up optipng (0.7.6-1.1) ... Setting up cpp-7 (7.2.0-18ubuntu2) ... Setting up lsb-base (9.20170808ubuntu1) ... Setting up binutils-common:i386 (2.29.1-12ubuntu1) ... Setting up libmpx2:i386 (7.2.0-18ubuntu2) ... Setting up sensible-utils (0.0.11) ... Processing triggers for libc-bin (2.26-0ubuntu2) ... Setting up libperl5.26:i386 (5.26.1-3) ... Setting up libheimbase1-heimdal:i386 (7.5.0+dfsg-1) ... Setting up openssl (1.0.2g-1ubuntu14) ... Setting up libsqlite3-0:i386 (3.21.0-1) ... Setting up libc-dev-bin (2.26-0ubuntu2) ... Setting up libkeyutils1:i386 (1.5.9-9.2ubuntu1) ... Setting up libc6-dev:i386 (2.26-0ubuntu2) ... Setting up libassuan0:i386 (2.5.1-1) ... Setting up libitm1:i386 (7.2.0-18ubuntu2) ... Setting up libwind0-heimdal:i386 (7.5.0+dfsg-1) ... Setting up libbinutils:i386 (2.29.1-12ubuntu1) ... Setting up libcurl3-gnutls:i386 (7.57.0-1ubuntu1) ... Setting up libasn1-8-heimdal:i386 (7.5.0+dfsg-1) ... Setting up libhcrypto4-heimdal:i386 (7.5.0+dfsg-1) ... Setting up libhx509-5-heimdal:i386 (7.5.0+dfsg-1) ... Setting up libgcc-7-dev:i386 (7.2.0-18ubuntu2) ... Setting up libstdc++-7-dev:i386 (7.2.0-18ubuntu2) ... Setting up perl (5.26.1-3) ... Setting up binutils-i686-linux-gnu (2.29.1-12ubuntu1) ... Setting up pinentry-curses (1.0.0-3) ... Setting up binutils (2.29.1-12ubuntu1) ... Setting up libkrb5-26-heimdal:i386 (7.5.0+dfsg-1) ... Setting up gnupg-agent (2.1.15-1ubuntu8) ... Setting up libheimntlm0-heimdal:i386 (7.5.0+dfsg-1) ... Setting up gcc-7 (7.2.0-18ubuntu2) ... Setting up g++-7 (7.2.0-18ubuntu2) ... Setting up gnupg (2.1.15-1ubuntu8) ... Setting up libdpkg-perl (1.19.0.4ubuntu1) ... Setting up dpkg-dev (1.19.0.4ubuntu1) ... Setting up libgssapi3-heimdal:i386 (7.5.0+dfsg-1) ... Setting up build-essential (12.4ubuntu1) ... Processing triggers for libc-bin (2.26-0ubuntu2) ... RUN: /usr/share/launchpad-buildd/slavebin/sbuild-package PACKAGEBUILD-13891773 i386 bionic -c chroot:build-PACKAGEBUILD-13891773 --arch=i386 --dist=bionic --nolog cafeobj_1.5.5-1.dsc Initiating build PACKAGEBUILD-13891773 with 4 jobs across 4 processor cores. Kernel reported to sbuild: 4.4.0-101-generic #124-Ubuntu SMP Fri Nov 10 18:29:59 UTC 2017 i686 sbuild (Debian sbuild) 0.67.0 (26 Dec 2015) on lgw01-amd64-015.buildd +==============================================================================+ | cafeobj 1.5.5-1 (i386) 23 Dec 2017 21:23 | +==============================================================================+ Package: cafeobj Version: 1.5.5-1 Source Version: 1.5.5-1 Distribution: bionic Machine Architecture: amd64 Host Architecture: i386 Build Architecture: i386 I: NOTICE: Log filtering will replace 'build/cafeobj-0btygl/cafeobj-1.5.5' with '<>' I: NOTICE: Log filtering will replace 'build/cafeobj-0btygl' with '<>' I: NOTICE: Log filtering will replace 'home/buildd/build-PACKAGEBUILD-13891773/chroot-autobuild' with '<>' +------------------------------------------------------------------------------+ | Fetch source files | +------------------------------------------------------------------------------+ Local sources ------------- cafeobj_1.5.5-1.dsc exists in .; copying to chroot Check architectures ------------------- Check dependencies ------------------ Merged Build-Depends: build-essential, fakeroot Filtered Build-Depends: build-essential, fakeroot dpkg-deb: building package 'sbuild-build-depends-core-dummy' in '/<>/resolver-0YytUX/apt_archive/sbuild-build-depends-core-dummy.deb'. Ign:1 copy:/<>/resolver-0YytUX/apt_archive ./ InRelease Get:2 copy:/<>/resolver-0YytUX/apt_archive ./ Release [2119 B] Ign:3 copy:/<>/resolver-0YytUX/apt_archive ./ Release.gpg Get:4 copy:/<>/resolver-0YytUX/apt_archive ./ Sources [214 B] Get:5 copy:/<>/resolver-0YytUX/apt_archive ./ Packages [525 B] Fetched 2858 B in 0s (213 kB/s) Reading package lists... Reading package lists... +------------------------------------------------------------------------------+ | Install core build dependencies (apt-based resolver) | +------------------------------------------------------------------------------+ Installing build dependencies Reading package lists... Building dependency tree... Reading state information... The following packages were automatically installed and are no longer required: libasn1-8-heimdal libcurl3-gnutls libgssapi-krb5-2 libgssapi3-heimdal libhcrypto4-heimdal libheimbase1-heimdal libheimntlm0-heimdal libhx509-5-heimdal libidn2-0 libk5crypto3 libkeyutils1 libkrb5-26-heimdal libkrb5-3 libkrb5support0 libldap-2.4-2 libldap-common libnghttp2-14 libpsl5 libroken18-heimdal librtmp1 libsasl2-2 libsasl2-modules-db libunistring0 libustr-1.0-1 libwind0-heimdal Use 'apt autoremove' to remove them. The following NEW packages will be installed: sbuild-build-depends-core-dummy 0 upgraded, 1 newly installed, 0 to remove and 0 not upgraded. Need to get 852 B of archives. After this operation, 0 B of additional disk space will be used. Get:1 copy:/<>/resolver-0YytUX/apt_archive ./ sbuild-build-depends-core-dummy 0.invalid.0 [852 B] debconf: delaying package configuration, since apt-utils is not installed Fetched 852 B in 0s (0 B/s) Selecting previously unselected package sbuild-build-depends-core-dummy. (Reading database ... 12676 files and directories currently installed.) Preparing to unpack .../sbuild-build-depends-core-dummy_0.invalid.0_i386.deb ... Unpacking sbuild-build-depends-core-dummy (0.invalid.0) ... Setting up sbuild-build-depends-core-dummy (0.invalid.0) ... Merged Build-Depends: debhelper (>= 8.1.0~), sbcl, fonts-mplus, fonts-freefont-otf, texlive-latex-recommended, texlive-fonts-recommended, texlive-latex-extra, texlive-bibtex-extra, texlive-xetex, lmodern, pandoc, pandoc-citeproc, texlive-generic-extra, imagemagick, fonts-motoya-l-maruberi, texlive-extra-utils, ghostscript Filtered Build-Depends: debhelper (>= 8.1.0~), sbcl, fonts-mplus, fonts-freefont-otf, texlive-latex-recommended, texlive-fonts-recommended, texlive-latex-extra, texlive-bibtex-extra, texlive-xetex, lmodern, pandoc, pandoc-citeproc, texlive-generic-extra, imagemagick, fonts-motoya-l-maruberi, texlive-extra-utils, ghostscript dpkg-deb: building package 'sbuild-build-depends-cafeobj-dummy' in '/<>/resolver-x_3OiO/apt_archive/sbuild-build-depends-cafeobj-dummy.deb'. Ign:1 copy:/<>/resolver-x_3OiO/apt_archive ./ InRelease Get:2 copy:/<>/resolver-x_3OiO/apt_archive ./ Release [2119 B] Ign:3 copy:/<>/resolver-x_3OiO/apt_archive ./ Release.gpg Get:4 copy:/<>/resolver-x_3OiO/apt_archive ./ Sources [335 B] Get:5 copy:/<>/resolver-x_3OiO/apt_archive ./ Packages [661 B] Fetched 3115 B in 0s (220 kB/s) Reading package lists... Reading package lists... +------------------------------------------------------------------------------+ | Install cafeobj build dependencies (apt-based resolver) | +------------------------------------------------------------------------------+ Installing build dependencies Reading package lists... Building dependency tree... Reading state information... The following packages were automatically installed and are no longer required: libasn1-8-heimdal libcurl3-gnutls libgssapi3-heimdal libhcrypto4-heimdal libheimbase1-heimdal libheimntlm0-heimdal libhx509-5-heimdal libidn2-0 libkrb5-26-heimdal libldap-2.4-2 libldap-common libnghttp2-14 libpsl5 libroken18-heimdal librtmp1 libsasl2-2 libsasl2-modules-db libustr-1.0-1 libwind0-heimdal Use 'apt autoremove' to remove them. The following additional packages will be installed: autoconf automake autopoint autotools-dev bsdmainutils debhelper dh-autoreconf dh-strip-nondeterminism file fontconfig-config fonts-dejavu-core fonts-freefont-otf fonts-lmodern fonts-motoya-l-maruberi fonts-mplus gettext gettext-base ghostscript groff-base hicolor-icon-theme imagemagick imagemagick-6-common imagemagick-6.q16 intltool-debian libarchive-zip-perl libavahi-client3 libavahi-common-data libavahi-common3 libbibutils2 libbsd0 libcairo2 libcroco3 libcups2 libcupsimage2 libdatrie1 libdbus-1-3 libexpat1 libfftw3-double3 libfile-stripnondeterminism-perl libfontconfig1 libfreetype6 libghc-pandoc-citeproc-data libglib2.0-0 libgraphite2-3 libgs9 libgs9-common libharfbuzz-icu0 libharfbuzz0b libice6 libicu-le-hb0 libicu60 libijs-0.35 libjbig0 libjbig2dec0 libjpeg-turbo8 libjpeg8 libkpathsea6 liblcms2-2 liblqr-1-0 libltdl7 liblua5.1-0 libluajit-5.1-2 libluajit-5.1-common libmagic-mgc libmagic1 libmagickcore-6.q16-3 libmagickwand-6.q16-3 libmime-charset-perl libnspr4 libnss3 libpaper-utils libpaper1 libpipeline1 libpixman-1-0 libpoppler68 libpotrace0 libptexenc1 libpython-stdlib libpython2.7-minimal libpython2.7-stdlib libsigsegv2 libsm6 libsombok3 libsynctex1 libtexlua52 libtexluajit2 libthai-data libthai0 libtiff5 libtimedate-perl libtool libunicode-linebreak-perl libx11-6 libx11-data libxau6 libxaw7 libxcb-render0 libxcb-shm0 libxcb1 libxdmcp6 libxext6 libxi6 libxml2 libxmu6 libxpm4 libxrender1 libxt6 libyaml-0-2 libzzip-0-13 lmodern m4 man-db mime-support pandoc pandoc-citeproc pandoc-data po-debconf poppler-data preview-latex-style python python-minimal python2.7 python2.7-minimal sbcl t1utils tex-common texlive-base texlive-bibtex-extra texlive-binaries texlive-extra-utils texlive-fonts-recommended texlive-generic-extra texlive-latex-base texlive-latex-extra texlive-latex-recommended texlive-pictures texlive-plain-generic texlive-xetex tipa ucf x11-common xdg-utils Suggested packages: autoconf-archive gnu-standards autoconf-doc wamerican | wordlist whois vacation dh-make dwz gettext-doc libasprintf-dev libgettextpo-dev ghostscript-x groff imagemagick-doc autotrace cups-bsd | lpr | lprng curl enscript ffmpeg gimp gnuplot grads graphviz hp2xx html2ps libwmf-bin mplayer povray radiance sane-utils transfig ufraw-batch cups-common libfftw3-bin libfftw3-dev liblcms2-utils libmagickcore-6.q16-3-extra libencode-hanextra-perl libpod2-base-perl libtool-doc gfortran | fortran95-compiler gcj-jdk m4-doc less www-browser apparmor texlive-luatex context wkhtmltopdf libmail-box-perl poppler-utils fonts-japanese-mincho | fonts-ipafont-mincho fonts-japanese-gothic | fonts-ipafont-gothic fonts-arphic-ukai fonts-arphic-uming fonts-nanum python-doc python-tk python2.7-doc binfmt-support sbcl-doc sbcl-source slime perl-tk xpdf-reader | pdf-viewer chktex dvidvi dvipng fragmaster lacheck latexdiff latexmk purifyeps xindy python-pygments icc-profiles libfile-which-perl libspreadsheet-parseexcel-perl texlive-pstricks dot2tex prerex ruby-tcltk | libtcltk-ruby libglib2.0-bin Recommended packages: curl | wget | lynx gsfonts libmagickcore-6.q16-3-extra netpbm libcupsfilters1 dbus libarchive-cpio-perl libglib2.0-data shared-mime-info xdg-user-dirs fonts-droid-fallback libltdl-dev libmail-sendmail-perl binfmt-support ruby wish libfile-homedir-perl libyaml-tiny-perl ruby | ruby-interpreter tex-gyre texlive-fonts-recommended-doc texlive-latex-base-doc texlive-latex-extra-doc texlive-latex-recommended-doc texlive-pictures-doc tk libfile-mimeinfo-perl libnet-dbus-perl libx11-protocol-perl x11-utils x11-xserver-utils The following packages will be REMOVED: pkg-create-dbgsym* The following NEW packages will be installed: autoconf automake autopoint autotools-dev bsdmainutils debhelper dh-autoreconf dh-strip-nondeterminism file fontconfig-config fonts-dejavu-core fonts-freefont-otf fonts-lmodern fonts-motoya-l-maruberi fonts-mplus gettext gettext-base ghostscript groff-base hicolor-icon-theme imagemagick imagemagick-6-common imagemagick-6.q16 intltool-debian libarchive-zip-perl libavahi-client3 libavahi-common-data libavahi-common3 libbibutils2 libbsd0 libcairo2 libcroco3 libcups2 libcupsimage2 libdatrie1 libdbus-1-3 libexpat1 libfftw3-double3 libfile-stripnondeterminism-perl libfontconfig1 libfreetype6 libghc-pandoc-citeproc-data libglib2.0-0 libgraphite2-3 libgs9 libgs9-common libharfbuzz-icu0 libharfbuzz0b libice6 libicu-le-hb0 libicu60 libijs-0.35 libjbig0 libjbig2dec0 libjpeg-turbo8 libjpeg8 libkpathsea6 liblcms2-2 liblqr-1-0 libltdl7 liblua5.1-0 libluajit-5.1-2 libluajit-5.1-common libmagic-mgc libmagic1 libmagickcore-6.q16-3 libmagickwand-6.q16-3 libmime-charset-perl libnspr4 libnss3 libpaper-utils libpaper1 libpipeline1 libpixman-1-0 libpoppler68 libpotrace0 libptexenc1 libpython-stdlib libpython2.7-minimal libpython2.7-stdlib libsigsegv2 libsm6 libsombok3 libsynctex1 libtexlua52 libtexluajit2 libthai-data libthai0 libtiff5 libtimedate-perl libtool libunicode-linebreak-perl libx11-6 libx11-data libxau6 libxaw7 libxcb-render0 libxcb-shm0 libxcb1 libxdmcp6 libxext6 libxi6 libxml2 libxmu6 libxpm4 libxrender1 libxt6 libyaml-0-2 libzzip-0-13 lmodern m4 man-db mime-support pandoc pandoc-citeproc pandoc-data po-debconf poppler-data preview-latex-style python python-minimal python2.7 python2.7-minimal sbcl sbuild-build-depends-cafeobj-dummy t1utils tex-common texlive-base texlive-bibtex-extra texlive-binaries texlive-extra-utils texlive-fonts-recommended texlive-generic-extra texlive-latex-base texlive-latex-extra texlive-latex-recommended texlive-pictures texlive-plain-generic texlive-xetex tipa ucf x11-common xdg-utils 0 upgraded, 143 newly installed, 1 to remove and 0 not upgraded. Need to get 285 MB of archives. After this operation, 821 MB of additional disk space will be used. Get:1 copy:/<>/resolver-x_3OiO/apt_archive ./ sbuild-build-depends-cafeobj-dummy 0.invalid.0 [988 B] Get:2 http://ftpmaster.internal/ubuntu bionic/main i386 libxau6 i386 1:1.0.8-1 [8352 B] Get:3 http://ftpmaster.internal/ubuntu bionic/main i386 libbsd0 i386 0.8.6-3 [44.9 kB] Get:4 http://ftpmaster.internal/ubuntu bionic/main i386 libxdmcp6 i386 1:1.1.2-3 [11.1 kB] Get:5 http://ftpmaster.internal/ubuntu bionic/main i386 libxcb1 i386 1.12-1ubuntu1 [49.6 kB] Get:6 http://ftpmaster.internal/ubuntu bionic/main i386 libx11-data all 2:1.6.4-3 [114 kB] Get:7 http://ftpmaster.internal/ubuntu bionic/main i386 libx11-6 i386 2:1.6.4-3 [594 kB] Get:8 http://ftpmaster.internal/ubuntu bionic/main i386 libxext6 i386 2:1.3.3-1 [31.6 kB] Get:9 http://ftpmaster.internal/ubuntu bionic/main i386 groff-base i386 1.22.3-9 [1163 kB] Get:10 http://ftpmaster.internal/ubuntu bionic/main i386 bsdmainutils i386 9.0.14ubuntu1 [181 kB] Get:11 http://ftpmaster.internal/ubuntu bionic/main i386 libpipeline1 i386 1.5.0-1 [27.2 kB] Get:12 http://ftpmaster.internal/ubuntu bionic/main i386 man-db i386 2.7.6.1-4 [907 kB] Get:13 http://ftpmaster.internal/ubuntu bionic/universe i386 fonts-motoya-l-maruberi all 1.01-4 [1458 kB] Get:14 http://ftpmaster.internal/ubuntu bionic/main i386 libjpeg-turbo8 i386 1.5.2-0ubuntu5 [118 kB] Get:15 http://ftpmaster.internal/ubuntu bionic/main i386 libglib2.0-0 i386 2.54.1-1ubuntu1 [1231 kB] Get:16 http://ftpmaster.internal/ubuntu bionic/main i386 liblqr-1-0 i386 0.4.2-2 [22.9 kB] Get:17 http://ftpmaster.internal/ubuntu bionic/main i386 libfftw3-double3 i386 3.3.7-1 [625 kB] Get:18 http://ftpmaster.internal/ubuntu bionic/main i386 libexpat1 i386 2.2.5-3 [78.1 kB] Get:19 http://ftpmaster.internal/ubuntu bionic/main i386 libfreetype6 i386 2.8-0.2ubuntu2 [349 kB] Get:20 http://ftpmaster.internal/ubuntu bionic/main i386 ucf all 3.0036 [52.9 kB] Get:21 http://ftpmaster.internal/ubuntu bionic/main i386 fonts-dejavu-core all 2.37-1 [1041 kB] Get:22 http://ftpmaster.internal/ubuntu bionic/main i386 fontconfig-config all 2.12.6-0ubuntu1 [55.5 kB] Get:23 http://ftpmaster.internal/ubuntu bionic/main i386 libfontconfig1 i386 2.12.6-0ubuntu1 [146 kB] Get:24 http://ftpmaster.internal/ubuntu bionic/main i386 libjbig0 i386 2.1-3.1 [27.0 kB] Get:25 http://ftpmaster.internal/ubuntu bionic/main i386 libjpeg8 i386 8c-2ubuntu8 [2188 B] Get:26 http://ftpmaster.internal/ubuntu bionic/main i386 liblcms2-2 i386 2.9-1 [150 kB] Get:27 http://ftpmaster.internal/ubuntu bionic/main i386 libltdl7 i386 2.4.6-2 [40.5 kB] Get:28 http://ftpmaster.internal/ubuntu bionic/main i386 libtiff5 i386 4.0.9-2 [164 kB] Get:29 http://ftpmaster.internal/ubuntu bionic/main i386 libgraphite2-3 i386 1.3.10-8 [80.8 kB] Get:30 http://ftpmaster.internal/ubuntu bionic/main i386 libharfbuzz0b i386 1.7.2-1 [240 kB] Get:31 http://ftpmaster.internal/ubuntu bionic/main i386 libicu-le-hb0 i386 1.0.3+git161113-4 [15.6 kB] Get:32 http://ftpmaster.internal/ubuntu bionic/main i386 libicu60 i386 60.2-1ubuntu1 [8207 kB] Get:33 http://ftpmaster.internal/ubuntu bionic/main i386 libxml2 i386 2.9.4+dfsg1-5.2ubuntu1 [703 kB] Get:34 http://ftpmaster.internal/ubuntu bionic/main i386 imagemagick-6-common all 8:6.9.7.4+dfsg-16ubuntu5 [62.3 kB] Get:35 http://ftpmaster.internal/ubuntu bionic/main i386 libmagickcore-6.q16-3 i386 8:6.9.7.4+dfsg-16ubuntu5 [1662 kB] Get:36 http://ftpmaster.internal/ubuntu bionic/main i386 libmagickwand-6.q16-3 i386 8:6.9.7.4+dfsg-16ubuntu5 [282 kB] Get:37 http://ftpmaster.internal/ubuntu bionic/main i386 x11-common all 1:7.7+19ubuntu3 [22.0 kB] Get:38 http://ftpmaster.internal/ubuntu bionic/main i386 libice6 i386 2:1.0.9-2 [42.6 kB] Get:39 http://ftpmaster.internal/ubuntu bionic/main i386 libsm6 i386 2:1.2.2-1 [14.8 kB] Get:40 http://ftpmaster.internal/ubuntu bionic/main i386 poppler-data all 0.4.8-2 [1479 kB] Get:41 http://ftpmaster.internal/ubuntu bionic/main i386 libpython2.7-minimal i386 2.7.14-4 [337 kB] Get:42 http://ftpmaster.internal/ubuntu bionic/main i386 python2.7-minimal i386 2.7.14-4 [1322 kB] Get:43 http://ftpmaster.internal/ubuntu bionic/main i386 python-minimal i386 2.7.14-2ubuntu1 [28.1 kB] Get:44 http://ftpmaster.internal/ubuntu bionic/main i386 mime-support all 3.60ubuntu1 [30.1 kB] Get:45 http://ftpmaster.internal/ubuntu bionic/main i386 libpython2.7-stdlib i386 2.7.14-4 [1931 kB] Get:46 http://ftpmaster.internal/ubuntu bionic/main i386 python2.7 i386 2.7.14-4 [233 kB] Get:47 http://ftpmaster.internal/ubuntu bionic/main i386 libpython-stdlib i386 2.7.14-2ubuntu1 [7576 B] Get:48 http://ftpmaster.internal/ubuntu bionic/main i386 python i386 2.7.14-2ubuntu1 [140 kB] Get:49 http://ftpmaster.internal/ubuntu bionic/main i386 tex-common all 6.09 [33.0 kB] Get:50 http://ftpmaster.internal/ubuntu bionic/main i386 libmagic-mgc i386 1:5.32-1 [184 kB] Get:51 http://ftpmaster.internal/ubuntu bionic/main i386 libmagic1 i386 1:5.32-1 [75.0 kB] Get:52 http://ftpmaster.internal/ubuntu bionic/main i386 file i386 1:5.32-1 [21.9 kB] Get:53 http://ftpmaster.internal/ubuntu bionic/main i386 libdbus-1-3 i386 1.12.2-1ubuntu1 [188 kB] Get:54 http://ftpmaster.internal/ubuntu bionic/main i386 libyaml-0-2 i386 0.1.7-2ubuntu3 [49.3 kB] Get:55 http://ftpmaster.internal/ubuntu bionic/main i386 gettext-base i386 0.19.8.1-4ubuntu2 [50.9 kB] Get:56 http://ftpmaster.internal/ubuntu bionic/main i386 libsigsegv2 i386 2.11-1 [13.5 kB] Get:57 http://ftpmaster.internal/ubuntu bionic/main i386 m4 i386 1.4.18-1 [196 kB] Get:58 http://ftpmaster.internal/ubuntu bionic/main i386 autoconf all 2.69-11 [322 kB] Get:59 http://ftpmaster.internal/ubuntu bionic/main i386 autotools-dev all 20171216.1 [39.7 kB] Get:60 http://ftpmaster.internal/ubuntu bionic/main i386 automake all 1:1.15.1-3ubuntu1 [509 kB] Get:61 http://ftpmaster.internal/ubuntu bionic/main i386 autopoint all 0.19.8.1-4ubuntu2 [412 kB] Get:62 http://ftpmaster.internal/ubuntu bionic/main i386 libtool all 2.4.6-2 [194 kB] Get:63 http://ftpmaster.internal/ubuntu bionic/main i386 dh-autoreconf all 15 [15.8 kB] Get:64 http://ftpmaster.internal/ubuntu bionic/main i386 libarchive-zip-perl all 1.60-1 [83.9 kB] Get:65 http://ftpmaster.internal/ubuntu bionic/main i386 libfile-stripnondeterminism-perl all 0.040-1 [13.9 kB] Get:66 http://ftpmaster.internal/ubuntu bionic/main i386 libtimedate-perl all 2.3000-2 [37.5 kB] Get:67 http://ftpmaster.internal/ubuntu bionic/main i386 dh-strip-nondeterminism all 0.040-1 [5196 B] Get:68 http://ftpmaster.internal/ubuntu bionic/main i386 libcroco3 i386 0.6.12-2 [87.7 kB] Get:69 http://ftpmaster.internal/ubuntu bionic/main i386 gettext i386 0.19.8.1-4ubuntu2 [1095 kB] Get:70 http://ftpmaster.internal/ubuntu bionic/main i386 intltool-debian all 0.35.0+20060710.4 [24.9 kB] Get:71 http://ftpmaster.internal/ubuntu bionic/main i386 po-debconf all 1.0.20 [232 kB] Get:72 http://ftpmaster.internal/ubuntu bionic/main i386 debhelper all 11ubuntu1 [887 kB] Get:73 http://ftpmaster.internal/ubuntu bionic/universe i386 fonts-freefont-otf all 20120503-6 [3053 kB] Get:74 http://ftpmaster.internal/ubuntu bionic/main i386 fonts-lmodern all 2.004.5-3 [4551 kB] Get:75 http://ftpmaster.internal/ubuntu bionic/universe i386 fonts-mplus all 063-1 [26.9 MB] Get:76 http://ftpmaster.internal/ubuntu bionic/main i386 libavahi-common-data i386 0.6.32-1ubuntu1 [22.0 kB] Get:77 http://ftpmaster.internal/ubuntu bionic/main i386 libavahi-common3 i386 0.6.32-1ubuntu1 [23.5 kB] Get:78 http://ftpmaster.internal/ubuntu bionic/main i386 libavahi-client3 i386 0.6.32-1ubuntu1 [27.1 kB] Get:79 http://ftpmaster.internal/ubuntu bionic/main i386 libcups2 i386 2.2.6-3 [225 kB] Get:80 http://ftpmaster.internal/ubuntu bionic/main i386 libcupsimage2 i386 2.2.6-3 [19.4 kB] Get:81 http://ftpmaster.internal/ubuntu bionic/main i386 libijs-0.35 i386 0.35-12 [16.0 kB] Get:82 http://ftpmaster.internal/ubuntu bionic/main i386 libjbig2dec0 i386 0.13-5 [58.7 kB] Get:83 http://ftpmaster.internal/ubuntu bionic/main i386 libpaper1 i386 1.1.24+nmu5ubuntu1 [13.7 kB] Get:84 http://ftpmaster.internal/ubuntu bionic/main i386 libgs9-common all 9.21~dfsg+1-0ubuntu3 [5121 kB] Get:85 http://ftpmaster.internal/ubuntu bionic/main i386 libgs9 i386 9.21~dfsg+1-0ubuntu3 [2281 kB] Get:86 http://ftpmaster.internal/ubuntu bionic/main i386 ghostscript i386 9.21~dfsg+1-0ubuntu3 [49.8 kB] Get:87 http://ftpmaster.internal/ubuntu bionic/main i386 hicolor-icon-theme all 0.17-1 [10.3 kB] Get:88 http://ftpmaster.internal/ubuntu bionic/main i386 imagemagick-6.q16 i386 8:6.9.7.4+dfsg-16ubuntu5 [424 kB] Get:89 http://ftpmaster.internal/ubuntu bionic/main i386 imagemagick i386 8:6.9.7.4+dfsg-16ubuntu5 [14.2 kB] Get:90 http://ftpmaster.internal/ubuntu bionic/universe i386 libbibutils2 i386 4.12-5 [319 kB] Get:91 http://ftpmaster.internal/ubuntu bionic/main i386 libpixman-1-0 i386 0.34.0-2 [235 kB] Get:92 http://ftpmaster.internal/ubuntu bionic/main i386 libxcb-render0 i386 1.12-1ubuntu1 [15.9 kB] Get:93 http://ftpmaster.internal/ubuntu bionic/main i386 libxcb-shm0 i386 1.12-1ubuntu1 [5624 B] Get:94 http://ftpmaster.internal/ubuntu bionic/main i386 libxrender1 i386 1:0.9.10-1 [19.9 kB] Get:95 http://ftpmaster.internal/ubuntu bionic/main i386 libcairo2 i386 1.15.8-3 [629 kB] Get:96 http://ftpmaster.internal/ubuntu bionic/main i386 libdatrie1 i386 0.2.10-5 [19.2 kB] Get:97 http://ftpmaster.internal/ubuntu bionic/main i386 libharfbuzz-icu0 i386 1.7.2-1 [5884 B] Get:98 http://ftpmaster.internal/ubuntu bionic/main i386 libkpathsea6 i386 2017.20170613.44572-6ubuntu1 [59.0 kB] Get:99 http://ftpmaster.internal/ubuntu bionic/universe i386 liblua5.1-0 i386 5.1.5-8.1build1 [115 kB] Get:100 http://ftpmaster.internal/ubuntu bionic/universe i386 libluajit-5.1-common all 2.1.0~beta3+dfsg-5.1 [44.3 kB] Get:101 http://ftpmaster.internal/ubuntu bionic/universe i386 libluajit-5.1-2 i386 2.1.0~beta3+dfsg-5.1 [238 kB] Get:102 http://ftpmaster.internal/ubuntu bionic/universe i386 libmime-charset-perl all 1.012-2 [30.8 kB] Get:103 http://ftpmaster.internal/ubuntu bionic/main i386 libnspr4 i386 2:4.16-1ubuntu2 [121 kB] Get:104 http://ftpmaster.internal/ubuntu bionic/main i386 libnss3 i386 2:3.32-1ubuntu3 [1210 kB] Get:105 http://ftpmaster.internal/ubuntu bionic/main i386 libpaper-utils i386 1.1.24+nmu5ubuntu1 [8248 B] Get:106 http://ftpmaster.internal/ubuntu bionic/main i386 libpoppler68 i386 0.57.0-2ubuntu5 [816 kB] Get:107 http://ftpmaster.internal/ubuntu bionic/main i386 libpotrace0 i386 1.14-2 [16.7 kB] Get:108 http://ftpmaster.internal/ubuntu bionic/main i386 libptexenc1 i386 2017.20170613.44572-6ubuntu1 [35.2 kB] Get:109 http://ftpmaster.internal/ubuntu bionic/main i386 libthai-data all 0.1.27-1 [133 kB] Get:110 http://ftpmaster.internal/ubuntu bionic/main i386 libthai0 i386 0.1.27-1 [19.0 kB] Get:111 http://ftpmaster.internal/ubuntu bionic/universe i386 libsombok3 i386 2.4.0-1 [28.9 kB] Get:112 http://ftpmaster.internal/ubuntu bionic/main i386 libsynctex1 i386 2017.20170613.44572-6ubuntu1 [43.5 kB] Get:113 http://ftpmaster.internal/ubuntu bionic/main i386 libtexlua52 i386 2017.20170613.44572-6ubuntu1 [99.5 kB] Get:114 http://ftpmaster.internal/ubuntu bionic/main i386 libtexluajit2 i386 2017.20170613.44572-6ubuntu1 [246 kB] Get:115 http://ftpmaster.internal/ubuntu bionic/universe i386 libunicode-linebreak-perl i386 0.0.20160702-1build2 [101 kB] Get:116 http://ftpmaster.internal/ubuntu bionic/main i386 libxt6 i386 1:1.1.5-1 [164 kB] Get:117 http://ftpmaster.internal/ubuntu bionic/main i386 libxmu6 i386 2:1.1.2-2 [48.4 kB] Get:118 http://ftpmaster.internal/ubuntu bionic/main i386 libxpm4 i386 1:3.5.12-1 [35.8 kB] Get:119 http://ftpmaster.internal/ubuntu bionic/main i386 libxaw7 i386 2:1.0.13-1 [182 kB] Get:120 http://ftpmaster.internal/ubuntu bionic/main i386 libxi6 i386 2:1.7.9-1 [31.7 kB] Get:121 http://ftpmaster.internal/ubuntu bionic/main i386 libzzip-0-13 i386 0.13.62-3.1 [27.6 kB] Get:122 http://ftpmaster.internal/ubuntu bionic/main i386 lmodern all 2.004.5-3 [9631 kB] Get:123 http://ftpmaster.internal/ubuntu bionic/universe i386 pandoc-data all 1.19.2.4~dfsg-1build3 [40.1 kB] Get:124 http://ftpmaster.internal/ubuntu bionic/universe i386 pandoc i386 1.19.2.4~dfsg-1build3 [6754 kB] Get:125 http://ftpmaster.internal/ubuntu bionic/main i386 preview-latex-style all 11.91-1ubuntu1 [185 kB] Get:126 http://ftpmaster.internal/ubuntu bionic/universe i386 sbcl i386 2:1.4.1-1 [8327 kB] Get:127 http://ftpmaster.internal/ubuntu bionic/main i386 t1utils i386 1.41-2 [56.5 kB] Get:128 http://ftpmaster.internal/ubuntu bionic/main i386 texlive-binaries i386 2017.20170613.44572-6ubuntu1 [8025 kB] Get:129 http://ftpmaster.internal/ubuntu bionic/main i386 xdg-utils all 1.1.1-1ubuntu3 [59.4 kB] Get:130 http://ftpmaster.internal/ubuntu bionic/main i386 texlive-base all 2017.20171128-1 [18.6 MB] Get:131 http://ftpmaster.internal/ubuntu bionic/main i386 texlive-latex-base all 2017.20171128-1 [948 kB] Get:132 http://ftpmaster.internal/ubuntu bionic/universe i386 texlive-bibtex-extra all 2017.20171128-1 [55.5 MB] Get:133 http://ftpmaster.internal/ubuntu bionic/universe i386 texlive-extra-utils all 2017.20171128-1 [20.9 MB] Get:134 http://ftpmaster.internal/ubuntu bionic/universe i386 texlive-fonts-recommended all 2017.20171128-1 [5263 kB] Get:135 http://ftpmaster.internal/ubuntu bionic/universe i386 texlive-plain-generic all 2017.20171128-1 [23.6 MB] Get:136 http://ftpmaster.internal/ubuntu bionic/universe i386 texlive-generic-extra all 2017.20171128-1 [15.9 kB] Get:137 http://ftpmaster.internal/ubuntu bionic/main i386 texlive-latex-recommended all 2017.20171128-1 [14.9 MB] Get:138 http://ftpmaster.internal/ubuntu bionic/universe i386 texlive-pictures all 2017.20171128-1 [3997 kB] Get:139 http://ftpmaster.internal/ubuntu bionic/universe i386 texlive-latex-extra all 2017.20171128-1 [10.5 MB] Get:140 http://ftpmaster.internal/ubuntu bionic/universe i386 tipa all 2:1.3-20 [2978 kB] Get:141 http://ftpmaster.internal/ubuntu bionic/universe i386 texlive-xetex all 2017.20171128-1 [10.6 MB] Get:142 http://ftpmaster.internal/ubuntu bionic/universe i386 libghc-pandoc-citeproc-data all 0.10.5.1-1build3 [49.8 kB] Get:143 http://ftpmaster.internal/ubuntu bionic/universe i386 pandoc-citeproc i386 0.10.5.1-1build3 [5569 kB] debconf: delaying package configuration, since apt-utils is not installed Fetched 285 MB in 15s (18.9 MB/s) (Reading database ... 12676 files and directories currently installed.) Removing pkg-create-dbgsym (0.73) ... Selecting previously unselected package libxau6:i386. (Reading database ... 12667 files and directories currently installed.) Preparing to unpack .../00-libxau6_1%3a1.0.8-1_i386.deb ... Unpacking libxau6:i386 (1:1.0.8-1) ... Selecting previously unselected package libbsd0:i386. Preparing to unpack .../01-libbsd0_0.8.6-3_i386.deb ... Unpacking libbsd0:i386 (0.8.6-3) ... Selecting previously unselected package libxdmcp6:i386. Preparing to unpack .../02-libxdmcp6_1%3a1.1.2-3_i386.deb ... Unpacking libxdmcp6:i386 (1:1.1.2-3) ... Selecting previously unselected package libxcb1:i386. Preparing to unpack .../03-libxcb1_1.12-1ubuntu1_i386.deb ... Unpacking libxcb1:i386 (1.12-1ubuntu1) ... Selecting previously unselected package libx11-data. Preparing to unpack .../04-libx11-data_2%3a1.6.4-3_all.deb ... Unpacking libx11-data (2:1.6.4-3) ... Selecting previously unselected package libx11-6:i386. Preparing to unpack .../05-libx11-6_2%3a1.6.4-3_i386.deb ... Unpacking libx11-6:i386 (2:1.6.4-3) ... Selecting previously unselected package libxext6:i386. Preparing to unpack .../06-libxext6_2%3a1.3.3-1_i386.deb ... Unpacking libxext6:i386 (2:1.3.3-1) ... Selecting previously unselected package groff-base. Preparing to unpack .../07-groff-base_1.22.3-9_i386.deb ... Unpacking groff-base (1.22.3-9) ... Selecting previously unselected package bsdmainutils. Preparing to unpack .../08-bsdmainutils_9.0.14ubuntu1_i386.deb ... Unpacking bsdmainutils (9.0.14ubuntu1) ... Selecting previously unselected package libpipeline1:i386. Preparing to unpack .../09-libpipeline1_1.5.0-1_i386.deb ... Unpacking libpipeline1:i386 (1.5.0-1) ... Selecting previously unselected package man-db. Preparing to unpack .../10-man-db_2.7.6.1-4_i386.deb ... Unpacking man-db (2.7.6.1-4) ... Selecting previously unselected package fonts-motoya-l-maruberi. Preparing to unpack .../11-fonts-motoya-l-maruberi_1.01-4_all.deb ... Unpacking fonts-motoya-l-maruberi (1.01-4) ... Selecting previously unselected package libjpeg-turbo8:i386. Preparing to unpack .../12-libjpeg-turbo8_1.5.2-0ubuntu5_i386.deb ... Unpacking libjpeg-turbo8:i386 (1.5.2-0ubuntu5) ... Selecting previously unselected package libglib2.0-0:i386. Preparing to unpack .../13-libglib2.0-0_2.54.1-1ubuntu1_i386.deb ... Unpacking libglib2.0-0:i386 (2.54.1-1ubuntu1) ... Selecting previously unselected package liblqr-1-0:i386. Preparing to unpack .../14-liblqr-1-0_0.4.2-2_i386.deb ... Unpacking liblqr-1-0:i386 (0.4.2-2) ... Selecting previously unselected package libfftw3-double3:i386. Preparing to unpack .../15-libfftw3-double3_3.3.7-1_i386.deb ... Unpacking libfftw3-double3:i386 (3.3.7-1) ... Selecting previously unselected package libexpat1:i386. Preparing to unpack .../16-libexpat1_2.2.5-3_i386.deb ... Unpacking libexpat1:i386 (2.2.5-3) ... Selecting previously unselected package libfreetype6:i386. Preparing to unpack .../17-libfreetype6_2.8-0.2ubuntu2_i386.deb ... Unpacking libfreetype6:i386 (2.8-0.2ubuntu2) ... Selecting previously unselected package ucf. Preparing to unpack .../18-ucf_3.0036_all.deb ... Moving old data out of the way Unpacking ucf (3.0036) ... Selecting previously unselected package fonts-dejavu-core. Preparing to unpack .../19-fonts-dejavu-core_2.37-1_all.deb ... Unpacking fonts-dejavu-core (2.37-1) ... Selecting previously unselected package fontconfig-config. Preparing to unpack .../20-fontconfig-config_2.12.6-0ubuntu1_all.deb ... Unpacking fontconfig-config (2.12.6-0ubuntu1) ... Selecting previously unselected package libfontconfig1:i386. Preparing to unpack .../21-libfontconfig1_2.12.6-0ubuntu1_i386.deb ... Unpacking libfontconfig1:i386 (2.12.6-0ubuntu1) ... Selecting previously unselected package libjbig0:i386. Preparing to unpack .../22-libjbig0_2.1-3.1_i386.deb ... Unpacking libjbig0:i386 (2.1-3.1) ... Selecting previously unselected package libjpeg8:i386. Preparing to unpack .../23-libjpeg8_8c-2ubuntu8_i386.deb ... Unpacking libjpeg8:i386 (8c-2ubuntu8) ... Selecting previously unselected package liblcms2-2:i386. Preparing to unpack .../24-liblcms2-2_2.9-1_i386.deb ... Unpacking liblcms2-2:i386 (2.9-1) ... Selecting previously unselected package libltdl7:i386. Preparing to unpack .../25-libltdl7_2.4.6-2_i386.deb ... Unpacking libltdl7:i386 (2.4.6-2) ... Selecting previously unselected package libtiff5:i386. Preparing to unpack .../26-libtiff5_4.0.9-2_i386.deb ... Unpacking libtiff5:i386 (4.0.9-2) ... Selecting previously unselected package libgraphite2-3:i386. Preparing to unpack .../27-libgraphite2-3_1.3.10-8_i386.deb ... Unpacking libgraphite2-3:i386 (1.3.10-8) ... Selecting previously unselected package libharfbuzz0b:i386. Preparing to unpack .../28-libharfbuzz0b_1.7.2-1_i386.deb ... Unpacking libharfbuzz0b:i386 (1.7.2-1) ... Selecting previously unselected package libicu-le-hb0:i386. Preparing to unpack .../29-libicu-le-hb0_1.0.3+git161113-4_i386.deb ... Unpacking libicu-le-hb0:i386 (1.0.3+git161113-4) ... Selecting previously unselected package libicu60:i386. Preparing to unpack .../30-libicu60_60.2-1ubuntu1_i386.deb ... Unpacking libicu60:i386 (60.2-1ubuntu1) ... Selecting previously unselected package libxml2:i386. Preparing to unpack .../31-libxml2_2.9.4+dfsg1-5.2ubuntu1_i386.deb ... Unpacking libxml2:i386 (2.9.4+dfsg1-5.2ubuntu1) ... Selecting previously unselected package imagemagick-6-common. Preparing to unpack .../32-imagemagick-6-common_8%3a6.9.7.4+dfsg-16ubuntu5_all.deb ... Unpacking imagemagick-6-common (8:6.9.7.4+dfsg-16ubuntu5) ... Selecting previously unselected package libmagickcore-6.q16-3:i386. Preparing to unpack .../33-libmagickcore-6.q16-3_8%3a6.9.7.4+dfsg-16ubuntu5_i386.deb ... Unpacking libmagickcore-6.q16-3:i386 (8:6.9.7.4+dfsg-16ubuntu5) ... Selecting previously unselected package libmagickwand-6.q16-3:i386. Preparing to unpack .../34-libmagickwand-6.q16-3_8%3a6.9.7.4+dfsg-16ubuntu5_i386.deb ... Unpacking libmagickwand-6.q16-3:i386 (8:6.9.7.4+dfsg-16ubuntu5) ... Selecting previously unselected package x11-common. Preparing to unpack .../35-x11-common_1%3a7.7+19ubuntu3_all.deb ... Unpacking x11-common (1:7.7+19ubuntu3) ... Selecting previously unselected package libice6:i386. Preparing to unpack .../36-libice6_2%3a1.0.9-2_i386.deb ... Unpacking libice6:i386 (2:1.0.9-2) ... Selecting previously unselected package libsm6:i386. Preparing to unpack .../37-libsm6_2%3a1.2.2-1_i386.deb ... Unpacking libsm6:i386 (2:1.2.2-1) ... Selecting previously unselected package poppler-data. Preparing to unpack .../38-poppler-data_0.4.8-2_all.deb ... Unpacking poppler-data (0.4.8-2) ... Selecting previously unselected package libpython2.7-minimal:i386. Preparing to unpack .../39-libpython2.7-minimal_2.7.14-4_i386.deb ... Unpacking libpython2.7-minimal:i386 (2.7.14-4) ... Selecting previously unselected package python2.7-minimal. Preparing to unpack .../40-python2.7-minimal_2.7.14-4_i386.deb ... Unpacking python2.7-minimal (2.7.14-4) ... Selecting previously unselected package python-minimal. Preparing to unpack .../41-python-minimal_2.7.14-2ubuntu1_i386.deb ... Unpacking python-minimal (2.7.14-2ubuntu1) ... Selecting previously unselected package mime-support. Preparing to unpack .../42-mime-support_3.60ubuntu1_all.deb ... Unpacking mime-support (3.60ubuntu1) ... Selecting previously unselected package libpython2.7-stdlib:i386. Preparing to unpack .../43-libpython2.7-stdlib_2.7.14-4_i386.deb ... Unpacking libpython2.7-stdlib:i386 (2.7.14-4) ... Selecting previously unselected package python2.7. Preparing to unpack .../44-python2.7_2.7.14-4_i386.deb ... Unpacking python2.7 (2.7.14-4) ... Selecting previously unselected package libpython-stdlib:i386. Preparing to unpack .../45-libpython-stdlib_2.7.14-2ubuntu1_i386.deb ... Unpacking libpython-stdlib:i386 (2.7.14-2ubuntu1) ... Setting up libpython2.7-minimal:i386 (2.7.14-4) ... Setting up python2.7-minimal (2.7.14-4) ... Setting up python-minimal (2.7.14-2ubuntu1) ... Selecting previously unselected package python. (Reading database ... 15355 files and directories currently installed.) Preparing to unpack .../00-python_2.7.14-2ubuntu1_i386.deb ... Unpacking python (2.7.14-2ubuntu1) ... Selecting previously unselected package tex-common. Preparing to unpack .../01-tex-common_6.09_all.deb ... Unpacking tex-common (6.09) ... Selecting previously unselected package libmagic-mgc. Preparing to unpack .../02-libmagic-mgc_1%3a5.32-1_i386.deb ... Unpacking libmagic-mgc (1:5.32-1) ... Selecting previously unselected package libmagic1:i386. Preparing to unpack .../03-libmagic1_1%3a5.32-1_i386.deb ... Unpacking libmagic1:i386 (1:5.32-1) ... Selecting previously unselected package file. Preparing to unpack .../04-file_1%3a5.32-1_i386.deb ... Unpacking file (1:5.32-1) ... Selecting previously unselected package libdbus-1-3:i386. Preparing to unpack .../05-libdbus-1-3_1.12.2-1ubuntu1_i386.deb ... Unpacking libdbus-1-3:i386 (1.12.2-1ubuntu1) ... Selecting previously unselected package libyaml-0-2:i386. Preparing to unpack .../06-libyaml-0-2_0.1.7-2ubuntu3_i386.deb ... Unpacking libyaml-0-2:i386 (0.1.7-2ubuntu3) ... Selecting previously unselected package gettext-base. Preparing to unpack .../07-gettext-base_0.19.8.1-4ubuntu2_i386.deb ... Unpacking gettext-base (0.19.8.1-4ubuntu2) ... Selecting previously unselected package libsigsegv2:i386. Preparing to unpack .../08-libsigsegv2_2.11-1_i386.deb ... Unpacking libsigsegv2:i386 (2.11-1) ... Selecting previously unselected package m4. Preparing to unpack .../09-m4_1.4.18-1_i386.deb ... Unpacking m4 (1.4.18-1) ... Selecting previously unselected package autoconf. Preparing to unpack .../10-autoconf_2.69-11_all.deb ... Unpacking autoconf (2.69-11) ... Selecting previously unselected package autotools-dev. Preparing to unpack .../11-autotools-dev_20171216.1_all.deb ... Unpacking autotools-dev (20171216.1) ... Selecting previously unselected package automake. Preparing to unpack .../12-automake_1%3a1.15.1-3ubuntu1_all.deb ... Unpacking automake (1:1.15.1-3ubuntu1) ... Selecting previously unselected package autopoint. Preparing to unpack .../13-autopoint_0.19.8.1-4ubuntu2_all.deb ... Unpacking autopoint (0.19.8.1-4ubuntu2) ... Selecting previously unselected package libtool. Preparing to unpack .../14-libtool_2.4.6-2_all.deb ... Unpacking libtool (2.4.6-2) ... Selecting previously unselected package dh-autoreconf. Preparing to unpack .../15-dh-autoreconf_15_all.deb ... Unpacking dh-autoreconf (15) ... Selecting previously unselected package libarchive-zip-perl. Preparing to unpack .../16-libarchive-zip-perl_1.60-1_all.deb ... Unpacking libarchive-zip-perl (1.60-1) ... Selecting previously unselected package libfile-stripnondeterminism-perl. Preparing to unpack .../17-libfile-stripnondeterminism-perl_0.040-1_all.deb ... Unpacking libfile-stripnondeterminism-perl (0.040-1) ... Selecting previously unselected package libtimedate-perl. Preparing to unpack .../18-libtimedate-perl_2.3000-2_all.deb ... Unpacking libtimedate-perl (2.3000-2) ... Selecting previously unselected package dh-strip-nondeterminism. Preparing to unpack .../19-dh-strip-nondeterminism_0.040-1_all.deb ... Unpacking dh-strip-nondeterminism (0.040-1) ... Selecting previously unselected package libcroco3:i386. Preparing to unpack .../20-libcroco3_0.6.12-2_i386.deb ... Unpacking libcroco3:i386 (0.6.12-2) ... Selecting previously unselected package gettext. Preparing to unpack .../21-gettext_0.19.8.1-4ubuntu2_i386.deb ... Unpacking gettext (0.19.8.1-4ubuntu2) ... Selecting previously unselected package intltool-debian. Preparing to unpack .../22-intltool-debian_0.35.0+20060710.4_all.deb ... Unpacking intltool-debian (0.35.0+20060710.4) ... Selecting previously unselected package po-debconf. Preparing to unpack .../23-po-debconf_1.0.20_all.deb ... Unpacking po-debconf (1.0.20) ... Selecting previously unselected package debhelper. Preparing to unpack .../24-debhelper_11ubuntu1_all.deb ... Unpacking debhelper (11ubuntu1) ... Selecting previously unselected package fonts-freefont-otf. Preparing to unpack .../25-fonts-freefont-otf_20120503-6_all.deb ... Unpacking fonts-freefont-otf (20120503-6) ... Selecting previously unselected package fonts-lmodern. Preparing to unpack .../26-fonts-lmodern_2.004.5-3_all.deb ... Unpacking fonts-lmodern (2.004.5-3) ... Selecting previously unselected package fonts-mplus. Preparing to unpack .../27-fonts-mplus_063-1_all.deb ... Unpacking fonts-mplus (063-1) ... Selecting previously unselected package libavahi-common-data:i386. Preparing to unpack .../28-libavahi-common-data_0.6.32-1ubuntu1_i386.deb ... Unpacking libavahi-common-data:i386 (0.6.32-1ubuntu1) ... Selecting previously unselected package libavahi-common3:i386. Preparing to unpack .../29-libavahi-common3_0.6.32-1ubuntu1_i386.deb ... Unpacking libavahi-common3:i386 (0.6.32-1ubuntu1) ... Selecting previously unselected package libavahi-client3:i386. Preparing to unpack .../30-libavahi-client3_0.6.32-1ubuntu1_i386.deb ... Unpacking libavahi-client3:i386 (0.6.32-1ubuntu1) ... Selecting previously unselected package libcups2:i386. Preparing to unpack .../31-libcups2_2.2.6-3_i386.deb ... Unpacking libcups2:i386 (2.2.6-3) ... Selecting previously unselected package libcupsimage2:i386. Preparing to unpack .../32-libcupsimage2_2.2.6-3_i386.deb ... Unpacking libcupsimage2:i386 (2.2.6-3) ... Selecting previously unselected package libijs-0.35:i386. Preparing to unpack .../33-libijs-0.35_0.35-12_i386.deb ... Unpacking libijs-0.35:i386 (0.35-12) ... Selecting previously unselected package libjbig2dec0:i386. Preparing to unpack .../34-libjbig2dec0_0.13-5_i386.deb ... Unpacking libjbig2dec0:i386 (0.13-5) ... Selecting previously unselected package libpaper1:i386. Preparing to unpack .../35-libpaper1_1.1.24+nmu5ubuntu1_i386.deb ... Unpacking libpaper1:i386 (1.1.24+nmu5ubuntu1) ... Selecting previously unselected package libgs9-common. Preparing to unpack .../36-libgs9-common_9.21~dfsg+1-0ubuntu3_all.deb ... Unpacking libgs9-common (9.21~dfsg+1-0ubuntu3) ... Selecting previously unselected package libgs9:i386. Preparing to unpack .../37-libgs9_9.21~dfsg+1-0ubuntu3_i386.deb ... Unpacking libgs9:i386 (9.21~dfsg+1-0ubuntu3) ... Selecting previously unselected package ghostscript. Preparing to unpack .../38-ghostscript_9.21~dfsg+1-0ubuntu3_i386.deb ... Unpacking ghostscript (9.21~dfsg+1-0ubuntu3) ... Selecting previously unselected package hicolor-icon-theme. Preparing to unpack .../39-hicolor-icon-theme_0.17-1_all.deb ... Unpacking hicolor-icon-theme (0.17-1) ... Selecting previously unselected package imagemagick-6.q16. Preparing to unpack .../40-imagemagick-6.q16_8%3a6.9.7.4+dfsg-16ubuntu5_i386.deb ... Unpacking imagemagick-6.q16 (8:6.9.7.4+dfsg-16ubuntu5) ... Selecting previously unselected package imagemagick. Preparing to unpack .../41-imagemagick_8%3a6.9.7.4+dfsg-16ubuntu5_i386.deb ... Unpacking imagemagick (8:6.9.7.4+dfsg-16ubuntu5) ... Selecting previously unselected package libbibutils2. Preparing to unpack .../42-libbibutils2_4.12-5_i386.deb ... Unpacking libbibutils2 (4.12-5) ... Selecting previously unselected package libpixman-1-0:i386. Preparing to unpack .../43-libpixman-1-0_0.34.0-2_i386.deb ... Unpacking libpixman-1-0:i386 (0.34.0-2) ... Selecting previously unselected package libxcb-render0:i386. Preparing to unpack .../44-libxcb-render0_1.12-1ubuntu1_i386.deb ... Unpacking libxcb-render0:i386 (1.12-1ubuntu1) ... Selecting previously unselected package libxcb-shm0:i386. Preparing to unpack .../45-libxcb-shm0_1.12-1ubuntu1_i386.deb ... Unpacking libxcb-shm0:i386 (1.12-1ubuntu1) ... Selecting previously unselected package libxrender1:i386. Preparing to unpack .../46-libxrender1_1%3a0.9.10-1_i386.deb ... Unpacking libxrender1:i386 (1:0.9.10-1) ... Selecting previously unselected package libcairo2:i386. Preparing to unpack .../47-libcairo2_1.15.8-3_i386.deb ... Unpacking libcairo2:i386 (1.15.8-3) ... Selecting previously unselected package libdatrie1:i386. Preparing to unpack .../48-libdatrie1_0.2.10-5_i386.deb ... Unpacking libdatrie1:i386 (0.2.10-5) ... Selecting previously unselected package libharfbuzz-icu0:i386. Preparing to unpack .../49-libharfbuzz-icu0_1.7.2-1_i386.deb ... Unpacking libharfbuzz-icu0:i386 (1.7.2-1) ... Selecting previously unselected package libkpathsea6:i386. Preparing to unpack .../50-libkpathsea6_2017.20170613.44572-6ubuntu1_i386.deb ... Unpacking libkpathsea6:i386 (2017.20170613.44572-6ubuntu1) ... Selecting previously unselected package liblua5.1-0:i386. Preparing to unpack .../51-liblua5.1-0_5.1.5-8.1build1_i386.deb ... Unpacking liblua5.1-0:i386 (5.1.5-8.1build1) ... Selecting previously unselected package libluajit-5.1-common. Preparing to unpack .../52-libluajit-5.1-common_2.1.0~beta3+dfsg-5.1_all.deb ... Unpacking libluajit-5.1-common (2.1.0~beta3+dfsg-5.1) ... Selecting previously unselected package libluajit-5.1-2:i386. Preparing to unpack .../53-libluajit-5.1-2_2.1.0~beta3+dfsg-5.1_i386.deb ... Unpacking libluajit-5.1-2:i386 (2.1.0~beta3+dfsg-5.1) ... Selecting previously unselected package libmime-charset-perl. Preparing to unpack .../54-libmime-charset-perl_1.012-2_all.deb ... Unpacking libmime-charset-perl (1.012-2) ... Selecting previously unselected package libnspr4:i386. Preparing to unpack .../55-libnspr4_2%3a4.16-1ubuntu2_i386.deb ... Unpacking libnspr4:i386 (2:4.16-1ubuntu2) ... Selecting previously unselected package libnss3:i386. Preparing to unpack .../56-libnss3_2%3a3.32-1ubuntu3_i386.deb ... Unpacking libnss3:i386 (2:3.32-1ubuntu3) ... Selecting previously unselected package libpaper-utils. Preparing to unpack .../57-libpaper-utils_1.1.24+nmu5ubuntu1_i386.deb ... Unpacking libpaper-utils (1.1.24+nmu5ubuntu1) ... Selecting previously unselected package libpoppler68:i386. Preparing to unpack .../58-libpoppler68_0.57.0-2ubuntu5_i386.deb ... Unpacking libpoppler68:i386 (0.57.0-2ubuntu5) ... Selecting previously unselected package libpotrace0. Preparing to unpack .../59-libpotrace0_1.14-2_i386.deb ... Unpacking libpotrace0 (1.14-2) ... Selecting previously unselected package libptexenc1:i386. Preparing to unpack .../60-libptexenc1_2017.20170613.44572-6ubuntu1_i386.deb ... Unpacking libptexenc1:i386 (2017.20170613.44572-6ubuntu1) ... Selecting previously unselected package libthai-data. Preparing to unpack .../61-libthai-data_0.1.27-1_all.deb ... Unpacking libthai-data (0.1.27-1) ... Selecting previously unselected package libthai0:i386. Preparing to unpack .../62-libthai0_0.1.27-1_i386.deb ... Unpacking libthai0:i386 (0.1.27-1) ... Selecting previously unselected package libsombok3:i386. Preparing to unpack .../63-libsombok3_2.4.0-1_i386.deb ... Unpacking libsombok3:i386 (2.4.0-1) ... Selecting previously unselected package libsynctex1:i386. Preparing to unpack .../64-libsynctex1_2017.20170613.44572-6ubuntu1_i386.deb ... Unpacking libsynctex1:i386 (2017.20170613.44572-6ubuntu1) ... Selecting previously unselected package libtexlua52:i386. Preparing to unpack .../65-libtexlua52_2017.20170613.44572-6ubuntu1_i386.deb ... Unpacking libtexlua52:i386 (2017.20170613.44572-6ubuntu1) ... Selecting previously unselected package libtexluajit2:i386. Preparing to unpack .../66-libtexluajit2_2017.20170613.44572-6ubuntu1_i386.deb ... Unpacking libtexluajit2:i386 (2017.20170613.44572-6ubuntu1) ... Selecting previously unselected package libunicode-linebreak-perl. Preparing to unpack .../67-libunicode-linebreak-perl_0.0.20160702-1build2_i386.deb ... Unpacking libunicode-linebreak-perl (0.0.20160702-1build2) ... Selecting previously unselected package libxt6:i386. Preparing to unpack .../68-libxt6_1%3a1.1.5-1_i386.deb ... Unpacking libxt6:i386 (1:1.1.5-1) ... Selecting previously unselected package libxmu6:i386. Preparing to unpack .../69-libxmu6_2%3a1.1.2-2_i386.deb ... Unpacking libxmu6:i386 (2:1.1.2-2) ... Selecting previously unselected package libxpm4:i386. Preparing to unpack .../70-libxpm4_1%3a3.5.12-1_i386.deb ... Unpacking libxpm4:i386 (1:3.5.12-1) ... Selecting previously unselected package libxaw7:i386. Preparing to unpack .../71-libxaw7_2%3a1.0.13-1_i386.deb ... Unpacking libxaw7:i386 (2:1.0.13-1) ... Selecting previously unselected package libxi6:i386. Preparing to unpack .../72-libxi6_2%3a1.7.9-1_i386.deb ... Unpacking libxi6:i386 (2:1.7.9-1) ... Selecting previously unselected package libzzip-0-13:i386. Preparing to unpack .../73-libzzip-0-13_0.13.62-3.1_i386.deb ... Unpacking libzzip-0-13:i386 (0.13.62-3.1) ... Selecting previously unselected package lmodern. Preparing to unpack .../74-lmodern_2.004.5-3_all.deb ... Unpacking lmodern (2.004.5-3) ... Selecting previously unselected package pandoc-data. Preparing to unpack .../75-pandoc-data_1.19.2.4~dfsg-1build3_all.deb ... Unpacking pandoc-data (1.19.2.4~dfsg-1build3) ... Selecting previously unselected package pandoc. Preparing to unpack .../76-pandoc_1.19.2.4~dfsg-1build3_i386.deb ... Unpacking pandoc (1.19.2.4~dfsg-1build3) ... Selecting previously unselected package preview-latex-style. Preparing to unpack .../77-preview-latex-style_11.91-1ubuntu1_all.deb ... Unpacking preview-latex-style (11.91-1ubuntu1) ... Selecting previously unselected package sbcl. Preparing to unpack .../78-sbcl_2%3a1.4.1-1_i386.deb ... Unpacking sbcl (2:1.4.1-1) ... Selecting previously unselected package t1utils. Preparing to unpack .../79-t1utils_1.41-2_i386.deb ... Unpacking t1utils (1.41-2) ... Selecting previously unselected package texlive-binaries. Preparing to unpack .../80-texlive-binaries_2017.20170613.44572-6ubuntu1_i386.deb ... Unpacking texlive-binaries (2017.20170613.44572-6ubuntu1) ... Selecting previously unselected package xdg-utils. Preparing to unpack .../81-xdg-utils_1.1.1-1ubuntu3_all.deb ... Unpacking xdg-utils (1.1.1-1ubuntu3) ... Selecting previously unselected package texlive-base. Preparing to unpack .../82-texlive-base_2017.20171128-1_all.deb ... Unpacking texlive-base (2017.20171128-1) ... Selecting previously unselected package texlive-latex-base. Preparing to unpack .../83-texlive-latex-base_2017.20171128-1_all.deb ... Unpacking texlive-latex-base (2017.20171128-1) ... Selecting previously unselected package texlive-bibtex-extra. Preparing to unpack .../84-texlive-bibtex-extra_2017.20171128-1_all.deb ... Unpacking texlive-bibtex-extra (2017.20171128-1) ... Selecting previously unselected package texlive-extra-utils. Preparing to unpack .../85-texlive-extra-utils_2017.20171128-1_all.deb ... Unpacking texlive-extra-utils (2017.20171128-1) ... Selecting previously unselected package texlive-fonts-recommended. Preparing to unpack .../86-texlive-fonts-recommended_2017.20171128-1_all.deb ... Unpacking texlive-fonts-recommended (2017.20171128-1) ... Selecting previously unselected package texlive-plain-generic. Preparing to unpack .../87-texlive-plain-generic_2017.20171128-1_all.deb ... Unpacking texlive-plain-generic (2017.20171128-1) ... Selecting previously unselected package texlive-generic-extra. Preparing to unpack .../88-texlive-generic-extra_2017.20171128-1_all.deb ... Unpacking texlive-generic-extra (2017.20171128-1) ... Selecting previously unselected package texlive-latex-recommended. Preparing to unpack .../89-texlive-latex-recommended_2017.20171128-1_all.deb ... Unpacking texlive-latex-recommended (2017.20171128-1) ... Selecting previously unselected package texlive-pictures. Preparing to unpack .../90-texlive-pictures_2017.20171128-1_all.deb ... Unpacking texlive-pictures (2017.20171128-1) ... Selecting previously unselected package texlive-latex-extra. Preparing to unpack .../91-texlive-latex-extra_2017.20171128-1_all.deb ... Unpacking texlive-latex-extra (2017.20171128-1) ... Selecting previously unselected package tipa. Preparing to unpack .../92-tipa_2%3a1.3-20_all.deb ... Unpacking tipa (2:1.3-20) ... Selecting previously unselected package texlive-xetex. Preparing to unpack .../93-texlive-xetex_2017.20171128-1_all.deb ... Unpacking texlive-xetex (2017.20171128-1) ... Selecting previously unselected package libghc-pandoc-citeproc-data. Preparing to unpack .../94-libghc-pandoc-citeproc-data_0.10.5.1-1build3_all.deb ... Unpacking libghc-pandoc-citeproc-data (0.10.5.1-1build3) ... Selecting previously unselected package pandoc-citeproc. Preparing to unpack .../95-pandoc-citeproc_0.10.5.1-1build3_i386.deb ... Unpacking pandoc-citeproc (0.10.5.1-1build3) ... Selecting previously unselected package sbuild-build-depends-cafeobj-dummy. Preparing to unpack .../96-sbuild-build-depends-cafeobj-dummy_0.invalid.0_i386.deb ... Unpacking sbuild-build-depends-cafeobj-dummy (0.invalid.0) ... Setting up libgs9-common (9.21~dfsg+1-0ubuntu3) ... Setting up libkpathsea6:i386 (2017.20170613.44572-6ubuntu1) ... Setting up fonts-mplus (063-1) ... Setting up libtexlua52:i386 (2017.20170613.44572-6ubuntu1) ... Setting up imagemagick-6-common (8:6.9.7.4+dfsg-16ubuntu5) ... Setting up libexpat1:i386 (2.2.5-3) ... Setting up libsynctex1:i386 (2017.20170613.44572-6ubuntu1) ... Setting up libptexenc1:i386 (2017.20170613.44572-6ubuntu1) ... Setting up libarchive-zip-perl (1.60-1) ... Setting up libbibutils2 (4.12-5) ... Setting up libluajit-5.1-common (2.1.0~beta3+dfsg-5.1) ... Setting up mime-support (3.60ubuntu1) ... Setting up libtimedate-perl (2.3000-2) ... Setting up liblcms2-2:i386 (2.9-1) ... Setting up libjbig0:i386 (2.1-3.1) ... Setting up libsigsegv2:i386 (2.11-1) ... Setting up fonts-dejavu-core (2.37-1) ... Setting up poppler-data (0.4.8-2) ... Setting up groff-base (1.22.3-9) ... Setting up libglib2.0-0:i386 (2.54.1-1ubuntu1) ... No schema files found: doing nothing. Setting up pandoc-data (1.19.2.4~dfsg-1build3) ... Setting up libghc-pandoc-citeproc-data (0.10.5.1-1build3) ... Setting up libdatrie1:i386 (0.2.10-5) ... Setting up gettext-base (0.19.8.1-4ubuntu2) ... Setting up fonts-freefont-otf (20120503-6) ... Setting up libjpeg-turbo8:i386 (1.5.2-0ubuntu5) ... Setting up libpipeline1:i386 (1.5.0-1) ... Setting up m4 (1.4.18-1) ... Setting up libfftw3-double3:i386 (3.3.7-1) ... Setting up libbsd0:i386 (0.8.6-3) ... Setting up libnspr4:i386 (2:4.16-1ubuntu2) ... Setting up ucf (3.0036) ... Setting up libfreetype6:i386 (2.8-0.2ubuntu2) ... Setting up libmagic-mgc (1:5.32-1) ... Setting up libmagic1:i386 (1:5.32-1) ... Setting up libgraphite2-3:i386 (1.3.10-8) ... Setting up liblqr-1-0:i386 (0.4.2-2) ... Setting up libjbig2dec0:i386 (0.13-5) ... Setting up libyaml-0-2:i386 (0.1.7-2ubuntu3) ... Setting up libpixman-1-0:i386 (0.34.0-2) ... Setting up libmime-charset-perl (1.012-2) ... Processing triggers for libc-bin (2.26-0ubuntu2) ... Setting up autotools-dev (20171216.1) ... Setting up t1utils (1.41-2) ... Processing triggers for systemd (235-3ubuntu2) ... Setting up libltdl7:i386 (2.4.6-2) ... Setting up fonts-motoya-l-maruberi (1.01-4) ... Setting up libluajit-5.1-2:i386 (2.1.0~beta3+dfsg-5.1) ... Setting up libijs-0.35:i386 (0.35-12) ... Setting up sbcl (2:1.4.1-1) ... Setting up libpotrace0 (1.14-2) ... Setting up liblua5.1-0:i386 (5.1.5-8.1build1) ... Setting up libthai-data (0.1.27-1) ... Setting up libxdmcp6:i386 (1:1.1.2-3) ... Setting up bsdmainutils (9.0.14ubuntu1) ... update-alternatives: using /usr/bin/bsd-write to provide /usr/bin/write (write) in auto mode update-alternatives: using /usr/bin/bsd-from to provide /usr/bin/from (from) in auto mode Setting up libzzip-0-13:i386 (0.13.62-3.1) ... Setting up x11-common (1:7.7+19ubuntu3) ... update-rc.d: warning: start and stop actions are no longer supported; falling back to defaults Running in chroot, ignoring request. invoke-rc.d: policy-rc.d denied execution of start. Setting up xdg-utils (1.1.1-1ubuntu3) ... Setting up hicolor-icon-theme (0.17-1) ... Setting up libtexluajit2:i386 (2017.20170613.44572-6ubuntu1) ... Setting up libx11-data (2:1.6.4-3) ... Setting up libpython2.7-stdlib:i386 (2.7.14-4) ... Setting up libxau6:i386 (1:1.0.8-1) ... Setting up autopoint (0.19.8.1-4ubuntu2) ... Setting up libdbus-1-3:i386 (1.12.2-1ubuntu1) ... Setting up fonts-lmodern (2.004.5-3) ... Setting up libavahi-common-data:i386 (0.6.32-1ubuntu1) ... Setting up libfile-stripnondeterminism-perl (0.040-1) ... Setting up libjpeg8:i386 (8c-2ubuntu8) ... Setting up libpaper1:i386 (1.1.24+nmu5ubuntu1) ... Creating config file /etc/papersize with new version Setting up libpaper-utils (1.1.24+nmu5ubuntu1) ... Setting up fontconfig-config (2.12.6-0ubuntu1) ... Setting up tex-common (6.09) ... update-language: texlive-base not installed and configured, doing nothing! Setting up pandoc (1.19.2.4~dfsg-1build3) ... Setting up python2.7 (2.7.14-4) ... Setting up libnss3:i386 (2:3.32-1ubuntu3) ... Setting up libharfbuzz0b:i386 (1.7.2-1) ... Setting up libtiff5:i386 (4.0.9-2) ... Setting up preview-latex-style (11.91-1ubuntu1) ... Setting up autoconf (2.69-11) ... Setting up libthai0:i386 (0.1.27-1) ... Setting up file (1:5.32-1) ... Setting up libpython-stdlib:i386 (2.7.14-2ubuntu1) ... Setting up automake (1:1.15.1-3ubuntu1) ... update-alternatives: using /usr/bin/automake-1.15 to provide /usr/bin/automake (automake) in auto mode Setting up libice6:i386 (2:1.0.9-2) ... Setting up man-db (2.7.6.1-4) ... Not building database; man-db/auto-update is not 'true'. Setting up libavahi-common3:i386 (0.6.32-1ubuntu1) ... Setting up libxcb1:i386 (1.12-1ubuntu1) ... Setting up lmodern (2.004.5-3) ... Setting up python (2.7.14-2ubuntu1) ... Setting up libsombok3:i386 (2.4.0-1) ... Setting up libtool (2.4.6-2) ... Setting up libfontconfig1:i386 (2.12.6-0ubuntu1) ... Setting up libsm6:i386 (2:1.2.2-1) ... Setting up libxcb-render0:i386 (1.12-1ubuntu1) ... Setting up libx11-6:i386 (2:1.6.4-3) ... Setting up libunicode-linebreak-perl (0.0.20160702-1build2) ... Setting up libxcb-shm0:i386 (1.12-1ubuntu1) ... Setting up libxpm4:i386 (1:3.5.12-1) ... Setting up libxt6:i386 (1:1.1.5-1) ... Setting up libxrender1:i386 (1:0.9.10-1) ... Setting up libavahi-client3:i386 (0.6.32-1ubuntu1) ... Setting up libpoppler68:i386 (0.57.0-2ubuntu5) ... Setting up libcups2:i386 (2.2.6-3) ... Setting up libxext6:i386 (2:1.3.3-1) ... Setting up libxmu6:i386 (2:1.1.2-2) ... Setting up libcupsimage2:i386 (2.2.6-3) ... Setting up libgs9:i386 (9.21~dfsg+1-0ubuntu3) ... Setting up libxi6:i386 (2:1.7.9-1) ... Setting up libxaw7:i386 (2:1.0.13-1) ... Setting up libcairo2:i386 (1.15.8-3) ... Setting up ghostscript (9.21~dfsg+1-0ubuntu3) ... Setting up dh-autoreconf (15) ... Setting up libicu-le-hb0:i386 (1.0.3+git161113-4) ... Setting up dh-strip-nondeterminism (0.040-1) ... Setting up libicu60:i386 (60.2-1ubuntu1) ... Setting up libharfbuzz-icu0:i386 (1.7.2-1) ... Setting up texlive-binaries (2017.20170613.44572-6ubuntu1) ... update-alternatives: using /usr/bin/xdvi-xaw to provide /usr/bin/xdvi.bin (xdvi.bin) in auto mode update-alternatives: using /usr/bin/bibtex.original to provide /usr/bin/bibtex (bibtex) in auto mode Setting up libxml2:i386 (2.9.4+dfsg1-5.2ubuntu1) ... Setting up libcroco3:i386 (0.6.12-2) ... Setting up texlive-base (2017.20171128-1) ... tl-paper: setting paper size for dvips to a4: /var/lib/texmf/dvips/config/config-paper.ps tl-paper: setting paper size for dvipdfmx to a4: /var/lib/texmf/dvipdfmx/dvipdfmx-paper.cfg tl-paper: setting paper size for xdvi to a4: /var/lib/texmf/xdvi/XDvi-paper tl-paper: setting paper size for pdftex to a4: /var/lib/texmf/tex/generic/config/pdftexconfig.tex Setting up pandoc-citeproc (0.10.5.1-1build3) ... Setting up texlive-fonts-recommended (2017.20171128-1) ... Setting up texlive-plain-generic (2017.20171128-1) ... Setting up texlive-latex-base (2017.20171128-1) ... Setting up texlive-latex-recommended (2017.20171128-1) ... Setting up texlive-extra-utils (2017.20171128-1) ... Setting up libmagickcore-6.q16-3:i386 (8:6.9.7.4+dfsg-16ubuntu5) ... Setting up gettext (0.19.8.1-4ubuntu2) ... Setting up texlive-pictures (2017.20171128-1) ... Setting up tipa (2:1.3-20) ... Regenerating '/var/lib/texmf/fmtutil.cnf-DEBIAN'... done. Regenerating '/var/lib/texmf/fmtutil.cnf-TEXLIVEDIST'... done. update-fmtutil has updated the following file(s): /var/lib/texmf/fmtutil.cnf-DEBIAN /var/lib/texmf/fmtutil.cnf-TEXLIVEDIST If you want to activate the changes in the above file(s), you should run fmtutil-sys or fmtutil. Setting up intltool-debian (0.35.0+20060710.4) ... Setting up libmagickwand-6.q16-3:i386 (8:6.9.7.4+dfsg-16ubuntu5) ... Setting up texlive-generic-extra (2017.20171128-1) ... Setting up texlive-bibtex-extra (2017.20171128-1) ... Setting up texlive-latex-extra (2017.20171128-1) ... Setting up po-debconf (1.0.20) ... Setting up imagemagick-6.q16 (8:6.9.7.4+dfsg-16ubuntu5) ... update-alternatives: using /usr/bin/compare-im6.q16 to provide /usr/bin/compare (compare) in auto mode update-alternatives: using /usr/bin/compare-im6.q16 to provide /usr/bin/compare-im6 (compare-im6) in auto mode update-alternatives: using /usr/bin/animate-im6.q16 to provide /usr/bin/animate (animate) in auto mode update-alternatives: using /usr/bin/animate-im6.q16 to provide /usr/bin/animate-im6 (animate-im6) in auto mode update-alternatives: using /usr/bin/convert-im6.q16 to provide /usr/bin/convert (convert) in auto mode update-alternatives: using /usr/bin/convert-im6.q16 to provide /usr/bin/convert-im6 (convert-im6) in auto mode update-alternatives: using /usr/bin/composite-im6.q16 to provide /usr/bin/composite (composite) in auto mode update-alternatives: using /usr/bin/composite-im6.q16 to provide /usr/bin/composite-im6 (composite-im6) in auto mode update-alternatives: using /usr/bin/conjure-im6.q16 to provide /usr/bin/conjure (conjure) in auto mode update-alternatives: using /usr/bin/conjure-im6.q16 to provide /usr/bin/conjure-im6 (conjure-im6) in auto mode update-alternatives: using /usr/bin/import-im6.q16 to provide /usr/bin/import (import) in auto mode update-alternatives: using /usr/bin/import-im6.q16 to provide /usr/bin/import-im6 (import-im6) in auto mode update-alternatives: using /usr/bin/identify-im6.q16 to provide /usr/bin/identify (identify) in auto mode update-alternatives: using /usr/bin/identify-im6.q16 to provide /usr/bin/identify-im6 (identify-im6) in auto mode update-alternatives: using /usr/bin/stream-im6.q16 to provide /usr/bin/stream (stream) in auto mode update-alternatives: using /usr/bin/stream-im6.q16 to provide /usr/bin/stream-im6 (stream-im6) in auto mode update-alternatives: using /usr/bin/display-im6.q16 to provide /usr/bin/display (display) in auto mode update-alternatives: using /usr/bin/display-im6.q16 to provide /usr/bin/display-im6 (display-im6) in auto mode update-alternatives: using /usr/bin/montage-im6.q16 to provide /usr/bin/montage (montage) in auto mode update-alternatives: using /usr/bin/montage-im6.q16 to provide /usr/bin/montage-im6 (montage-im6) in auto mode update-alternatives: using /usr/bin/mogrify-im6.q16 to provide /usr/bin/mogrify (mogrify) in auto mode update-alternatives: using /usr/bin/mogrify-im6.q16 to provide /usr/bin/mogrify-im6 (mogrify-im6) in auto mode Setting up imagemagick (8:6.9.7.4+dfsg-16ubuntu5) ... Setting up texlive-xetex (2017.20171128-1) ... Setting up debhelper (11ubuntu1) ... Setting up sbuild-build-depends-cafeobj-dummy (0.invalid.0) ... (Reading database ... 43973 files and directories currently installed.) Purging configuration files for pkg-create-dbgsym (0.73) ... Processing triggers for tex-common (6.09) ... Running updmap-sys. This may take some time... done. Running mktexlsr /var/lib/texmf ... done. Building format(s) --all. This may take some time... done. Processing triggers for libc-bin (2.26-0ubuntu2) ... Processing triggers for systemd (235-3ubuntu2) ... +------------------------------------------------------------------------------+ | Build environment | +------------------------------------------------------------------------------+ Kernel: Linux 4.4.0-101-generic amd64 (i686) Toolchain package versions: binutils_2.29.1-12ubuntu1 dpkg-dev_1.19.0.4ubuntu1 g++-7_7.2.0-18ubuntu2 gcc-7_7.2.0-18ubuntu2 libc6-dev_2.26-0ubuntu2 libstdc++-7-dev_7.2.0-18ubuntu2 libstdc++6_7.2.0-18ubuntu2 linux-libc-dev_4.13.0-17.20 Package versions: adduser_3.116ubuntu1 advancecomp_2.0-1 apt_1.6~alpha5 apt-transport-https_1.6~alpha5 autoconf_2.69-11 automake_1:1.15.1-3ubuntu1 autopoint_0.19.8.1-4ubuntu2 autotools-dev_20171216.1 base-files_10ubuntu1 base-passwd_3.5.44 bash_4.4-5ubuntu1 binutils_2.29.1-12ubuntu1 binutils-common_2.29.1-12ubuntu1 binutils-i686-linux-gnu_2.29.1-12ubuntu1 bsdmainutils_9.0.14ubuntu1 bsdutils_1:2.30.2-0.1ubuntu1 build-essential_12.4ubuntu1 bzip2_1.0.6-8.1 ca-certificates_20170717 coreutils_8.26-3ubuntu4 cpp_4:7.2.0-1ubuntu1 cpp-7_7.2.0-18ubuntu2 dash_0.5.8-2.3ubuntu1 debconf_1.5.65 debhelper_11ubuntu1 debianutils_4.8.3 dh-autoreconf_15 dh-strip-nondeterminism_0.040-1 diffutils_1:3.6-1 dmsetup_2:1.02.137-2ubuntu3 dpkg_1.19.0.4ubuntu1 dpkg-dev_1.19.0.4ubuntu1 e2fslibs_1.43.7-1 e2fsprogs_1.43.7-1 fakeroot_1.21-1ubuntu2 fdisk_2.30.2-0.1ubuntu1 file_1:5.32-1 findutils_4.6.0+git+20170828-2 fontconfig-config_2.12.6-0ubuntu1 fonts-dejavu-core_2.37-1 fonts-freefont-otf_20120503-6 fonts-lmodern_2.004.5-3 fonts-motoya-l-maruberi_1.01-4 fonts-mplus_063-1 g++_4:7.2.0-1ubuntu1 g++-7_7.2.0-18ubuntu2 gcc_4:7.2.0-1ubuntu1 gcc-7_7.2.0-18ubuntu2 gcc-7-base_7.2.0-18ubuntu2 gettext_0.19.8.1-4ubuntu2 gettext-base_0.19.8.1-4ubuntu2 ghostscript_9.21~dfsg+1-0ubuntu3 gnupg_2.1.15-1ubuntu8 gnupg-agent_2.1.15-1ubuntu8 gpgv_2.1.15-1ubuntu8 grep_3.1-2 groff-base_1.22.3-9 gzip_1.6-5ubuntu1 hicolor-icon-theme_0.17-1 hostname_3.18 imagemagick_8:6.9.7.4+dfsg-16ubuntu5 imagemagick-6-common_8:6.9.7.4+dfsg-16ubuntu5 imagemagick-6.q16_8:6.9.7.4+dfsg-16ubuntu5 init_1.49ubuntu1 init-system-helpers_1.49ubuntu1 initscripts_2.88dsf-59.3ubuntu2 insserv_1.14.0-5ubuntu3 intltool-debian_0.35.0+20060710.4 libacl1_2.2.52-3build1 libapparmor1_2.11.0-2ubuntu18 libapt-pkg5.0_1.6~alpha5 libarchive-zip-perl_1.60-1 libasan4_7.2.0-18ubuntu2 libasn1-8-heimdal_7.5.0+dfsg-1 libassuan0_2.5.1-1 libatomic1_7.2.0-18ubuntu2 libattr1_1:2.4.47-2build1 libaudit-common_1:2.7.7-1ubuntu2 libaudit1_1:2.7.7-1ubuntu2 libavahi-client3_0.6.32-1ubuntu1 libavahi-common-data_0.6.32-1ubuntu1 libavahi-common3_0.6.32-1ubuntu1 libbibutils2_4.12-5 libbinutils_2.29.1-12ubuntu1 libblkid1_2.30.2-0.1ubuntu1 libbsd0_0.8.6-3 libbz2-1.0_1.0.6-8.1 libc-bin_2.26-0ubuntu2 libc-dev-bin_2.26-0ubuntu2 libc6_2.26-0ubuntu2 libc6-dev_2.26-0ubuntu2 libcairo2_1.15.8-3 libcap-ng0_0.7.7-3.1 libcap2_1:2.25-1.2 libcc1-0_7.2.0-18ubuntu2 libcilkrts5_7.2.0-18ubuntu2 libcomerr2_1.43.7-1 libcroco3_0.6.12-2 libcryptsetup4_2:1.7.3-4ubuntu1 libcups2_2.2.6-3 libcupsimage2_2.2.6-3 libcurl3-gnutls_7.57.0-1ubuntu1 libdatrie1_0.2.10-5 libdb5.3_5.3.28-13.1 libdbus-1-3_1.12.2-1ubuntu1 libdebconfclient0_0.213ubuntu1 libdevmapper1.02.1_2:1.02.137-2ubuntu3 libdpkg-perl_1.19.0.4ubuntu1 libexpat1_2.2.5-3 libfakeroot_1.21-1ubuntu2 libfdisk1_2.30.2-0.1ubuntu1 libffi6_3.2.1-6 libfftw3-double3_3.3.7-1 libfile-stripnondeterminism-perl_0.040-1 libfontconfig1_2.12.6-0ubuntu1 libfreetype6_2.8-0.2ubuntu2 libgcc-7-dev_7.2.0-18ubuntu2 libgcc1_1:7.2.0-18ubuntu2 libgcrypt20_1.8.1-4 libgdbm3_1.8.3-14 libghc-pandoc-citeproc-data_0.10.5.1-1build3 libglib2.0-0_2.54.1-1ubuntu1 libgmp10_2:6.1.2+dfsg-1 libgnutls30_3.5.8-6ubuntu3 libgomp1_7.2.0-18ubuntu2 libgpg-error0_1.27-5 libgraphite2-3_1.3.10-8 libgs9_9.21~dfsg+1-0ubuntu3 libgs9-common_9.21~dfsg+1-0ubuntu3 libgssapi-krb5-2_1.15.1-2 libgssapi3-heimdal_7.5.0+dfsg-1 libharfbuzz-icu0_1.7.2-1 libharfbuzz0b_1.7.2-1 libhcrypto4-heimdal_7.5.0+dfsg-1 libheimbase1-heimdal_7.5.0+dfsg-1 libheimntlm0-heimdal_7.5.0+dfsg-1 libhogweed4_3.3-2 libhx509-5-heimdal_7.5.0+dfsg-1 libice6_2:1.0.9-2 libicu-le-hb0_1.0.3+git161113-4 libicu60_60.2-1ubuntu1 libidn11_1.33-2.1 libidn2-0_2.0.4-1 libijs-0.35_0.35-12 libip4tc0_1.6.1-2ubuntu2 libisl15_0.18-1 libitm1_7.2.0-18ubuntu2 libjbig0_2.1-3.1 libjbig2dec0_0.13-5 libjpeg-turbo8_1.5.2-0ubuntu5 libjpeg8_8c-2ubuntu8 libk5crypto3_1.15.1-2 libkeyutils1_1.5.9-9.2ubuntu1 libkmod2_24-1ubuntu2 libkpathsea6_2017.20170613.44572-6ubuntu1 libkrb5-26-heimdal_7.5.0+dfsg-1 libkrb5-3_1.15.1-2 libkrb5support0_1.15.1-2 libksba8_1.3.5-2 liblcms2-2_2.9-1 libldap-2.4-2_2.4.45+dfsg-1ubuntu1 libldap-common_2.4.45+dfsg-1ubuntu1 liblockfile-bin_1.14-1.1 liblockfile1_1.14-1.1 liblqr-1-0_0.4.2-2 libltdl7_2.4.6-2 liblua5.1-0_5.1.5-8.1build1 libluajit-5.1-2_2.1.0~beta3+dfsg-5.1 libluajit-5.1-common_2.1.0~beta3+dfsg-5.1 liblz4-1_0.0~r131-2ubuntu2 liblzma5_5.2.2-1.3 libmagic-mgc_1:5.32-1 libmagic1_1:5.32-1 libmagickcore-6.q16-3_8:6.9.7.4+dfsg-16ubuntu5 libmagickwand-6.q16-3_8:6.9.7.4+dfsg-16ubuntu5 libmime-charset-perl_1.012-2 libmount1_2.30.2-0.1ubuntu1 libmpc3_1.0.3-2 libmpfr4_3.1.6-1 libmpx2_7.2.0-18ubuntu2 libncurses5_6.0+20160625-1ubuntu1 libncursesw5_6.0+20160625-1ubuntu1 libnettle6_3.3-2 libnghttp2-14_1.28.0-1 libnpth0_1.5-3 libnspr4_2:4.16-1ubuntu2 libnss3_2:3.32-1ubuntu3 libp11-kit0_0.23.9-2 libpam-modules_1.1.8-3.2ubuntu3 libpam-modules-bin_1.1.8-3.2ubuntu3 libpam-runtime_1.1.8-3.2ubuntu3 libpam0g_1.1.8-3.2ubuntu3 libpaper-utils_1.1.24+nmu5ubuntu1 libpaper1_1.1.24+nmu5ubuntu1 libpcre3_2:8.39-8 libperl5.26_5.26.1-3 libpipeline1_1.5.0-1 libpixman-1-0_0.34.0-2 libpng16-16_1.6.34-1 libpoppler68_0.57.0-2ubuntu5 libpotrace0_1.14-2 libprocps6_2:3.3.12-1ubuntu2 libpsl5_0.19.1-4 libptexenc1_2017.20170613.44572-6ubuntu1 libpython-stdlib_2.7.14-2ubuntu1 libpython2.7-minimal_2.7.14-4 libpython2.7-stdlib_2.7.14-4 libquadmath0_7.2.0-18ubuntu2 libreadline7_7.0-0ubuntu2 libroken18-heimdal_7.5.0+dfsg-1 librtmp1_2.4+20151223.gitfa8646d.1-1 libsasl2-2_2.1.27~101-g0780600+dfsg-3ubuntu1 libsasl2-modules-db_2.1.27~101-g0780600+dfsg-3ubuntu1 libseccomp2_2.3.1-2.1ubuntu3 libselinux1_2.7-2 libsemanage-common_2.7-2 libsemanage1_2.7-2 libsepol1_2.7-1 libsigsegv2_2.11-1 libslang2_2.3.1-5ubuntu1 libsm6_2:1.2.2-1 libsmartcols1_2.30.2-0.1ubuntu1 libsombok3_2.4.0-1 libsqlite3-0_3.21.0-1 libss2_1.43.7-1 libssl1.0.0_1.0.2g-1ubuntu14 libstdc++-7-dev_7.2.0-18ubuntu2 libstdc++6_7.2.0-18ubuntu2 libsynctex1_2017.20170613.44572-6ubuntu1 libsystemd0_235-3ubuntu2 libtasn1-6_4.12-3 libtexlua52_2017.20170613.44572-6ubuntu1 libtexluajit2_2017.20170613.44572-6ubuntu1 libthai-data_0.1.27-1 libthai0_0.1.27-1 libtiff5_4.0.9-2 libtimedate-perl_2.3000-2 libtinfo5_6.0+20160625-1ubuntu1 libtool_2.4.6-2 libubsan0_7.2.0-18ubuntu2 libudev1_235-3ubuntu2 libunicode-linebreak-perl_0.0.20160702-1build2 libunistring0_0.9.3-5.2ubuntu1 libusb-0.1-4_2:0.1.12-31 libustr-1.0-1_1.0.4-6 libuuid1_2.30.2-0.1ubuntu1 libwind0-heimdal_7.5.0+dfsg-1 libx11-6_2:1.6.4-3 libx11-data_2:1.6.4-3 libxau6_1:1.0.8-1 libxaw7_2:1.0.13-1 libxcb-render0_1.12-1ubuntu1 libxcb-shm0_1.12-1ubuntu1 libxcb1_1.12-1ubuntu1 libxdmcp6_1:1.1.2-3 libxext6_2:1.3.3-1 libxi6_2:1.7.9-1 libxml2_2.9.4+dfsg1-5.2ubuntu1 libxmu6_2:1.1.2-2 libxpm4_1:3.5.12-1 libxrender1_1:0.9.10-1 libxt6_1:1.1.5-1 libyaml-0-2_0.1.7-2ubuntu3 libzzip-0-13_0.13.62-3.1 linux-libc-dev_4.13.0-17.20 lmodern_2.004.5-3 lockfile-progs_0.1.17build1 login_1:4.2-3.2ubuntu4 lsb-base_9.20170808ubuntu1 m4_1.4.18-1 make_4.1-9.1 man-db_2.7.6.1-4 mawk_1.3.3-17ubuntu2 mime-support_3.60ubuntu1 mount_2.30.2-0.1ubuntu1 multiarch-support_2.26-0ubuntu2 ncurses-base_6.0+20160625-1ubuntu1 ncurses-bin_6.0+20160625-1ubuntu1 openssl_1.0.2g-1ubuntu14 optipng_0.7.6-1.1 pandoc_1.19.2.4~dfsg-1build3 pandoc-citeproc_0.10.5.1-1build3 pandoc-data_1.19.2.4~dfsg-1build3 passwd_1:4.2-3.2ubuntu4 patch_2.7.5-1build1 perl_5.26.1-3 perl-base_5.26.1-3 perl-modules-5.26_5.26.1-3 pinentry-curses_1.0.0-3 pkgbinarymangler_131 po-debconf_1.0.20 policyrcd-script-zg2_0.1-3 poppler-data_0.4.8-2 preview-latex-style_11.91-1ubuntu1 procps_2:3.3.12-1ubuntu2 python_2.7.14-2ubuntu1 python-minimal_2.7.14-2ubuntu1 python2.7_2.7.14-4 python2.7-minimal_2.7.14-4 readline-common_7.0-0ubuntu2 sbcl_2:1.4.1-1 sbuild-build-depends-cafeobj-dummy_0.invalid.0 sbuild-build-depends-core-dummy_0.invalid.0 sed_4.4-1 sensible-utils_0.0.11 systemd_235-3ubuntu2 systemd-sysv_235-3ubuntu2 sysv-rc_2.88dsf-59.3ubuntu2 sysvinit-utils_2.88dsf-59.10ubuntu1 t1utils_1.41-2 tar_1.29b-2 tex-common_6.09 texlive-base_2017.20171128-1 texlive-bibtex-extra_2017.20171128-1 texlive-binaries_2017.20170613.44572-6ubuntu1 texlive-extra-utils_2017.20171128-1 texlive-fonts-recommended_2017.20171128-1 texlive-generic-extra_2017.20171128-1 texlive-latex-base_2017.20171128-1 texlive-latex-extra_2017.20171128-1 texlive-latex-recommended_2017.20171128-1 texlive-pictures_2017.20171128-1 texlive-plain-generic_2017.20171128-1 texlive-xetex_2017.20171128-1 tipa_2:1.3-20 tzdata_2017c-1 ubuntu-keyring_2016.10.27 ucf_3.0036 util-linux_2.30.2-0.1ubuntu1 x11-common_1:7.7+19ubuntu3 xdg-utils_1.1.1-1ubuntu3 xz-utils_5.2.2-1.3 zlib1g_1:1.2.11.dfsg-0ubuntu2 +------------------------------------------------------------------------------+ | Build | +------------------------------------------------------------------------------+ Unpack source ------------- gpgv: Signature made Wed Jul 27 14:56:58 2016 UTC gpgv: using RSA key gpgv: Can't check signature: No public key dpkg-source: warning: failed to verify signature on ./cafeobj_1.5.5-1.dsc dpkg-source: info: extracting cafeobj in cafeobj-1.5.5 dpkg-source: info: unpacking cafeobj_1.5.5.orig.tar.gz dpkg-source: info: unpacking cafeobj_1.5.5-1.debian.tar.xz dpkg-source: info: applying fix-refman-fonts dpkg-source: info: applying fix-syntax-font dpkg-source: info: applying armhf-remove-buildopts dpkg-source: info: applying namespace-use-tikz dpkg-source: info: applying kosakusha-logo dpkg-source: info: applying citp-updates dpkg-source: info: applying autoconf-doc-changes dpkg-source: info: applying fix-pn-fonts dpkg-source: info: applying change-logo-font Check disc space ---------------- Sufficient free space for build User Environment ---------------- APT_CONFIG=/var/lib/sbuild/apt.conf DEB_BUILD_OPTIONS=noautodbgsym parallel=4 HOME=/sbuild-nonexistent LANG=C.UTF-8 LC_ALL=C.UTF-8 LOGNAME=buildd PATH=/usr/local/sbin:/usr/local/bin:/usr/sbin:/usr/bin:/sbin:/bin:/usr/games SCHROOT_ALIAS_NAME=build-PACKAGEBUILD-13891773 SCHROOT_CHROOT_NAME=build-PACKAGEBUILD-13891773 SCHROOT_COMMAND=env SCHROOT_GID=2501 SCHROOT_GROUP=buildd SCHROOT_SESSION_ID=build-PACKAGEBUILD-13891773 SCHROOT_UID=2001 SCHROOT_USER=buildd SHELL=/bin/sh TERM=unknown USER=buildd V=1 dpkg-buildpackage ----------------- dpkg-buildpackage: info: source package cafeobj dpkg-buildpackage: info: source version 1.5.5-1 dpkg-buildpackage: info: source distribution unstable dpkg-source --before-build cafeobj-1.5.5 dpkg-buildpackage: info: host architecture i386 fakeroot debian/rules clean dh_testdir dh_testroot [ ! -f Makefile ] || /usr/bin/make distclean rm -f install-arch-stamp install-indep-stamp rm -f build-arch-stamp build-indep-stamp rm -rf /<>/tmpcache dh_clean dh_clean: Compatibility levels before 9 are deprecated (level 7 in use) debian/rules build-arch dh_testdir ./configure --prefix=/usr --with-lisp=sbcl --enable-rebuild-doc checking for a BSD-compatible install... /usr/bin/install -c checking whether build environment is sane... yes /bin/bash: /<>/missing: No such file or directory configure: WARNING: 'missing' script is too old or missing checking for a thread-safe mkdir -p... /bin/mkdir -p checking for gawk... no checking for mawk... mawk checking whether make sets $(MAKE)... yes checking whether make supports nested variables... yes checking for gcl... no checking for lisp... no checking for sbcl... /usr/bin/sbcl checking for alisp... no checking for clisp... no checking for ccl... no checking for ccl64... no checking whether make sets $(MAKE)... (cached) yes configure: Building for the following lisp interpreters: sbcl checking for emacs... no checking for xemacs... no checking where .elc files should go... ${datadir}/emacs/site-lisp checking for xelatex... yes checking for bibtex... yes checking for pandoc... yes checking for pdflatex... yes checking that generated files are newer than configure... done configure: creating ./config.status config.status: creating Makefile config.status: creating make-cafeobj.lisp config.status: creating version.lisp config.status: creating xbin/cafeobj.in config.status: creating doc/refman/Makefile config.status: creating doc/manual/Makefile config.status: creating doc/RefCard/Makefile config.status: creating doc/PigNose/Makefile config.status: creating doc/citp-manual/Makefile config.status: creating doc/namespace/Makefile config.status: creating doc/etc/Makefile # remove prebuild documentation pdf and rebuild them rm -f doc/manual/manual.pdf rm -f doc/refman/reference-manual.pdf rm -f doc/PigNose/pnguide.pdf rm -f doc/RefCard/interp.pdf rm -f doc/RefCard/syntax.pdf rm -f doc/namespace/namespace.pdf make build make[1]: Entering directory '/<>' mkdir -p dumps/sbcl/ sbcl --dynamic-space-size 2048 < make-cafeobj.lisp This is SBCL 1.4.1.debian, an implementation of ANSI Common Lisp. More information about SBCL is available at . SBCL is free software, provided as is, with absolutely no warranty. It is mostly in the public domain; some portions are provided under BSD-style licenses. See the CREDITS and COPYING files in the distribution for more information. * NIL * # * # * *CHAOS-ROOT* * "." * CHAOS::*CAFEOBJ-INSTALL-DIR* * "." * CHAOS::*MAKE-BIGPINK* * (:BIGPINK :ALIEN-CALLBACKS :ANSI-CL :ASH-RIGHT-VOPS :C-STACK-IS-CONTROL-STACK :COMMON-LISP :COMPARE-AND-SWAP-VOPS :CYCLE-COUNTER :ELF :FP-AND-PC-STANDARD-SAVE :GENCGC :IEEE-FLOATING-POINT :INLINE-CONSTANTS :LARGEFILE :LINKAGE-TABLE :LINUX :LITTLE-ENDIAN :MEMORY-BARRIER-VOPS :MULTIPLY-HIGH-VOPS :OS-PROVIDES-BLKSIZE-T :OS-PROVIDES-DLADDR :OS-PROVIDES-DLOPEN :OS-PROVIDES-GETPROTOBY-R :OS-PROVIDES-POLL :OS-PROVIDES-PUTWC :OS-PROVIDES-SUSECONDS-T :PACKAGE-LOCAL-NICKNAMES :PRECISE-ARG-COUNT-ERROR :RAW-INSTANCE-INIT-VOPS :RAW-SIGNED-WORD :RELOCATABLE-HEAP :SB-AFTER-XC-CORE :SB-CORE-COMPRESSION :SB-DOC :SB-EVAL :SB-FUTEX :SB-LDB :SB-PACKAGE-LOCKS :SB-SOURCE-LOCATIONS :SB-THREAD :SB-TRACEROOT :SB-UNICODE :SB-XREF-FOR-INTERNALS :SBCL :STACK-ALLOCATABLE-CLOSURES :STACK-ALLOCATABLE-FIXED-OBJECTS :STACK-ALLOCATABLE-LISTS :STACK-ALLOCATABLE-VECTORS :STACK-GROWS-DOWNWARD-NOT-UPWARD :SYMBOL-INFO-VOPS :UNIX :UNWIND-TO-FRAME-AND-CALL-VOP :X86) * NIL * ; in: DEFUN MAKE-EXEC-IMAGE ; (SETQ *CHAOS-NEW* T) ; ; caught WARNING: ; undefined variable: *CHAOS-NEW* ; (SETQ CHAOS::-CAFEOBJ-LOAD-TIME- (CHAOS::GET-TIME-STRING)) ; ; caught WARNING: ; undefined variable: CHAOS::-CAFEOBJ-LOAD-TIME- ; (CHAOS::GET-TIME-STRING) ; ; caught STYLE-WARNING: ; undefined function: CHAOS::GET-TIME-STRING ; (CHAOS::SET-CAFEOBJ-STANDARD-LIBRARY-PATH) ; ; caught STYLE-WARNING: ; undefined function: CHAOS::SET-CAFEOBJ-STANDARD-LIBRARY-PATH ; ; compilation unit finished ; Undefined functions: ; CHAOS::GET-TIME-STRING CHAOS::SET-CAFEOBJ-STANDARD-LIBRARY-PATH ; Undefined variables: ; *CHAOS-NEW* CHAOS::-CAFEOBJ-LOAD-TIME- ; caught 2 WARNING conditions ; caught 2 STYLE-WARNING conditions MAKE-EXEC-IMAGE * CHAOS::*COMPILE-BUILTIN-AXIOM* * MAKE-CAFEOBJ * ** making CafeOBJ (STYLE-WARNING: using deprecated EVAL-WHEN situation names LOAD EVAL .) ; compiling file "/<>/cl-ppcre/packages.lisp" (written 09 SEP 2014 08:18:38 PM): ; compiling (IN-PACKAGE :CL-USER) ; compiling (DEFPACKAGE :CL-PPCRE ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/cl-ppcre/packages-TMP.fasl written ; compilation finished in 0:00:00.003 ; compiling file "/<>/cl-ppcre/specials.lisp" (written 09 SEP 2014 08:18:38 PM): ; compiling (IN-PACKAGE :CL-PPCRE) ; compiling (DEFVAR *STANDARD-OPTIMIZE-SETTINGS* ...) ; compiling (DEFVAR *SPECIAL-OPTIMIZE-SETTINGS* ...) ; compiling (DEFVAR *EXTENDED-MODE-P* ...) ; compiling (DECLAIM (BOOLEAN *EXTENDED-MODE-P*)) ; compiling (DEFVAR *REGEX-CHAR-CODE-LIMIT* ...) ; compiling (DECLAIM (FIXNUM *REGEX-CHAR-CODE-LIMIT*)) ; compiling (DEFVAR *STRING* ...) ; compiling (DECLAIM (SIMPLE-STRING *STRING*)) ; compiling (DEFVAR *START-POS* ...) ; compiling (DECLAIM (FIXNUM *START-POS*)) ; compiling (DEFVAR *REAL-START-POS* ...) ; compiling (DECLAIM (TYPE # ...)) ; compiling (DEFVAR *END-POS* ...) ; compiling (DECLAIM (FIXNUM *END-POS*)) ; compiling (DEFVAR *REG-STARTS* ...) ; compiling (DECLAIM (SIMPLE-VECTOR *REG-STARTS*)) ; compiling (DEFVAR *REGS-MAYBE-START* ...) ; compiling (DECLAIM (SIMPLE-VECTOR *REGS-MAYBE-START*)) ; compiling (DEFVAR *REG-ENDS* ...) ; compiling (DECLAIM (SIMPLE-VECTOR *REG-ENDS*)) ; compiling (DEFVAR *END-STRING-POS* ...) ; compiling (DEFVAR *REP-NUM* ...) ; compiling (DECLAIM (FIXNUM *REP-NUM*)) ; compiling (DEFVAR *ZERO-LENGTH-NUM* ...) ; compiling (DECLAIM (FIXNUM *ZERO-LENGTH-NUM*)) ; compiling (DEFVAR *REPEAT-COUNTERS* ...) ; compiling (DECLAIM (TYPE # ...)) ; compiling (DEFVAR *LAST-POS-STORES* ...) ; compiling (DECLAIM (SIMPLE-VECTOR *LAST-POS-STORES*)) ; compiling (DEFVAR *USE-BMH-MATCHERS* ...) ; compiling (DEFVAR *OPTIMIZE-CHAR-CLASSES* ...) ; compiling (DEFVAR *PROPERTY-RESOLVER* ...) ; compiling (DEFVAR *ALLOW-QUOTING* ...) ; compiling (DEFVAR *ALLOW-NAMED-REGISTERS* ...) ; compiling (PUSHNEW :CL-PPCRE ...) ; compiling (DEFVAR *HYPERDOC-BASE-URI* ...) ; compiling (LET (#) ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/cl-ppcre/specials-TMP.fasl written ; compilation finished in 0:00:00.010 ; compiling file "/<>/cl-ppcre/util.lisp" (written 09 SEP 2014 08:18:38 PM): ; compiling (IN-PACKAGE :CL-PPCRE) ; compiling (DEFMACRO DEFCONSTANT ...) ; compiling (DEFMACRO WITH-UNIQUE-NAMES ...) ; compiling (DEFMACRO WITH-REBINDING ...) ; compiling (DECLAIM (INLINE DIGIT-CHAR-P)) ; compiling (DEFUN DIGIT-CHAR-P ...) ; compiling (DECLAIM (INLINE WORD-CHAR-P)) ; compiling (DEFUN WORD-CHAR-P ...) ; compiling (DEFCONSTANT +WHITESPACE-CHAR-STRING+ ...) ; compiling (DEFUN WHITESPACEP ...) ; compiling (DEFMACRO MAYBE-COERCE-TO-SIMPLE-STRING ...) ; compiling (DECLAIM (INLINE NSUBSEQ)) ; compiling (DEFUN NSUBSEQ ...) ; compiling (DEFUN NORMALIZE-VAR-LIST ...) ; compiling (DEFUN STRING-LIST-TO-SIMPLE-STRING ...) ; file: /<>/cl-ppcre/util.lisp ; in: DEFUN STRING-LIST-TO-SIMPLE-STRING ; (REPLACE CL-PPCRE::RESULT-STRING STRING :START1 CL-PPCRE::CURR-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a STRING, not a SIMPLE-BASE-STRING. ; compiling (DEFUN COMPLEMENT* ...) ; file: /<>/cl-ppcre/util.lisp ; in: DEFUN COMPLEMENT* ; (FUNCALL CL-PPCRE::TEST-FUNCTION CHAR) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CL-PPCRE::TEST-FUNCTION) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/cl-ppcre/util-TMP.fasl written ; compilation finished in 0:00:00.031 ; compiling file "/<>/cl-ppcre/errors.lisp" (written 09 SEP 2014 08:18:38 PM): ; compiling (IN-PACKAGE :CL-PPCRE) ; compiling (DEFVAR *SYNTAX-ERROR-STRING* ...) ; compiling (DEFINE-CONDITION PPCRE-ERROR ...) ; compiling (DEFINE-CONDITION PPCRE-SYNTAX-ERROR ...) ; compiling (SETF (DOCUMENTATION # ...) ...) ; compiling (SETF (DOCUMENTATION # ...) ...) ; compiling (DEFINE-CONDITION PPCRE-INVOCATION-ERROR ...) ; compiling (DEFMACRO SIGNAL-SYNTAX-ERROR* ...) ; compiling (DEFMACRO SIGNAL-SYNTAX-ERROR ...) ; compiling (DEFMACRO SIGNAL-INVOCATION-ERROR ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/cl-ppcre/errors-TMP.fasl written ; compilation finished in 0:00:00.012 ; compiling file "/<>/cl-ppcre/charset.lisp" (written 09 SEP 2014 08:18:38 PM): ; compiling (IN-PACKAGE :CL-PPCRE) ; compiling (DEFCONSTANT +PROBE-DEPTH+ ...) ; compiling (DEFUN MAKE-CHAR-VECTOR ...) ; compiling (DEFSTRUCT (CHARSET #) ...) ; compiling (DEFMETHOD MAKE-LOAD-FORM ...) ; compiling (DECLAIM (INLINE MIX)) ; compiling (DEFUN MIX ...) ; file: /<>/cl-ppcre/charset.lisp ; in: DEFUN MIX ; (+ CL-PPCRE::CODE CL-PPCRE::HASH) ; ; 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 GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 32). ; The second argument is a NUMBER, not a (SIGNED-BYTE 32). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 32) &REST ; T). ; etc. ; compiling (DECLAIM (INLINE COMPUTE-INDEX)) ; compiling (DEFUN COMPUTE-INDEX ...) ; file: /<>/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 (SIMPLE-ARRAY * (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (MOD CL-PPCRE::HASH (1- (LENGTH VECTOR))) ; --> LET REM NTH-VALUE MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; ==> ; (TRUNCATE NUMBER SB-C::DIVISOR) ; ; 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. ; --> LET IF AND IF NOT IF ZEROP ; ==> ; (= REM 0) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL (-536870907) (536870907)) ; (DOUBLE-FLOAT -5.36870907d8 5.36870907d8) ; (SINGLE-FLOAT -5.368709e8 ; 5.368709e8)), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; --> LET IF AND IF IF PLUSP ; ==> ; (> NUMBER 0) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> LET IF AND IF IF MINUSP ; ==> ; (< NUMBER 0) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (1+ (MOD CL-PPCRE::HASH (1- (LENGTH VECTOR)))) ; ==> ; (+ (MOD CL-PPCRE::HASH (1- (LENGTH VECTOR))) 1) ; ; note: unable to ; associate +/+ of constants ; due to type uncertainty: ; The first argument is a (OR (SINGLE-FLOAT -5.368709e8) ; (DOUBLE-FLOAT -5.36870908d8 1.073741814d9) ; (RATIONAL (-536870908) ; (1073741814))), not a RATIONAL. ; ; note: unable to ; associate +/- of constants ; due to type uncertainty: ; The first argument is a (OR (SINGLE-FLOAT -5.368709e8) ; (DOUBLE-FLOAT -5.36870908d8 1.073741814d9) ; (RATIONAL (-536870908) ; (1073741814))), not a RATIONAL. ; (MOD CL-PPCRE::HASH (1- (LENGTH VECTOR))) ; --> LET IF AND IF IF MINUSP ; ==> ; (< NUMBER 0) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; --> LET IF AND IF IF PLUSP ; ==> ; (> NUMBER 0) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; --> LET IF ; ==> ; (+ REM SB-C::DIVISOR) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (RATIONAL (-536870907) (536870907)) ; (DOUBLE-FLOAT -5.36870907d8 5.36870907d8) ; (SINGLE-FLOAT -5.368709e8 5.368709e8)), not a FIXNUM. ; The result is a (VALUES ; (OR (SINGLE-FLOAT -5.368709e8) ; (DOUBLE-FLOAT -5.36870908d8 1.073741814d9) ; (RATIONAL (-536870908) (1073741814))) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 32) arithmetic (cost 5) because: ; The first argument is a (OR (RATIONAL (-536870907) (536870907)) ; (DOUBLE-FLOAT -5.36870907d8 5.36870907d8) ; (SINGLE-FLOAT -5.368709e8 5.368709e8)), not a (SIGNED-BYTE ; 32). ; The result is a (VALUES ; (OR (SINGLE-FLOAT -5.368709e8) ; (DOUBLE-FLOAT -5.36870908d8 1.073741814d9) ; (RATIONAL (-536870908) (1073741814))) ; &OPTIONAL), not a (VALUES (SIGNED-BYTE 32) &REST T). ; etc. ; (1+ (MOD CL-PPCRE::HASH (1- (LENGTH VECTOR)))) ; ==> ; (+ (MOD CL-PPCRE::HASH (1- (LENGTH VECTOR))) 1) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a (OR (SINGLE-FLOAT -5.368709e8) ; (DOUBLE-FLOAT -5.36870908d8 1.073741814d9) ; (RATIONAL (-536870908) (1073741814))), not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-536870907) (1073741815)) ; (DOUBLE-FLOAT -5.36870907d8 1.073741815d9) ; (SINGLE-FLOAT -5.368709e8)) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (SINGLE-FLOAT -5.368709e8) ; (DOUBLE-FLOAT -5.36870908d8 1.073741814d9) ; (RATIONAL (-536870908) (1073741814))), not a FIXNUM. ; The result is a (VALUES ; (OR (RATIONAL (-536870907) (1073741815)) ; (DOUBLE-FLOAT -5.36870907d8 1.073741815d9) ; (SINGLE-FLOAT -5.368709e8)) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; compiling (DEFUN IN-CHARSET-P ...) ; compiling (DEFUN ADD-TO-CHARSET ...) ; compiling (DEFUN %ADD-TO-CHARSET ...) ; compiling (DEFUN %ADD-TO-CHARSET/EXPAND ...) ; file: /<>/cl-ppcre/charset.lisp ; in: DEFUN %ADD-TO-CHARSET/EXPAND ; (* 2 CL-PPCRE::NEW-SIZE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; ; 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. ; ; note: unable to ; associate *// of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; recode as leas, shifts and adds ; due to type uncertainty: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32) ; &REST T). ; ; note: unable to ; recode as leas, shifts and adds ; due to type uncertainty: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; (>= CL-PPCRE::NEW-SIZE 371370) ; --> OR LET > IF ; ==> ; (> SB-C::X SB-C::Y) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> OR LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; 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. ; (* 2 CL-PPCRE::NEW-SIZE) ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 3) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 4) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; (>= CL-PPCRE::NEW-SIZE 371370) ; --> OR LET > IF ; ==> ; (> SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; (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 ; compiling (DEFUN MAP-CHARSET ...) ; file: /<>/cl-ppcre/charset.lisp ; in: DEFUN MAP-CHARSET ; (DECF CL-PPCRE::N) ; --> SETQ THE SB-IMPL::XSUBTRACT BLOCK ; ==> ; (- SB-IMPL::B SB-IMPL::A) ; ; 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 (DECF CL-PPCRE::N)) ; ==> ; (= (DECF CL-PPCRE::N) 0) ; ; 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 ; 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. ; (DECF CL-PPCRE::N) ; --> SETQ THE SB-IMPL::XSUBTRACT BLOCK ; ==> ; (- SB-IMPL::B SB-IMPL::A) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; ==> ; (SETQ CL-PPCRE::N (SB-IMPL::XSUBTRACT 1 CL-PPCRE::N)) ; ; note: doing signed word to integer coercion (cost 20) to N ; compiling (DEFUN CREATE-CHARSET-FROM-TEST-FUNCTION ...) ; file: /<>/cl-ppcre/charset.lisp ; in: DEFUN CREATE-CHARSET-FROM-TEST-FUNCTION ; (FUNCALL CL-PPCRE::TEST-FUNCTION CHAR) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CL-PPCRE::TEST-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::WITH CL-PPCRE::CHARSET = (CL-PPCRE::MAKE-CHARSET) ; CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM CL-PPCRE::START CL-PPCRE::BELOW ; CL-PPCRE::END ; CL-PPCRE::FOR ...) ; --> BLOCK LET LET LET TAGBODY WHEN IF >= OR LET > IF ; ==> ; (> SB-C::X SB-C::Y) ; ; 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. ; --> BLOCK LET LET LET TAGBODY WHEN IF >= OR LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; 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. ; --> BLOCK LET LET LET TAGBODY WHEN IF >= OR LET > IF ; ==> ; (> SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; etc. ; --> BLOCK LET LET LET TAGBODY WHEN IF >= OR LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-= (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/cl-ppcre/charset-TMP.fasl written ; compilation finished in 0:00:00.039 ; compiling file "/<>/cl-ppcre/charmap.lisp" (written 09 SEP 2014 08:18:38 PM): ; compiling (IN-PACKAGE :CL-PPCRE) ; compiling (DEFSTRUCT (CHARMAP #) ...) ; compiling (DEFMETHOD MAKE-LOAD-FORM ...) ; compiling (DECLAIM (INLINE IN-CHARMAP-P)) ; compiling (DEFUN IN-CHARMAP-P ...) ; compiling (DEFUN CHARMAP-CONTENTS ...) ; compiling (DEFUN MAKE-CHARMAP ...) ; file: /<>/cl-ppcre/charmap.lisp ; in: DEFUN MAKE-CHARMAP ; (FUNCALL CL-PPCRE::TEST-FUNCTION CHAR) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CL-PPCRE::TEST-FUNCTION) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; compiling (DEFUN CREATE-CHARMAP-FROM-TEST-FUNCTION ...) ; file: /<>/cl-ppcre/charmap.lisp ; in: DEFUN CREATE-CHARMAP-FROM-TEST-FUNCTION ; (LOOP CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM (1- ; CL-PPCRE::END) CL-PPCRE::DOWNTO CL-PPCRE::START ; CL-PPCRE::FOR CHAR = (CODE-CHAR CL-PPCRE::CODE) ; CL-PPCRE::UNTIL ...) ; --> BLOCK LET LET TAGBODY WHEN IF ; ==> ; (< CL-PPCRE::CODE #:LOOP-LIMIT-18) ; ; 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) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CL-PPCRE::TEST-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 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; (LOOP CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM CL-PPCRE::START CL-PPCRE::BELOW ; CL-PPCRE::END ; CL-PPCRE::FOR CHAR = (CODE-CHAR CL-PPCRE::CODE) ; CL-PPCRE::UNTIL ...) ; --> BLOCK LET LET TAGBODY WHEN IF >= OR LET > IF ; ==> ; (> SB-C::X SB-C::Y) ; ; 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. ; --> BLOCK LET LET TAGBODY WHEN IF >= OR LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; 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. ; --> BLOCK LET LET TAGBODY WHEN IF >= OR LET > IF ; ==> ; (> SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; etc. ; --> BLOCK LET LET TAGBODY WHEN IF >= OR LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-= (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; (1- CL-PPCRE::END) ; ==> ; (- CL-PPCRE::END 1) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; (LOOP CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM (1- ; CL-PPCRE::END) CL-PPCRE::DOWNTO CL-PPCRE::START ; CL-PPCRE::FOR CHAR = (CODE-CHAR CL-PPCRE::CODE) ; CL-PPCRE::UNTIL ...) ; --> BLOCK LET LET TAGBODY WHEN IF ; ==> ; (< CL-PPCRE::CODE #:LOOP-LIMIT-18) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; etc. ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/cl-ppcre/charmap-TMP.fasl written ; compilation finished in 0:00:00.034 ; compiling file "/<>/cl-ppcre/chartest.lisp" (written 09 SEP 2014 08:18:38 PM): ; compiling (IN-PACKAGE :CL-PPCRE) ; compiling (DEFUN CREATE-HASH-TABLE-FROM-TEST-FUNCTION ...) ; file: /<>/cl-ppcre/chartest.lisp ; in: DEFUN CREATE-HASH-TABLE-FROM-TEST-FUNCTION ; (FUNCALL CL-PPCRE::TEST-FUNCTION CHAR) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CL-PPCRE::TEST-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::WITH HASH-TABLE = (MAKE-HASH-TABLE) ; CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM CL-PPCRE::START CL-PPCRE::BELOW ; CL-PPCRE::END ; CL-PPCRE::FOR ...) ; --> BLOCK LET LET LET TAGBODY WHEN IF >= OR LET > IF ; ==> ; (> SB-C::X SB-C::Y) ; ; 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. ; --> BLOCK LET LET LET TAGBODY WHEN IF >= OR LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; 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. ; --> BLOCK LET LET LET TAGBODY WHEN IF >= OR LET > IF ; ==> ; (> SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; etc. ; --> BLOCK LET LET LET TAGBODY WHEN IF >= OR LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-= (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; compiling (DEFUN CREATE-OPTIMIZED-TEST-FUNCTION ...) ; file: /<>/cl-ppcre/chartest.lisp ; in: DEFUN CREATE-OPTIMIZED-TEST-FUNCTION ; (- CL-PPCRE::END CL-PPCRE::START) ; ; 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) ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; ==> ; (TRUNCATE NUMBER SB-C::DIVISOR) ; ; 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 (UNSIGNED-BYTE 32). ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION IF AND IF NOT IF ZEROP ; ==> ; (= REM 0) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL (-2) (2)) (DOUBLE-FLOAT -2.0d0 2.0d0) ; (SINGLE-FLOAT -2.0 2.0)), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION IF AND IF IF PLUSP ; ==> ; (> NUMBER 0) ; ; 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 ; 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) ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; ==> ; (TRUNCATE NUMBER SB-C::DIVISOR) ; ; 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 (UNSIGNED-BYTE 32). ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION IF AND IF NOT IF ZEROP ; ==> ; (= REM 0) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL (-2) (2)) (DOUBLE-FLOAT -2.0d0 2.0d0) ; (SINGLE-FLOAT -2.0 2.0)), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION IF AND IF IF PLUSP ; ==> ; (> NUMBER 0) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a 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). ; 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 REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT &REST ; T). ; etc. ; (CEILING (- CL-PPCRE::END CL-PPCRE::START) 2) ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION IF AND IF IF PLUSP ; ==> ; (> NUMBER 0) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION IF VALUES ; ==> ; (+ SB-C::TRU 1) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; (<= (HASH-TABLE-COUNT HASH-TABLE) ; (CEILING (- CL-PPCRE::END CL-PPCRE::START) 2)) ; --> IF ; ==> ; (> SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a INTEGER, not a FIXNUM. ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a 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). ; 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 REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT &REST ; T). ; etc. ; (CEILING (- CL-PPCRE::END CL-PPCRE::START) 2) ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION IF AND IF IF PLUSP ; ==> ; (> NUMBER 0) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION IF VALUES ; ==> ; (+ SB-C::TRU 1) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; (<= (CL-PPCRE::CHARSET-COUNT CL-PPCRE::CHARSET) ; (CEILING (- CL-PPCRE::END CL-PPCRE::START) 2)) ; --> IF ; ==> ; (> SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a INTEGER, not a FIXNUM. ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/cl-ppcre/chartest-TMP.fasl written ; compilation finished in 0:00:00.016 ; compiling file "/<>/cl-ppcre/lexer.lisp" (written 09 SEP 2014 08:18:38 PM): ; compiling (IN-PACKAGE :CL-PPCRE) ; compiling (DECLAIM (INLINE MAP-CHAR-TO-SPECIAL-CLASS)) ; compiling (DEFUN MAP-CHAR-TO-SPECIAL-CHAR-CLASS ...) ; compiling (DEFSTRUCT (LEXER #) ...) ; compiling (DEFUN MAKE-LEXER ...) ; compiling (DECLAIM (INLINE END-OF-STRING-P)) ; compiling (DEFUN END-OF-STRING-P ...) ; compiling (DECLAIM (INLINE LOOKING-AT-P)) ; compiling (DEFUN LOOKING-AT-P ...) ; compiling (DECLAIM (INLINE NEXT-CHAR-NON-EXTENDED)) ; compiling (DEFUN NEXT-CHAR-NON-EXTENDED ...) ; compiling (DEFUN NEXT-CHAR ...) ; file: /<>/cl-ppcre/lexer.lisp ; in: DEFUN NEXT-CHAR ; (CL-PPCRE::SIGNAL-SYNTAX-ERROR* CL-PPCRE::ERROR-POS ; "Comment group not closed.") ; ==> ; (ERROR 'CL-PPCRE:PPCRE-SYNTAX-ERROR :POS CL-PPCRE::ERROR-POS :FORMAT-CONTROL ; "Comment group not closed." :FORMAT-ARGUMENTS (LIST)) ; ; note: doing signed word to integer coercion (cost 20) ; compiling (DECLAIM (INLINE FAIL)) ; compiling (DEFUN FAIL ...) ; compiling (DEFUN GET-NUMBER ...) ; file: /<>/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) ; ==> ; CL-PPCRE::END-POS ; ; note: doing signed word to integer coercion (cost 20) ; compiling (DECLAIM (INLINE TRY-NUMBER)) ; compiling (DEFUN TRY-NUMBER ...) ; compiling (DECLAIM (INLINE MAKE-CHAR-FROM-CODE)) ; compiling (DEFUN MAKE-CHAR-FROM-CODE ...) ; file: /<>/cl-ppcre/lexer.lisp ; in: DEFUN MAKE-CHAR-FROM-CODE ; (CL-PPCRE::SIGNAL-SYNTAX-ERROR* CL-PPCRE::ERROR-POS ; "No character for hex-code ~X." NUMBER) ; --> ERROR ; ==> ; CL-PPCRE::ERROR-POS ; ; note: deleting unreachable code ; compiling (DEFUN UNESCAPE-CHAR ...) ; file: /<>/cl-ppcre/lexer.lisp ; in: DEFUN UNESCAPE-CHAR ; (CL-PPCRE::MAKE-CHAR-FROM-CODE NUMBER CL-PPCRE::ERROR-POS) ; --> BLOCK LET OR LET IF CL-PPCRE::SIGNAL-SYNTAX-ERROR* ERROR LIST CONS ; ==> ; NUMBER ; ; note: deleting unreachable code ; ; note: deleting unreachable code ; (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. ; compiling (DEFUN READ-CHAR-PROPERTY ...) ; compiling (DEFUN COLLECT-CHAR-CLASS ...) ; compiling (DEFUN MAYBE-PARSE-FLAGS ...) ; compiling (DEFUN GET-QUANTIFIER ...) ; compiling (DEFUN PARSE-REGISTER-NAME-AUX ...) ; compiling (DEFUN GET-TOKEN ...) ; file: /<>/cl-ppcre/lexer.lisp ; in: DEFUN GET-TOKEN ; (CL-PPCRE::SIGNAL-SYNTAX-ERROR "End of string following '(?<'.") ; --> CL-PPCRE::SIGNAL-SYNTAX-ERROR* ERROR ; ==> ; "End of string following '(?<'." ; ; note: deleting unreachable code ; (CL-PPCRE::SIGNAL-SYNTAX-ERROR* (1- (CL-PPCRE::LEXER-POS CL-PPCRE::LEXER)) ; "Character '~A' may not follow '(?<'." ; CL-PPCRE::NEXT-CHAR) ; ==> ; (ERROR 'CL-PPCRE:PPCRE-SYNTAX-ERROR :POS ; (1- (CL-PPCRE::LEXER-POS CL-PPCRE::LEXER)) :FORMAT-CONTROL ; "Character '~A' may not follow '(?<'." :FORMAT-ARGUMENTS ; (LIST CL-PPCRE::NEXT-CHAR)) ; ; note: doing signed word to integer coercion (cost 20) ; ; note: doing signed word to integer coercion (cost 20) ; (CL-PPCRE::SIGNAL-SYNTAX-ERROR* (1- (CL-PPCRE::LEXER-POS CL-PPCRE::LEXER)) ; "Character '~A' may not follow '(?'." ; CL-PPCRE::NEXT-CHAR) ; ==> ; (ERROR 'CL-PPCRE:PPCRE-SYNTAX-ERROR :POS ; (1- (CL-PPCRE::LEXER-POS CL-PPCRE::LEXER)) :FORMAT-CONTROL ; "Character '~A' may not follow '(?'." :FORMAT-ARGUMENTS ; (LIST CL-PPCRE::NEXT-CHAR)) ; ; note: doing signed word to integer coercion (cost 20) ; (CL-PPCRE::SIGNAL-SYNTAX-ERROR* (1- (CL-PPCRE::LEXER-POS CL-PPCRE::LEXER)) ; "Quantifier '~A' not allowed." ; CL-PPCRE::NEXT-CHAR) ; ==> ; (ERROR 'CL-PPCRE:PPCRE-SYNTAX-ERROR :POS ; (1- (CL-PPCRE::LEXER-POS CL-PPCRE::LEXER)) :FORMAT-CONTROL ; "Quantifier '~A' not allowed." :FORMAT-ARGUMENTS ; (LIST CL-PPCRE::NEXT-CHAR)) ; ; note: doing signed word to integer coercion (cost 20) ; compiling (DECLAIM (INLINE UNGET-TOKEN)) ; file: /<>/cl-ppcre/lexer.lisp ; in: DECLAIM (INLINE UNGET-TOKEN) ; (DECLAIM (INLINE CL-PPCRE::UNGET-TOKEN)) ; --> EVAL-WHEN ; ==> ; (SB-C::%PROCLAIM '(INLINE CL-PPCRE::UNGET-TOKEN) (SB-C:SOURCE-LOCATION)) ; ; caught STYLE-WARNING: ; Proclaiming CL-PPCRE::UNGET-TOKEN 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. ; compiling (DEFUN UNGET-TOKEN ...) ; compiling (DECLAIM (INLINE START-OF-SUBEXPR-P)) ; compiling (DEFUN START-OF-SUBEXPR-P ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/cl-ppcre/lexer-TMP.fasl written ; compilation finished in 0:00:00.102 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/<>/cl-ppcre/parser.lisp" (written 09 SEP 2014 08:18:38 PM): ; compiling (IN-PACKAGE :CL-PPCRE) ; compiling (DEFUN GROUP ...) ; file: /<>/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.") ; ==> ; (ERROR 'CL-PPCRE:PPCRE-SYNTAX-ERROR :POS (+ CL-PPCRE::OPEN-PAREN-POS 2) ; :FORMAT-CONTROL "Opening paren has no matching closing paren." ; :FORMAT-ARGUMENTS (LIST)) ; ; note: doing signed word to integer coercion (cost 20) ; compiling (DEFUN GREEDY-QUANT ...) ; compiling (DEFUN QUANT ...) ; compiling (DEFUN SEQ ...) ; compiling (DEFUN REG-EXPR ...) ; compiling (DEFUN PARSE-STRING ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/cl-ppcre/parser-TMP.fasl written ; compilation finished in 0:00:00.015 ; compiling file "/<>/cl-ppcre/regex-class.lisp" (written 09 SEP 2014 08:18:38 PM): ; compiling (IN-PACKAGE :CL-PPCRE) ; compiling (DEFCLASS REGEX ...) ; compiling (DEFCLASS SEQ ...) ; compiling (DEFCLASS ALTERNATION ...) ; compiling (DEFCLASS LOOKAHEAD ...) ; compiling (DEFCLASS LOOKBEHIND ...) ; compiling (DEFCLASS REPETITION ...) ; compiling (DEFMETHOD PRINT-OBJECT ...) ; compiling (DEFCLASS REGISTER ...) ; compiling (DEFMETHOD PRINT-OBJECT ...) ; compiling (DEFCLASS STANDALONE ...) ; compiling (DEFCLASS BACK-REFERENCE ...) ; compiling (DEFCLASS CHAR-CLASS ...) ; compiling (DEFCLASS STR ...) ; compiling (DEFMETHOD PRINT-OBJECT ...) ; compiling (DEFCLASS ANCHOR ...) ; compiling (DEFCLASS EVERYTHING ...) ; compiling (DEFCLASS WORD-BOUNDARY ...) ; compiling (DEFCLASS BRANCH ...) ; compiling (DEFCLASS FILTER ...) ; compiling (DEFCLASS VOID ...) ; compiling (DEFMETHOD INITIALIZE-INSTANCE ...) ; file: /<>/cl-ppcre/regex-class.lisp ; in: DEFMETHOD INITIALIZE-INSTANCE :AFTER (STR) ; (COERCE CL-PPCRE::STR-SLOT 'SIMPLE-STRING) ; --> THE IF REPLACE MAKE-ARRAY ; ==> ; (LENGTH SB-C::X) ; ; 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 VECTOR. ; --> THE IF ; ==> ; (REPLACE (MAKE-ARRAY (LENGTH SB-C::X) :ELEMENT-TYPE 'CHARACTER) SB-C::X) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; (LENGTH (CL-PPCRE::STR CL-PPCRE::STR)) ; ; 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 VECTOR. ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/cl-ppcre/regex-class-TMP.fasl written ; compilation finished in 0:00:00.015 ; compiling file "/<>/cl-ppcre/regex-class-util.lisp" (written 09 SEP 2014 08:18:38 PM): ; compiling (IN-PACKAGE :CL-PPCRE) ; compiling (DEFMETHOD LEN ...) ; compiling (DEFMETHOD STR ...) ; compiling (DEFMETHOD SKIP ...) ; compiling (DEFMETHOD START-OF-END-STRING-P ...) ; compiling (DEFGENERIC CASE-MODE ...) ; compiling (DEFMETHOD CASE-MODE ...) ; file: /<>/cl-ppcre/regex-class-util.lisp ; in: DEFMETHOD CASE-MODE (STR T) ; (ZEROP (CL-PPCRE::LEN CL-PPCRE::STR)) ; ==> ; (= (CL-PPCRE::LEN CL-PPCRE::STR) 0) ; ; 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 ; 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. ; compiling (DEFMETHOD CASE-MODE ...) ; compiling (DEFGENERIC COPY-REGEX ...) ; compiling (DEFMETHOD COPY-REGEX ...) ; compiling (DEFMETHOD COPY-REGEX ...) ; compiling (DEFMETHOD COPY-REGEX ...) ; compiling (DEFMETHOD COPY-REGEX ...) ; compiling (DEFMETHOD COPY-REGEX ...) ; compiling (DEFMETHOD COPY-REGEX ...) ; compiling (DEFMETHOD COPY-REGEX ...) ; compiling (DEFMETHOD COPY-REGEX ...) ; compiling (DEFMETHOD COPY-REGEX ...) ; compiling (DEFMETHOD COPY-REGEX ...) ; compiling (DEFMETHOD COPY-REGEX ...) ; compiling (DEFMETHOD COPY-REGEX ...) ; compiling (DEFMETHOD COPY-REGEX ...) ; compiling (DEFMETHOD COPY-REGEX ...) ; compiling (DEFMETHOD COPY-REGEX ...) ; compiling (DEFMETHOD COPY-REGEX ...) ; compiling (DEFGENERIC REMOVE-REGISTERS ...) ; compiling (DEFMETHOD REMOVE-REGISTERS ...) ; compiling (DEFMETHOD REMOVE-REGISTERS ...) ; compiling (DEFMETHOD REMOVE-REGISTERS ...) ; compiling (DEFMETHOD REMOVE-REGISTERS ...) ; compiling (DEFMETHOD REMOVE-REGISTERS ...) ; compiling (DEFMETHOD REMOVE-REGISTERS ...) ; compiling (DEFMETHOD REMOVE-REGISTERS ...) ; compiling (DEFMETHOD REMOVE-REGISTERS ...) ; compiling (DEFMETHOD REMOVE-REGISTERS ...) ; compiling (DEFGENERIC EVERYTHINGP ...) ; compiling (DEFMETHOD EVERYTHINGP ...) ; file: /<>/cl-ppcre/regex-class-util.lisp ; in: DEFMETHOD EVERYTHINGP (SEQ) ; (LENGTH CL-PPCRE::CLEANED-ELEMENTS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (SIMPLE-ARRAY * (*)) CONS NULL ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (SIMPLE-ARRAY * (*)) CONS NULL ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; compiling (DEFMETHOD EVERYTHINGP ...) ; file: /<>/cl-ppcre/regex-class-util.lisp ; in: DEFMETHOD EVERYTHINGP (ALTERNATION) ; (DEFMETHOD CL-PPCRE::EVERYTHINGP ; ((CL-PPCRE::ALTERNATION CL-PPCRE::ALTERNATION)) ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; (WITH-SLOTS (CL-PPCRE::CHOICES) ; CL-PPCRE::ALTERNATION ; (AND (= 1 (LENGTH CL-PPCRE::CHOICES)) ; (CL-PPCRE::EVERYTHINGP (FIRST CL-PPCRE::CHOICES))))) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 SYMBOL-MACROLET IF = ; ==> ; (LENGTH (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::CHOICES)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; compiling (DEFMETHOD EVERYTHINGP ...) ; file: /<>/cl-ppcre/regex-class-util.lisp ; in: DEFMETHOD EVERYTHINGP (REPETITION) ; (DEFMETHOD CL-PPCRE::EVERYTHINGP ; ((CL-PPCRE::REPETITION CL-PPCRE::REPETITION)) ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; (WITH-SLOTS (CL-PPCRE::MAXIMUM CL-PPCRE::MINIMUM CL-PPCRE::REGEX) ; CL-PPCRE::REPETITION ; (AND CL-PPCRE::MAXIMUM (= 1 CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM) ; (CL-PPCRE::EVERYTHINGP CL-PPCRE::REGEX)))) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 SYMBOL-MACROLET IF IF = ; --> (LAMBDA (#:G4 #:G3 #:G2) (DECLARE (TYPE NUMBER #:G4 #:G3 #:G2)) (IF (= #:G4 #:G3) (IF (= #:G3 #:G2) T NIL) NIL)) ; --> SB-C::%FUNCALL IF ; ==> ; (= #:G4 #:G3) ; ; 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 ; 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. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 SYMBOL-MACROLET IF IF = ; --> (LAMBDA (#:G4 #:G3 #:G2) (DECLARE (TYPE NUMBER #:G4 #:G3 #:G2)) (IF (= #:G4 #:G3) (IF (= #:G3 #:G2) T NIL) NIL)) ; --> SB-C::%FUNCALL IF IF ; ==> ; (= #:G3 #:G2) ; ; 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 ; 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 GENERIC-= (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; compiling (DEFMETHOD EVERYTHINGP ...) ; compiling (DEFMETHOD EVERYTHINGP ...) ; compiling (DEFMETHOD EVERYTHINGP ...) ; compiling (DEFMETHOD EVERYTHINGP ...) ; compiling (DEFGENERIC REGEX-LENGTH ...) ; compiling (DEFMETHOD REGEX-LENGTH ...) ; file: /<>/cl-ppcre/regex-class-util.lisp ; in: DEFMETHOD REGEX-LENGTH (SEQ) ; (LOOP CL-PPCRE::FOR CL-PPCRE::SUB-REGEX CL-PPCRE::IN (CL-PPCRE::ELEMENTS ; CL-PPCRE::SEQ) ; CL-PPCRE::FOR CL-PPCRE::LEN = (CL-PPCRE::REGEX-LENGTH ; CL-PPCRE::SUB-REGEX) ; IF (NOT CL-PPCRE::LEN) ; DO ...) ; --> BLOCK LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-4 CL-PPCRE::LEN) ; ; 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 GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; compiling (DEFMETHOD REGEX-LENGTH ...) ; file: /<>/cl-ppcre/regex-class-util.lisp ; in: DEFMETHOD REGEX-LENGTH (ALTERNATION) ; (/= CL-PPCRE::LEN CL-PPCRE::OLD-LEN) ; --> IF ; ==> ; (= CL-PPCRE::LEN CL-PPCRE::OLD-LEN) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a 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 GENERIC-= (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; compiling (DEFMETHOD REGEX-LENGTH ...) ; file: /<>/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 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 GENERIC-EQL (cost 10) ; 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. ; compiling (DEFMETHOD REGEX-LENGTH ...) ; file: /<>/cl-ppcre/regex-class-util.lisp ; in: DEFMETHOD REGEX-LENGTH (REPETITION) ; (DEFMETHOD CL-PPCRE::REGEX-LENGTH ; ((CL-PPCRE::REPETITION CL-PPCRE::REPETITION)) ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; (WITH-SLOTS (CL-PPCRE::LEN CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM) ; CL-PPCRE::REPETITION ; (IF (AND CL-PPCRE::LEN (EQL CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM)) ; (* CL-PPCRE::MINIMUM CL-PPCRE::LEN) ; NIL))) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 SYMBOL-MACROLET IF IF ; ==> ; (EQL (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::MINIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 '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. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 SYMBOL-MACROLET IF ; ==> ; (* (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::MINIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::LEN)) ; ; 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 ; convert x*2^k to shift ; due to type uncertainty: ; The first argument is a NUMBER, not a INTEGER. ; The second argument is a NUMBER, not a INTEGER. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 SYMBOL-MACROLET IF IF ; ==> ; (EQL (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::MINIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::MAXIMUM)) ; ; note: forced to do GENERIC-EQL (cost 10) ; 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. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 SYMBOL-MACROLET IF ; ==> ; (* (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::MINIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::LEN)) ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline float arithmetic (cost 3) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 3) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; etc. ; compiling (DEFMETHOD REGEX-LENGTH ...) ; compiling (DEFMETHOD REGEX-LENGTH ...) ; compiling (DEFMETHOD REGEX-LENGTH ...) ; compiling (DEFMETHOD REGEX-LENGTH ...) ; compiling (DEFMETHOD REGEX-LENGTH ...) ; compiling (DEFMETHOD REGEX-LENGTH ...) ; compiling (DEFMETHOD REGEX-LENGTH ...) ; compiling (DEFMETHOD REGEX-LENGTH ...) ; compiling (DEFGENERIC REGEX-MIN-LENGTH ...) ; compiling (DEFMETHOD REGEX-MIN-LENGTH ...) ; file: /<>/cl-ppcre/regex-class-util.lisp ; in: DEFMETHOD REGEX-MIN-LENGTH (SEQ) ; (LOOP CL-PPCRE::FOR CL-PPCRE::SUB-REGEX CL-PPCRE::IN (CL-PPCRE::ELEMENTS ; CL-PPCRE::SEQ) ; CL-PPCRE::FOR CL-PPCRE::LEN = (CL-PPCRE::REGEX-MIN-LENGTH ; CL-PPCRE::SUB-REGEX) ; CL-PPCRE::SUM CL-PPCRE::LEN) ; --> BLOCK LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-4 CL-PPCRE::LEN) ; ; 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 GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; compiling (DEFMETHOD REGEX-MIN-LENGTH ...) ; file: /<>/cl-ppcre/regex-class-util.lisp ; in: DEFMETHOD REGEX-MIN-LENGTH (ALTERNATION) ; (LOOP CL-PPCRE::FOR CL-PPCRE::SUB-REGEX CL-PPCRE::IN (CL-PPCRE::CHOICES ; CL-PPCRE::ALTERNATION) ; CL-PPCRE::FOR CL-PPCRE::LEN = (CL-PPCRE::REGEX-MIN-LENGTH ; CL-PPCRE::SUB-REGEX) ; CL-PPCRE::MINIMIZE CL-PPCRE::LEN) ; --> BLOCK LET LET SB-LOOP::WITH-MINIMAX-VALUE LET TAGBODY ; --> SB-LOOP::LOOP-ACCUMULATE-MINIMAX-VALUE PROGN WHEN IF OR LET IF < IF ; ==> ; (< #:LOOP-MAXMIN-TEMP-8 #:LOOP-MAXMIN-7) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; etc. ; compiling (DEFMETHOD REGEX-MIN-LENGTH ...) ; file: /<>/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))) ; --> LET LET IF <= OR LET < IF ; ==> ; (< SB-C::X SB-C::Y) ; ; 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 IF <= OR LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; 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. ; --> LET LET IF <= OR LET < IF ; ==> ; (< SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; etc. ; --> LET LET IF <= OR LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-= (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; compiling (DEFMETHOD REGEX-MIN-LENGTH ...) ; file: /<>/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 ; 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 ; convert x*2^k to shift ; due to type uncertainty: ; The first argument is a NUMBER, not a INTEGER. ; The second argument is a NUMBER, not a INTEGER. ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline float arithmetic (cost 3) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 3) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; etc. ; compiling (DEFMETHOD REGEX-MIN-LENGTH ...) ; compiling (DEFMETHOD REGEX-MIN-LENGTH ...) ; compiling (DEFMETHOD REGEX-MIN-LENGTH ...) ; compiling (DEFMETHOD REGEX-MIN-LENGTH ...) ; compiling (DEFMETHOD REGEX-MIN-LENGTH ...) ; compiling (DEFMETHOD REGEX-MIN-LENGTH ...) ; compiling (DEFMETHOD REGEX-MIN-LENGTH ...) ; compiling (DEFGENERIC COMPUTE-OFFSETS ...) ; compiling (DEFMETHOD COMPUTE-OFFSETS ...) ; compiling (DEFMETHOD COMPUTE-OFFSETS ...) ; file: /<>/cl-ppcre/regex-class-util.lisp ; in: DEFMETHOD COMPUTE-OFFSETS (ALTERNATION T) ; (/= CL-PPCRE::CURR-OFFSET CL-PPCRE::OLD-OFFSET) ; --> IF ; ==> ; (= CL-PPCRE::CURR-OFFSET CL-PPCRE::OLD-OFFSET) ; ; 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 ; 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 GENERIC-= (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; compiling (DEFMETHOD COMPUTE-OFFSETS ...) ; file: /<>/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 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 GENERIC-EQL (cost 10) ; 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. ; compiling (DEFMETHOD COMPUTE-OFFSETS ...) ; file: /<>/cl-ppcre/regex-class-util.lisp ; in: DEFMETHOD COMPUTE-OFFSETS (REPETITION T) ; (DEFMETHOD CL-PPCRE::COMPUTE-OFFSETS ; ((CL-PPCRE::REPETITION CL-PPCRE::REPETITION) CL-PPCRE::START-POS) ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; (WITH-SLOTS (CL-PPCRE::LEN CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM) ; CL-PPCRE::REPETITION ; (IF (AND CL-PPCRE::LEN (EQ CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM)) ; (+ CL-PPCRE::START-POS (* CL-PPCRE::MINIMUM CL-PPCRE::LEN)) ; NIL))) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 SYMBOL-MACROLET IF + ; ==> ; (* (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::MINIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::LEN)) ; ; 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 ; convert x*2^k to shift ; due to type uncertainty: ; The first argument is a NUMBER, not a INTEGER. ; The second argument is a NUMBER, not a INTEGER. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 SYMBOL-MACROLET IF ; ==> ; (+ CL-PPCRE::START-POS ; (* (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::MINIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::LEN))) ; ; 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). ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 SYMBOL-MACROLET IF + ; ==> ; (* (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::MINIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::LEN)) ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline float arithmetic (cost 3) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 3) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; 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 SYMBOL-MACROLET IF ; ==> ; (+ CL-PPCRE::START-POS ; (* (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::MINIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::LEN))) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; compiling (DEFMETHOD COMPUTE-OFFSETS ...) ; compiling (DEFMETHOD COMPUTE-OFFSETS ...) ; compiling (DEFMETHOD COMPUTE-OFFSETS ...) ; file: /<>/cl-ppcre/regex-class-util.lisp ; in: DEFMETHOD COMPUTE-OFFSETS (CHAR-CLASS T) ; (1+ CL-PPCRE::START-POS) ; ==> ; (+ CL-PPCRE::START-POS 1) ; ; 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 ; associate +/- of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; compiling (DEFMETHOD COMPUTE-OFFSETS ...) ; file: /<>/cl-ppcre/regex-class-util.lisp ; in: DEFMETHOD COMPUTE-OFFSETS (EVERYTHING T) ; (1+ CL-PPCRE::START-POS) ; ==> ; (+ CL-PPCRE::START-POS 1) ; ; 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 ; associate +/- of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; compiling (DEFMETHOD COMPUTE-OFFSETS ...) ; file: /<>/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 ; 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 GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; compiling (DEFMETHOD COMPUTE-OFFSETS ...) ; compiling (DEFMETHOD COMPUTE-OFFSETS ...) ; file: /<>/cl-ppcre/regex-class-util.lisp ; in: DEFMETHOD COMPUTE-OFFSETS (FILTER T) ; (+ CL-PPCRE::START-POS CL-PPCRE::LEN) ; ; 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 GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; compiling (DEFMETHOD COMPUTE-OFFSETS ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/cl-ppcre/regex-class-util-TMP.fasl written ; compilation finished in 0:00:00.125 ; compiling file "/<>/cl-ppcre/convert.lisp" (written 09 SEP 2014 08:18:38 PM): ; compiling (IN-PACKAGE :CL-PPCRE) ; compiling (DEFMACRO CASE-INSENSITIVE-MODE-P ...) ; compiling (DEFMACRO MULTI-LINE-MODE-P ...) ; compiling (DEFMACRO SINGLE-LINE-MODE-P ...) ; compiling (DEFUN SET-FLAG ...) ; compiling (DEFGENERIC RESOLVE-PROPERTY ...) ; compiling (DEFUN CONVERT-CHAR-CLASS-TO-TEST-FUNCTION ...) ; file: /<>/cl-ppcre/convert.lisp ; in: DEFUN CONVERT-CHAR-CLASS-TO-TEST-FUNCTION ; (FUNCALL CL-PPCRE::TEST-FUNCTION (CHAR-DOWNCASE CHAR)) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CL-PPCRE::TEST-FUNCTION) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; (CHAR-DOWNCASE CHAR) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; (FUNCALL CL-PPCRE::TEST-FUNCTION (CHAR-UPCASE CHAR)) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CL-PPCRE::TEST-FUNCTION) ; ; 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)) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CL-PPCRE::TEST-FUNCTION) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; (CHAR-DOWNCASE CHAR) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; (FUNCALL CL-PPCRE::TEST-FUNCTION (CHAR-UPCASE CHAR)) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CL-PPCRE::TEST-FUNCTION) ; ; 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) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CL-PPCRE::TEST-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 ; (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) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CL-PPCRE::TEST-FUNCTION) ; ; 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) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CL-PPCRE::TEST-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) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CL-PPCRE::TEST-FUNCTION) ; ; 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) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CL-PPCRE::TEST-FUNCTION) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; compiling (DEFUN MAYBE-SPLIT-REPETITION ...) ; file: /<>/cl-ppcre/convert.lisp ; in: DEFUN MAYBE-SPLIT-REPETITION ; (- CL-PPCRE::MAXIMUM CL-PPCRE::MINIMUM) ; ; note: doing signed word to integer coercion (cost 20) ; compiling (DEFUN MAYBE-ACCUMULATE ...) ; file: /<>/cl-ppcre/convert.lisp ; in: DEFUN MAYBE-ACCUMULATE ; (+ (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH) (CL-PPCRE::LEN CL-PPCRE::STR)) ; ; 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 ; 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) ; --> PROGN SETF LET* ; ==> ; (REPLACE #:SEQUENCE #:NEW1 :START1 #:START :END1 NIL) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-BASE-STRING ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY CHARACTER ; (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY SINGLE-FLOAT (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY SINGLE-FLOAT (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; SINGLE-FLOAT (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY DOUBLE-FLOAT (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY DOUBLE-FLOAT (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; DOUBLE-FLOAT (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SIMPLE-BIT-VECTOR. ; The second argument is a SEQUENCE, not a SIMPLE-BIT-VECTOR. ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-BIT-VECTOR ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 2) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 4) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 7) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 8) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 15) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 15) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 16) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 16) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 29) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 29) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 29) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 31) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 31) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 32) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 32) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 8) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 16) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY FIXNUM (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY FIXNUM (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY FIXNUM (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 32) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) ; (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (COMPLEX SINGLE-FLOAT) ; (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (COMPLEX DOUBLE-FLOAT) ; (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SIMPLE-VECTOR. ; The second argument is a SEQUENCE, not a SIMPLE-VECTOR. ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-VECTOR ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-BASE-STRING ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY CHARACTER ; (*)) ; &REST T). ; (+ (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH) (CL-PPCRE::LEN CL-PPCRE::STR)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; (- (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH) (CL-PPCRE::LEN CL-PPCRE::STR)) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; compiling (DECLAIM (INLINE CONVERT-AUX)) ; compiling (DEFUN CONVERT-AUX ...) ; compiling (DEFGENERIC CONVERT-COMPOUND-PARSE-TREE ...) ; compiling (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; compiling (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; compiling (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; compiling (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; file: /<>/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 (SIMPLE-ARRAY * (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (1- (THE FIXNUM CL-PPCRE::TEST-CANDIDATE)) ; ==> ; (- (THE FIXNUM CL-PPCRE::TEST-CANDIDATE) 1) ; ; note: doing signed word to integer coercion (cost 20) ; compiling (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; compiling (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; compiling (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; compiling (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; compiling (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; file: /<>/cl-ppcre/convert.lisp ; in: DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ((EQL :GREEDY-REPETITION) T) ; (ZEROP LENGTH) ; --> = IF ; ==> ; (= LENGTH 0) ; ; 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 ; 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-PPCRE::MAXIMUM) ; ==> ; (- CL-PPCRE::MAXIMUM 1) ; ; note: doing signed word to integer coercion (cost 20) ; compiling (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; compiling (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; compiling (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; file: /<>/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. ; compiling (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; compiling (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; compiling (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; file: /<>/cl-ppcre/convert.lisp ; in: DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ((EQL :BACK-REFERENCE) T) ; (STRING= CL-PPCRE::NAME CL-PPCRE::BACKREF-NAME) ; ==> ; (SB-KERNEL:STRING=* SB-C::STRING1 SB-C::STRING2 SB-C::START1 SB-C::END1 ; SB-C::START2 SB-C::END2) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a STRING. ; The second argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a SIMPLE-BASE-STRING. ; The second argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a SIMPLE-BASE-STRING. ; (- CL-PPCRE::REG-NUM CL-PPCRE::REG-INDEX) ; ; 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) ; ==> ; (- CL-PPCRE::BACKREF-NUMBER 1) ; ; 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 GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 32). ; The second argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32) ; &REST T). ; etc. ; (LOOP CL-PPCRE::FOR CL-PPCRE::NAME CL-PPCRE::IN CL-PPCRE::REG-NAMES ; CL-PPCRE::FOR CL-PPCRE::REG-INDEX CL-PPCRE::FROM 0 ; WHEN (STRING= CL-PPCRE::NAME CL-PPCRE::BACKREF-NAME) ; CL-PPCRE::COLLECT ...) ; --> BLOCK LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY ; --> SB-LOOP::LOOP-REALLY-DESETQ SETQ THE 1+ ; ==> ; (+ CL-PPCRE::REG-INDEX 1) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; etc. ; (1- CL-PPCRE::BACKREF-NUMBER) ; ==> ; (- CL-PPCRE::BACKREF-NUMBER 1) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; compiling (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; compiling (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; compiling (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; compiling (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; compiling (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; compiling (DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ...) ; compiling (DEFGENERIC CONVERT-SIMPLE-PARSE-TREE ...) ; compiling (DEFMETHOD CONVERT-SIMPLE-PARSE-TREE ...) ; compiling (DEFMETHOD CONVERT-SIMPLE-PARSE-TREE ...) ; compiling (DEFMETHOD CONVERT-SIMPLE-PARSE-TREE ...) ; compiling (DEFUN CONVERT ...) ; file: /<>/cl-ppcre/convert.lisp ; in: DEFUN CONVERT ; (COERCE (SLOT-VALUE CL-PPCRE::STARTS-WITH 'CL-PPCRE::STR) 'SIMPLE-STRING) ; --> THE IF REPLACE MAKE-ARRAY ; ==> ; (LENGTH SB-C::X) ; ; 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 VECTOR. ; --> THE IF ; ==> ; (REPLACE (MAKE-ARRAY (LENGTH SB-C::X) :ELEMENT-TYPE 'CHARACTER) SB-C::X) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/cl-ppcre/convert-TMP.fasl written ; compilation finished in 0:00:00.141 ; compiling file "/<>/cl-ppcre/optimize.lisp" (written 09 SEP 2014 08:18:38 PM): ; compiling (IN-PACKAGE :CL-PPCRE) ; compiling (DEFGENERIC FLATTEN ...) ; compiling (DEFMETHOD FLATTEN ...) ; compiling (DEFMETHOD FLATTEN ...) ; compiling (DEFMETHOD FLATTEN ...) ; compiling (DEFMETHOD FLATTEN ...) ; compiling (DEFGENERIC GATHER-STRINGS ...) ; compiling (DEFMETHOD GATHER-STRINGS ...) ; file: /<>/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) ; --> LET TRULY-THE SB-C::MAKE-ARRAY-HEADER* LET ; ==> ; (REPLACE SB-C::DATA SB-C::INITIAL-CONTENTS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a VECTOR, not a (SIMPLE-ARRAY CHARACTER (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a VECTOR, not a SIMPLE-BASE-STRING. ; (INCF CL-PPCRE::COLLECTOR-LENGTH (CL-PPCRE::LEN CL-PPCRE::ELEMENT)) ; --> SETQ THE ; ==> ; (+ (CL-PPCRE::LEN CL-PPCRE::ELEMENT) CL-PPCRE::COLLECTOR-LENGTH) ; ; note: unable to ; 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). ; (SETF (SUBSEQ CL-PPCRE::COLLECTOR CL-PPCRE::OLD-COLLECTOR-LENGTH) ; (CL-PPCRE::STR CL-PPCRE::ELEMENT) ; CL-PPCRE::SKIP (CL-PPCRE::SKIP CL-PPCRE::ELEMENT)) ; --> PROGN SETF LET* ; ==> ; (REPLACE #:SEQUENCE #:NEW1 :START1 #:START :END1 NIL) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-BASE-STRING. ; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES SIMPLE-BASE-STRING ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY CHARACTER (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY CHARACTER ; (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY SINGLE-FLOAT (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY SINGLE-FLOAT (*)). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY SINGLE-FLOAT ; (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY DOUBLE-FLOAT (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY DOUBLE-FLOAT (*)). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY DOUBLE-FLOAT ; (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-BIT-VECTOR. ; The second argument is a SEQUENCE, not a SIMPLE-BIT-VECTOR. ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES SIMPLE-BIT-VECTOR ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 2) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 4) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 7) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 8) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 15) ; (*)). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 15) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 16) ; (*)). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 16) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 29) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 29) ; (*)). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 29) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 31) ; (*)). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 31) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (UNSIGNED-BYTE 32) ; (*)). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (UNSIGNED-BYTE 32) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 8) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 16) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY FIXNUM (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY FIXNUM (*)). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY FIXNUM (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (SIGNED-BYTE 32) (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) ; (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) ; (*)). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (COMPLEX SINGLE-FLOAT) ; (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) ; (*)). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY ; (COMPLEX DOUBLE-FLOAT) ; (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-VECTOR. ; The second argument is a SEQUENCE, not a SIMPLE-VECTOR. ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES SIMPLE-VECTOR &REST ; T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-BASE-STRING. ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES SIMPLE-BASE-STRING ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a (SIMPLE-ARRAY CHARACTER (*)). ; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; The result is a (VALUES VECTOR &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY CHARACTER ; (*)) ; &REST T). ; (INCF CL-PPCRE::COLLECTOR-LENGTH (CL-PPCRE::LEN CL-PPCRE::ELEMENT)) ; --> SETQ THE ; ==> ; (+ (CL-PPCRE::LEN CL-PPCRE::ELEMENT) CL-PPCRE::COLLECTOR-LENGTH) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline (signed-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 32). ; etc. ; compiling (DEFMETHOD GATHER-STRINGS ...) ; compiling (DEFMETHOD GATHER-STRINGS ...) ; compiling (DEFMETHOD GATHER-STRINGS ...) ; compiling (DEFGENERIC START-ANCHORED-P ...) ; compiling (DEFMETHOD START-ANCHORED-P ...) ; compiling (DEFMETHOD START-ANCHORED-P ...) ; compiling (DEFMETHOD START-ANCHORED-P ...) ; compiling (DEFMETHOD START-ANCHORED-P ...) ; file: /<>/cl-ppcre/optimize.lisp ; in: DEFMETHOD START-ANCHORED-P (REPETITION) ; (PLUSP (CL-PPCRE::MINIMUM CL-PPCRE::REPETITION)) ; ==> ; (> (CL-PPCRE::MINIMUM CL-PPCRE::REPETITION) 0) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; compiling (DEFMETHOD START-ANCHORED-P ...) ; compiling (DEFMETHOD START-ANCHORED-P ...) ; compiling (DEFMETHOD START-ANCHORED-P ...) ; compiling (DEFMETHOD START-ANCHORED-P ...) ; file: /<>/cl-ppcre/optimize.lisp ; in: DEFMETHOD START-ANCHORED-P (REGEX) ; (ZEROP (CL-PPCRE::LEN CL-PPCRE::REGEX)) ; ==> ; (= (CL-PPCRE::LEN CL-PPCRE::REGEX) 0) ; ; 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 ; 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. ; compiling (DEFGENERIC END-STRING-AUX ...) ; compiling (DEFMETHOD END-STRING-AUX ...) ; compiling (DEFMETHOD END-STRING-AUX ...) ; file: /<>/cl-ppcre/optimize.lisp ; in: DEFMETHOD END-STRING-AUX (SEQ) ; (ZEROP (CL-PPCRE::LEN CL-PPCRE::ELEMENT-END)) ; --> = IF ; ==> ; (= (CL-PPCRE::LEN CL-PPCRE::ELEMENT-END) 0) ; ; 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 ; 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) ; --> UNLESS IF = ; ==> ; (LENGTH SB-C::INITIAL-CONTENTS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (SIMPLE-ARRAY * (*)) CONS NULL ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (SIMPLE-ARRAY * (*)) CONS NULL ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; --> UNLESS IF ERROR ; ==> ; (LENGTH SB-C::INITIAL-CONTENTS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (SIMPLE-ARRAY * (*)) CONS NULL ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (SIMPLE-ARRAY * (*)) CONS NULL ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; --> LET TRULY-THE SB-C::MAKE-ARRAY-HEADER* LET ; ==> ; (REPLACE SB-C::DATA SB-C::INITIAL-CONTENTS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR (SIMPLE-ARRAY * (*)) CONS NULL ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; CHARACTER ; (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR (SIMPLE-ARRAY * (*)) CONS NULL ; SB-KERNEL:EXTENDED-SEQUENCE), not a SIMPLE-BASE-STRING. ; (CHAR CL-PPCRE::STR CL-PPCRE::I) ; --> AREF ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; 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. ; compiling (DEFMETHOD END-STRING-AUX ...) ; compiling (DEFMETHOD END-STRING-AUX ...) ; compiling (DEFMETHOD END-STRING-AUX ...) ; compiling (DEFUN END-STRING ...) ; compiling (DEFGENERIC COMPUTE-MIN-REST ...) ; compiling (DEFMETHOD COMPUTE-MIN-REST ...) ; compiling (DEFMETHOD COMPUTE-MIN-REST ...) ; file: /<>/cl-ppcre/optimize.lisp ; in: DEFMETHOD COMPUTE-MIN-REST (ALTERNATION T) ; (LOOP CL-PPCRE::FOR CL-PPCRE::CHOICE CL-PPCRE::IN (CL-PPCRE::CHOICES ; CL-PPCRE::ALTERNATION) ; CL-PPCRE::MINIMIZE (CL-PPCRE::COMPUTE-MIN-REST CL-PPCRE::CHOICE ; CL-PPCRE::CURRENT-MIN-REST)) ; --> BLOCK LET SB-LOOP::WITH-MINIMAX-VALUE LET TAGBODY ; --> SB-LOOP::LOOP-ACCUMULATE-MINIMAX-VALUE PROGN WHEN IF OR LET IF < IF ; ==> ; (< #:LOOP-MAXMIN-TEMP-9 #:LOOP-MAXMIN-8) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; etc. ; compiling (DEFMETHOD COMPUTE-MIN-REST ...) ; file: /<>/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)) ; --> LET LET IF <= OR LET < IF ; ==> ; (< SB-C::X SB-C::Y) ; ; 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 IF <= OR LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; 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. ; --> LET LET IF <= OR LET < IF ; ==> ; (< SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; etc. ; --> LET LET IF <= OR LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-= (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; compiling (DEFMETHOD COMPUTE-MIN-REST ...) ; file: /<>/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 ; 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 GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; compiling (DEFMETHOD COMPUTE-MIN-REST ...) ; file: /<>/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 ; 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 GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; compiling (DEFMETHOD COMPUTE-MIN-REST ...) ; file: /<>/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 ; 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 ; convert x*2^k to shift ; due to type uncertainty: ; The first argument is a NUMBER, not a INTEGER. ; The second argument is a NUMBER, not a INTEGER. ; (+ CL-PPCRE::CURRENT-MIN-REST ; (* (CL-PPCRE::MINIMUM CL-PPCRE::REPETITION) ; (CL-PPCRE::MIN-LEN CL-PPCRE::REPETITION))) ; ; note: unable to ; 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 GENERIC-* (cost 30) ; unable to do inline float arithmetic (cost 3) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 3) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; etc. ; (+ CL-PPCRE::CURRENT-MIN-REST ; (* (CL-PPCRE::MINIMUM CL-PPCRE::REPETITION) ; (CL-PPCRE::MIN-LEN CL-PPCRE::REPETITION))) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; compiling (DEFMETHOD COMPUTE-MIN-REST ...) ; compiling (DEFMETHOD COMPUTE-MIN-REST ...) ; compiling (DEFMETHOD COMPUTE-MIN-REST ...) ; compiling (DEFMETHOD COMPUTE-MIN-REST ...) ; file: /<>/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 ; 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 GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; compiling (DEFMETHOD COMPUTE-MIN-REST ...) ; file: /<>/cl-ppcre/optimize.lisp ; in: DEFMETHOD COMPUTE-MIN-REST (REGEX T) ; (1+ CL-PPCRE::CURRENT-MIN-REST) ; ==> ; (+ CL-PPCRE::CURRENT-MIN-REST 1) ; ; 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 ; associate +/- of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/cl-ppcre/optimize-TMP.fasl written ; compilation finished in 0:00:00.094 ; compiling file "/<>/cl-ppcre/closures.lisp" (written 09 SEP 2014 08:18:38 PM): ; compiling (IN-PACKAGE :CL-PPCRE) ; compiling (DECLAIM (INLINE *STRING*= ...)) ; compiling (DEFUN *STRING*= ...) ; compiling (DEFUN *STRING*-EQUAL ...) ; compiling (DEFGENERIC CREATE-MATCHER-AUX ...) ; compiling (DEFMETHOD CREATE-MATCHER-AUX ...) ; compiling (DEFMETHOD CREATE-MATCHER-AUX ...) ; compiling (DEFMETHOD CREATE-MATCHER-AUX ...) ; compiling (DEFMETHOD CREATE-MATCHER-AUX ...) ; compiling (DEFMETHOD CREATE-MATCHER-AUX ...) ; file: /<>/cl-ppcre/closures.lisp ; in: DEFMETHOD CREATE-MATCHER-AUX (LOOKBEHIND T) ; (FUNCALL CL-PPCRE::TEST-MATCHER (- CL-PPCRE::START-POS CL-PPCRE::LEN)) ; ==> ; (SB-C::%FUNCALL (SB-KERNEL:%COERCE-CALLABLE-TO-FUN 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) ; compiling (DEFMACRO INSERT-CHAR-CLASS-TESTER ...) ; compiling (DEFMETHOD CREATE-MATCHER-AUX ...) ; file: /<>/cl-ppcre/closures.lisp ; in: DEFMETHOD CREATE-MATCHER-AUX (CHAR-CLASS T) ; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::CHAR-CLASS ; (SCHAR CL-PPCRE::*STRING* ; CL-PPCRE::START-POS)) ; (LAMBDA (CL-PPCRE::START-POS) ; (DECLARE (FIXNUM CL-PPCRE::START-POS)) ; (AND (< CL-PPCRE::START-POS CL-PPCRE::*END-POS*) ; (CL-PPCRE::CHAR-CLASS-TEST) ; (FUNCALL CL-PPCRE::NEXT-FN (1+ CL-PPCRE::START-POS))))) ; --> LET LET LAMBDA FUNCTION AND IF IF FUNCALL SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN #:TEST-FUNCTION5) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; compiling (DEFMETHOD CREATE-MATCHER-AUX ...) ; file: /<>/cl-ppcre/closures.lisp ; in: DEFMETHOD CREATE-MATCHER-AUX (STR T) ; (LENGTH CL-PPCRE::END-STRING) ; ; 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 VECTOR. ; (FUNCALL CL-PPCRE::NEXT-FN (+ CL-PPCRE::START-POS CL-PPCRE::LEN)) ; ==> ; (SB-C::%FUNCALL (SB-KERNEL:%COERCE-CALLABLE-TO-FUN 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) ; compiling (DECLAIM (INLINE WORD-BOUNDARY-P)) ; compiling (DEFUN WORD-BOUNDARY-P ...) ; compiling (DEFMETHOD CREATE-MATCHER-AUX ...) ; compiling (DEFMETHOD CREATE-MATCHER-AUX ...) ; compiling (DEFMETHOD CREATE-MATCHER-AUX ...) ; compiling (DEFMETHOD CREATE-MATCHER-AUX ...) ; compiling (DEFMETHOD CREATE-MATCHER-AUX ...) ; compiling (DEFMETHOD CREATE-MATCHER-AUX ...) ; compiling (DEFMETHOD CREATE-MATCHER-AUX ...) ; file: /<>/cl-ppcre/closures.lisp ; in: DEFMETHOD CREATE-MATCHER-AUX (FILTER T) ; (FUNCALL CL-PPCRE::FN CL-PPCRE::START-POS) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CL-PPCRE::FN) ; ; 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) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CL-PPCRE::NEXT-FN) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; NEXT-FN is not known to be a function ; compiling (DEFMETHOD CREATE-MATCHER-AUX ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/cl-ppcre/closures-TMP.fasl written ; compilation finished in 0:00:00.106 ; compiling file "/<>/cl-ppcre/repetition-closures.lisp" (written 09 SEP 2014 08:18:38 PM): ; compiling (IN-PACKAGE :CL-PPCRE) ; compiling (DEFMACRO INCF-AFTER ...) ; compiling (DEFMACRO GREEDY-CONSTANT-LENGTH-CLOSURE ...) ; compiling (DEFUN CREATE-GREEDY-EVERYTHING-MATCHER ...) ; compiling (DEFGENERIC CREATE-GREEDY-CONSTANT-LENGTH-MATCHER ...) ; compiling (DEFMETHOD CREATE-GREEDY-CONSTANT-LENGTH-MATCHER ...) ; file: /<>/cl-ppcre/repetition-closures.lisp ; in: DEFMETHOD CREATE-GREEDY-CONSTANT-LENGTH-MATCHER (REPETITION T) ; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::REGEX ; (SCHAR CL-PPCRE::*STRING* ; CL-PPCRE::CURR-POS)) ; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE (CL-PPCRE::CHAR-CLASS-TEST))) ; --> LET LET CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET ; --> BLOCK TAGBODY WHEN IF FUNCALL SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN #:TEST-FUNCTION59) ; ; 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 ; compiling (DEFGENERIC CREATE-GREEDY-NO-ZERO-MATCHER ...) ; compiling (DEFMETHOD CREATE-GREEDY-NO-ZERO-MATCHER ...) ; file: /<>/cl-ppcre/repetition-closures.lisp ; in: DEFMETHOD CREATE-GREEDY-NO-ZERO-MATCHER (REPETITION T) ; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0) ; --> LET* FUNCALL SB-C::%FUNCALL (SETF AREF) ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE) ; ; 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) ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> LET* + AREF ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> LET* FUNCALL SB-C::%FUNCALL (SETF AREF) ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> LET* SB-IMPL::XSUBTRACT AREF ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> LET* FUNCALL SB-C::%FUNCALL (SETF AREF) ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE) ; ; 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. ; compiling (DEFGENERIC CREATE-GREEDY-MATCHER ...) ; compiling (DEFMETHOD CREATE-GREEDY-MATCHER ...) ; file: /<>/cl-ppcre/repetition-closures.lisp ; in: DEFMETHOD CREATE-GREEDY-MATCHER (REPETITION T) ; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0 ; (SVREF CL-PPCRE::*LAST-POS-STORES* CL-PPCRE::ZERO-LENGTH-NUM) NIL) ; --> PROGN SETF LET* FUNCALL SB-C::%FUNCALL (SETF AREF) ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE) ; ; 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) ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> LET* + AREF ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> LET* FUNCALL SB-C::%FUNCALL (SETF AREF) ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> LET* SB-IMPL::XSUBTRACT AREF ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> LET* FUNCALL SB-C::%FUNCALL (SETF AREF) ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE) ; ; 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. ; compiling (DEFMACRO NON-GREEDY-CONSTANT-LENGTH-CLOSURE ...) ; compiling (DEFGENERIC CREATE-NON-GREEDY-CONSTANT-LENGTH-MATCHER ...) ; compiling (DEFMETHOD CREATE-NON-GREEDY-CONSTANT-LENGTH-MATCHER ...) ; file: /<>/cl-ppcre/repetition-closures.lisp ; in: DEFMETHOD CREATE-NON-GREEDY-CONSTANT-LENGTH-MATCHER (REPETITION T) ; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::REGEX ; (SCHAR CL-PPCRE::*STRING* ; CL-PPCRE::CURR-POS)) ; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE (CL-PPCRE::CHAR-CLASS-TEST))) ; --> LET LET CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION ; --> LET LOOP BLOCK LET LET TAGBODY UNLESS IF FUNCALL SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN #:TEST-FUNCTION131) ; ; 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 ; compiling (DEFGENERIC CREATE-NON-GREEDY-NO-ZERO-MATCHER ...) ; compiling (DEFMETHOD CREATE-NON-GREEDY-NO-ZERO-MATCHER ...) ; file: /<>/cl-ppcre/repetition-closures.lisp ; in: DEFMETHOD CREATE-NON-GREEDY-NO-ZERO-MATCHER (REPETITION T) ; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0) ; --> LET* FUNCALL SB-C::%FUNCALL (SETF AREF) ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE) ; ; 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) ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> LET* + AREF ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> LET* FUNCALL SB-C::%FUNCALL (SETF AREF) ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> LET* SB-IMPL::XSUBTRACT AREF ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> LET* FUNCALL SB-C::%FUNCALL (SETF AREF) ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE) ; ; 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. ; compiling (DEFGENERIC CREATE-NON-GREEDY-MATCHER ...) ; compiling (DEFMETHOD CREATE-NON-GREEDY-MATCHER ...) ; file: /<>/cl-ppcre/repetition-closures.lisp ; in: DEFMETHOD CREATE-NON-GREEDY-MATCHER (REPETITION T) ; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0 ; (SVREF CL-PPCRE::*LAST-POS-STORES* CL-PPCRE::ZERO-LENGTH-NUM) NIL) ; --> PROGN SETF LET* FUNCALL SB-C::%FUNCALL (SETF AREF) ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE) ; ; 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) ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> LET* + AREF ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> LET* FUNCALL SB-C::%FUNCALL (SETF AREF) ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> LET* SB-IMPL::XSUBTRACT AREF ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> LET* FUNCALL SB-C::%FUNCALL (SETF AREF) ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE) ; ; 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. ; compiling (DEFMACRO CONSTANT-REPETITION-CONSTANT-LENGTH-CLOSURE ...) ; compiling (DEFGENERIC CREATE-CONSTANT-REPETITION-CONSTANT-LENGTH-MATCHER ...) ; compiling (DEFMETHOD CREATE-CONSTANT-REPETITION-CONSTANT-LENGTH-MATCHER ...) ; file: /<>/cl-ppcre/repetition-closures.lisp ; in: ; DEFMETHOD CREATE-CONSTANT-REPETITION-CONSTANT-LENGTH-MATCHER (REPETITION T) ; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::REGEX ; (SCHAR CL-PPCRE::*STRING* ; CL-PPCRE::CURR-POS)) ; (CL-PPCRE::CONSTANT-REPETITION-CONSTANT-LENGTH-CLOSURE ; (AND (CL-PPCRE::CHAR-CLASS-TEST) (1+ CL-PPCRE::CURR-POS)))) ; --> LET LET CL-PPCRE::CONSTANT-REPETITION-CONSTANT-LENGTH-CLOSURE LAMBDA ; --> FUNCTION LET AND IF IF LOOP BLOCK LET TAGBODY UNLESS IF AND IF FUNCALL ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN #:TEST-FUNCTION69) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; compiling (DEFGENERIC CREATE-CONSTANT-REPETITION-MATCHER ...) ; compiling (DEFMETHOD CREATE-CONSTANT-REPETITION-MATCHER ...) ; file: /<>/cl-ppcre/repetition-closures.lisp ; in: DEFMETHOD CREATE-CONSTANT-REPETITION-MATCHER (REPETITION T) ; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0) ; --> LET* FUNCALL SB-C::%FUNCALL (SETF AREF) ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE) ; ; 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) ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> LET* + AREF ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> LET* FUNCALL SB-C::%FUNCALL (SETF AREF) ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> LET* SB-IMPL::XSUBTRACT AREF ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> LET* FUNCALL SB-C::%FUNCALL (SETF AREF) ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0 ; (AREF CL-PPCRE::*LAST-POS-STORES* CL-PPCRE::ZERO-LENGTH-NUM) NIL) ; --> PROGN SETF LET* FUNCALL SB-C::%FUNCALL (SETF AREF) ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE) ; ; 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)) ; ==> ; (= (CL-PPCRE::MIN-LEN CL-PPCRE::REPETITION) 0) ; ; 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 ; 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) ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> LET* + AREF ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> LET* FUNCALL SB-C::%FUNCALL (SETF AREF) ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> LET* SB-IMPL::XSUBTRACT AREF ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> LET* FUNCALL SB-C::%FUNCALL (SETF AREF) ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE) ; ; 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. ; compiling (DEFMETHOD CREATE-MATCHER-AUX ...) ; file: /<>/cl-ppcre/repetition-closures.lisp ; in: DEFMETHOD CREATE-MATCHER-AUX (REPETITION T) ; (DEFMETHOD CL-PPCRE::CREATE-MATCHER-AUX ; ((CL-PPCRE::REPETITION CL-PPCRE::REPETITION) CL-PPCRE::NEXT-FN) ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; (WITH-SLOTS (CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM CL-PPCRE::LEN ; CL-PPCRE::MIN-LEN CL-PPCRE::GREEDYP ; CL-PPCRE::CONTAINS-REGISTER-P) ; CL-PPCRE::REPETITION ; (COND ; ((AND CL-PPCRE::MAXIMUM #) ; (ERROR "Got REPETITION with MAXIMUM 0 (should not happen)")) ; ((AND CL-PPCRE::MAXIMUM #) ; (ERROR ; "Got REPETITION with MAXIMUM 1 and MINIMUM 1 (should not happen)")) ; ((AND # CL-PPCRE::LEN #) ; (CL-PPCRE::CREATE-CONSTANT-REPETITION-CONSTANT-LENGTH-MATCHER ; CL-PPCRE::REPETITION CL-PPCRE::NEXT-FN)) ; ((EQL CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM) ; (CL-PPCRE::CREATE-CONSTANT-REPETITION-MATCHER CL-PPCRE::REPETITION ; CL-PPCRE::NEXT-FN)) ; ((AND CL-PPCRE::GREEDYP CL-PPCRE::LEN #) ; (CL-PPCRE::CREATE-GREEDY-CONSTANT-LENGTH-MATCHER CL-PPCRE::REPETITION ; CL-PPCRE::NEXT-FN)) ; ((AND CL-PPCRE::GREEDYP #) ; (CL-PPCRE::CREATE-GREEDY-NO-ZERO-MATCHER CL-PPCRE::REPETITION ; CL-PPCRE::NEXT-FN)) ; (CL-PPCRE::GREEDYP ; (CL-PPCRE::CREATE-GREEDY-MATCHER CL-PPCRE::REPETITION ; CL-PPCRE::NEXT-FN)) ; ((AND CL-PPCRE::LEN # #) ; (CL-PPCRE::CREATE-NON-GREEDY-CONSTANT-LENGTH-MATCHER ; CL-PPCRE::REPETITION CL-PPCRE::NEXT-FN)) ; ((OR # #) ; (CL-PPCRE::CREATE-NON-GREEDY-NO-ZERO-MATCHER CL-PPCRE::REPETITION ; CL-PPCRE::NEXT-FN)) ; (T ; (CL-PPCRE::CREATE-NON-GREEDY-MATCHER CL-PPCRE::REPETITION ; CL-PPCRE::NEXT-FN))))) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 SYMBOL-MACROLET IF IF ZEROP ; ==> ; (= (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::MAXIMUM) 0) ; ; 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 ; 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. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 SYMBOL-MACROLET IF IF IF = ; --> (LAMBDA (#:G7 #:G6 #:G5) (DECLARE (TYPE NUMBER #:G7 #:G6 #:G5)) (IF (= #:G7 #:G6) (IF (= #:G6 #:G5) T NIL) NIL)) ; --> SB-C::%FUNCALL IF ; ==> ; (= #:G7 #:G6) ; ; 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 ; 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. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 SYMBOL-MACROLET IF IF IF = ; --> (LAMBDA (#:G7 #:G6 #:G5) (DECLARE (TYPE NUMBER #:G7 #:G6 #:G5)) (IF (= #:G7 #:G6) (IF (= #:G6 #:G5) T NIL) NIL)) ; --> SB-C::%FUNCALL IF IF ; ==> ; (= #:G6 #:G5) ; ; 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 ; 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. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 SYMBOL-MACROLET IF IF IF IF IF ; ==> ; (EQL (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::MINIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 '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. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 SYMBOL-MACROLET IF IF IF IF ; ==> ; (EQL (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::MINIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 '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. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 SYMBOL-MACROLET IF IF IF IF IF IF IF ; --> LET PLUSP > IF ; ==> ; (> (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::MIN-LEN) 0) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a 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 SYMBOL-MACROLET IF IF IF IF IF IF IF IF ; --> IF IF PLUSP ; ==> ; (> (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::LEN) 0) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a 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 SYMBOL-MACROLET IF IF IF IF IF IF IF IF ; --> IF LET PLUSP > IF ; ==> ; (> (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::MIN-LEN) 0) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a 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 SYMBOL-MACROLET IF IF IF = ; --> (LAMBDA (#:G7 #:G6 #:G5) (DECLARE (TYPE NUMBER #:G7 #:G6 #:G5)) (IF (= #:G7 #:G6) (IF (= #:G6 #:G5) T NIL) NIL)) ; --> SB-C::%FUNCALL IF ; ==> ; (= #:G7 #:G6) ; ; note: forced to do GENERIC-= (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-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 SYMBOL-MACROLET IF IF IF IF IF ; ==> ; (EQL (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::MINIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::MAXIMUM)) ; ; note: forced to do GENERIC-EQL (cost 10) ; 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. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 SYMBOL-MACROLET IF IF IF IF ; ==> ; (EQL (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::MINIMUM) ; (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::MAXIMUM)) ; ; note: forced to do GENERIC-EQL (cost 10) ; 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. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 SYMBOL-MACROLET IF IF IF IF IF IF IF ; --> LET PLUSP > IF ; ==> ; (> (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::MIN-LEN) 0) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 SYMBOL-MACROLET IF IF IF IF IF IF IF IF ; --> IF IF PLUSP ; ==> ; (> (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::LEN) 0) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-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 SYMBOL-MACROLET IF IF IF IF IF IF IF IF ; --> IF LET PLUSP > IF ; ==> ; (> (SB-PCL::ACCESSOR-SLOT-VALUE #:G0 'CL-PPCRE::MIN-LEN) 0) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/cl-ppcre/repetition-closures-TMP.fasl written ; compilation finished in 0:00:00.237 ; compiling file "/<>/cl-ppcre/scanner.lisp" (written 09 SEP 2014 08:18:38 PM): ; compiling (IN-PACKAGE :CL-PPCRE) ; compiling (DEFMACRO BMH-MATCHER-AUX ...) ; compiling (DEFUN CREATE-BMH-MATCHER ...) ; file: /<>/cl-ppcre/scanner.lisp ; in: DEFUN CREATE-BMH-MATCHER ; (LENGTH CL-PPCRE::PATTERN) ; ; 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 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. ; (MAKE-ARRAY CL-PPCRE:*REGEX-CHAR-CODE-LIMIT* :ELEMENT-TYPE 'FIXNUM ; :INITIAL-ELEMENT CL-PPCRE::M) ; --> FILL LET* ; ==> ; (SB-KERNEL:UB32-BASH-FILL ; (LET ((SB-C::RES (LDB # #))) ; (DECLARE (TYPE WORD SB-C::RES)) ; SB-C::RES) ; SB-C::SEQ (SB-KERNEL:CHECK-BOUND SB-C::SEQ SB-C::BOUND SB-C::START) ; (- ; (IF SB-C::END ; (SB-KERNEL:CHECK-BOUND SB-C::SEQ SB-C::BOUND SB-C::END) ; SB-C::LEN) ; SB-C::START)) ; ; note: doing unsigned word to integer coercion (cost 20) ; compiling (DEFMACRO CHAR-SEARCHER-AUX ...) ; compiling (DEFUN CREATE-CHAR-SEARCHER ...) ; compiling (DECLAIM (INLINE NEWLINE-SKIPPER)) ; compiling (DEFUN NEWLINE-SKIPPER ...) ; compiling (DEFMACRO INSERT-ADVANCE-FN ...) ; compiling (DEFUN CREATE-SCANNER-AUX ...) ; file: /<>/cl-ppcre/scanner.lisp ; in: DEFUN CREATE-SCANNER-AUX ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::END-STRING-TEST)) ; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*)) ; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS)) ; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #) ; (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= OR ; --> LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; 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)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: unable to ; 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). ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: unable to ; 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 ; associate +/- of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= OR ; --> LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; note: unable to open code because: The operands might not be the same type. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::END-STRING-TEST)) ; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*)) ; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS)) ; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #) ; (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; 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). ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: unable to ; 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 ; associate +/- of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; 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). ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: unable to ; 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 ; 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)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= OR ; --> LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; 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)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= OR ; --> LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; note: unable to open code because: The operands might not be the same type. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::START-STRING-TEST)) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; 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). ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: unable to ; 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 ; associate +/- of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::END-STRING-TEST)) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*)) ; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS)) ; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #) ; (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; 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). ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: unable to ; 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 ; associate +/- of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::START-STRING-TEST CL-PPCRE::END-STRING-TEST)) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*)) ; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS)) ; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #) ; (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= OR ; --> LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; note: unable to open code because: The operands might not be the same type. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FIXNUM CL-PPCRE::END-STRING-OFFSET CL-PPCRE::STARTS-WITH-LEN) ; (FUNCTION CL-PPCRE::START-STRING-TEST CL-PPCRE::END-STRING-TEST)) ; (LOOP (UNLESS (SETQ #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (LOCALLY ; (DECLARE #) ; (WHEN # #) ; (LET # ; #))))) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= OR ; --> LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; note: unable to open code because: The operands might not be the same type. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::START-STRING-TEST CL-PPCRE::END-STRING-TEST)) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*)) ; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS)) ; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #) ; (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; 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). ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: unable to ; 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 ; associate +/- of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FIXNUM CL-PPCRE::END-STRING-OFFSET) ; (FUNCTION CL-PPCRE::END-STRING-TEST)) ; (LOOP (UNLESS (SETQ #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (LOCALLY ; (DECLARE #) ; (WHEN # #) ; (LET # ; #))))) ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; 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). ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: unable to ; 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 ; associate +/- of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= OR ; --> LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; note: unable to open code because: The operands might not be the same type. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FIXNUM CL-PPCRE::END-STRING-OFFSET CL-PPCRE::STARTS-WITH-LEN) ; (FUNCTION CL-PPCRE::START-STRING-TEST CL-PPCRE::END-STRING-TEST)) ; (LOOP (UNLESS (SETQ #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (LOCALLY ; (DECLARE #) ; (WHEN # #) ; (LET # ; #))))) ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: unable to ; 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). ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: unable to ; 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 ; 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)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= OR ; --> LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; note: unable to open code because: The operands might not be the same type. ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= OR ; --> LET < IF ; ==> ; (< SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::END-STRING-TEST)) ; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*)) ; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS)) ; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #) ; (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= OR ; --> LET < IF ; ==> ; (< SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= OR ; --> LET < IF ; ==> ; (< SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::START-STRING-TEST)) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= OR ; --> LET < IF ; ==> ; (< SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::END-STRING-TEST)) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*)) ; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS)) ; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #) ; (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= OR ; --> LET < IF ; ==> ; (< SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::START-STRING-TEST CL-PPCRE::END-STRING-TEST)) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*)) ; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS)) ; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #) ; (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= OR ; --> LET < IF ; ==> ; (< SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FIXNUM CL-PPCRE::END-STRING-OFFSET CL-PPCRE::STARTS-WITH-LEN) ; (FUNCTION CL-PPCRE::START-STRING-TEST CL-PPCRE::END-STRING-TEST)) ; (LOOP (UNLESS (SETQ #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (LOCALLY ; (DECLARE #) ; (WHEN # #) ; (LET # ; #))))) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= OR ; --> LET < IF ; ==> ; (< SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FIXNUM CL-PPCRE::END-STRING-OFFSET) ; (FUNCTION CL-PPCRE::END-STRING-TEST)) ; (LOOP (UNLESS (SETQ #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (LOCALLY ; (DECLARE #) ; (WHEN # #) ; (LET # ; #))))) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN UNLESS IF AND IF <= OR ; --> LET < IF ; ==> ; (< SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; --> LAMBDA FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK ; --> TAGBODY PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) CL-PPCRE::POS)) ; --> LAMBDA FUNCTION BLOCK LET* ; ==> ; (SB-C::%SPECIAL-BIND ; '# ; # {EDAFD59}>) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of BIND ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN LET UNLESS IF WHEN IF ; --> SETQ THE FUNCALL ; ==> ; (SB-C::%FUNCALL (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CL-PPCRE::END-STRING-TEST) ; (1- CL-PPCRE::END-TEST-POS)) ; ; note: doing signed word to integer coercion (cost 20) ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::END-STRING-TEST)) ; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*)) ; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS)) ; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #) ; (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> LAMBDA FUNCTION BLOCK LET* ; ==> ; (SB-C::%SPECIAL-BIND ; '# ; # {ED8A169}>) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of BIND ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN LET UNLESS IF WHEN IF ; --> SETQ THE FUNCALL ; ==> ; (SB-C::%FUNCALL (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CL-PPCRE::END-STRING-TEST) ; (1- CL-PPCRE::END-TEST-POS)) ; ; note: doing signed word to integer coercion (cost 20) ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> LAMBDA FUNCTION BLOCK LET* ; ==> ; (SB-C::%SPECIAL-BIND ; '# ; # {ED65001}>) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of BIND ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN LET UNLESS IF WHEN IF ; --> SETQ THE FUNCALL ; ==> ; (SB-C::%FUNCALL (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CL-PPCRE::END-STRING-TEST) ; (1- CL-PPCRE::END-TEST-POS)) ; ; note: doing signed word to integer coercion (cost 20) ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::START-STRING-TEST)) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> LAMBDA FUNCTION BLOCK LET* ; ==> ; (SB-C::%SPECIAL-BIND ; '# ; # {ED3F971}>) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of BIND ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN LET UNLESS IF WHEN IF ; --> SETQ THE FUNCALL ; ==> ; (SB-C::%FUNCALL (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CL-PPCRE::END-STRING-TEST) ; (1- CL-PPCRE::END-TEST-POS)) ; ; note: doing signed word to integer coercion (cost 20) ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::END-STRING-TEST)) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*)) ; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS)) ; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #) ; (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> LAMBDA FUNCTION BLOCK LET* ; ==> ; (SB-C::%SPECIAL-BIND ; '# ; # {ED195B9}>) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of BIND ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN LET UNLESS IF WHEN IF ; --> SETQ THE FUNCALL ; ==> ; (SB-C::%FUNCALL (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CL-PPCRE::END-STRING-TEST) ; (1- CL-PPCRE::END-TEST-POS)) ; ; note: doing signed word to integer coercion (cost 20) ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::START-STRING-TEST CL-PPCRE::END-STRING-TEST)) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*)) ; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS)) ; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #) ; (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> LAMBDA FUNCTION BLOCK LET* ; ==> ; (SB-C::%SPECIAL-BIND ; '# ; # {ECF2A99}>) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of BIND ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN LET UNLESS IF WHEN IF ; --> SETQ THE FUNCALL ; ==> ; (SB-C::%FUNCALL (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CL-PPCRE::END-STRING-TEST) ; (1- CL-PPCRE::END-TEST-POS)) ; ; note: doing signed word to integer coercion (cost 20) ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FIXNUM CL-PPCRE::END-STRING-OFFSET) ; (FUNCTION CL-PPCRE::END-STRING-TEST)) ; (LOOP (UNLESS (SETQ #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (LOCALLY ; (DECLARE #) ; (WHEN # #) ; (LET # ; #))))) ; --> LAMBDA FUNCTION BLOCK LET* ; ==> ; (SB-C::%SPECIAL-BIND ; '# ; # {ECC45B9}>) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of BIND ; (SETQ CL-PPCRE::TRY-POS (1+ CL-PPCRE::*END-STRING-POS*)) ; ; note: doing signed word to integer coercion (cost 20) to TRY-POS ; ; note: doing signed word to integer coercion (cost 20) to TRY-POS ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FIXNUM CL-PPCRE::END-STRING-OFFSET) ; (FUNCTION CL-PPCRE::END-STRING-TEST)) ; (LOOP (UNLESS (SETQ #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (LOCALLY ; (DECLARE #) ; (WHEN # #) ; (LET # ; #))))) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN LET UNLESS IF WHEN IF ; --> SETQ THE FUNCALL ; ==> ; (SB-C::%FUNCALL (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CL-PPCRE::END-STRING-TEST) ; (1- CL-PPCRE::END-TEST-POS)) ; ; note: doing signed word to integer coercion (cost 20) ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FIXNUM CL-PPCRE::END-STRING-OFFSET CL-PPCRE::STARTS-WITH-LEN) ; (FUNCTION CL-PPCRE::START-STRING-TEST CL-PPCRE::END-STRING-TEST)) ; (LOOP (UNLESS (SETQ #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (LOCALLY ; (DECLARE #) ; (WHEN # #) ; (LET # ; #))))) ; --> LAMBDA FUNCTION BLOCK LET* ; ==> ; (SB-C::%SPECIAL-BIND ; '# ; # {EC6F9E9}>) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of BIND ; (FUNCALL CL-PPCRE::END-STRING-TEST CL-PPCRE::TRY-POS) ; --> SB-C::%FUNCALL ; ==> ; 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 ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FIXNUM CL-PPCRE::END-STRING-OFFSET CL-PPCRE::STARTS-WITH-LEN) ; (FUNCTION CL-PPCRE::START-STRING-TEST CL-PPCRE::END-STRING-TEST)) ; (LOOP (UNLESS (SETQ #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (LOCALLY ; (DECLARE #) ; (WHEN # #) ; (LET # ; #))))) ; --> LAMBDA FUNCTION BLOCK LET* LABELS WHEN IF PROGN LET UNLESS IF WHEN IF ; --> SETQ THE FUNCALL ; ==> ; (SB-C::%FUNCALL (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CL-PPCRE::END-STRING-TEST) ; (1- CL-PPCRE::END-TEST-POS)) ; ; note: doing signed word to integer coercion (cost 20) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/cl-ppcre/scanner-TMP.fasl written ; compilation finished in 0:00:00.518 ; compiling file "/<>/cl-ppcre/api.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CL-PPCRE) ; compiling (DEFGENERIC CREATE-SCANNER ...) ; compiling (DEFMETHOD CREATE-SCANNER ...) ; file: /<>/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. ; compiling (DEFMETHOD CREATE-SCANNER ...) ; compiling (DEFMETHOD CREATE-SCANNER ...) ; file: /<>/cl-ppcre/api.lisp ; in: DEFMETHOD CREATE-SCANNER (T) ; (PLUSP (CL-PPCRE::LEN CL-PPCRE::END-STRING)) ; ==> ; (> (CL-PPCRE::LEN CL-PPCRE::END-STRING) 0) ; ; 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 ; 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)) ; ==> ; (> (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH) 0) ; ; 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 ; 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)) ; ==> ; (> (CL-PPCRE::LEN CL-PPCRE::END-STRING) 0) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; (PLUSP (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH)) ; ==> ; (> (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH) 0) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; compiling (DEFGENERIC SCAN ...) ; compiling (DEFMETHOD SCAN ...) ; file: /<>/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 (SIMPLE-ARRAY * (*)). ; ; 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) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN ; (CL-PPCRE:CREATE-SCANNER CL-PPCRE::REGEX-STRING)) ; ; 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) ; --> LET COND IF THE COERCE THE IF REPLACE MAKE-ARRAY ; ==> ; (LENGTH SB-C::X) ; ; 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 VECTOR. ; --> LET COND IF THE COERCE THE IF ; ==> ; (REPLACE (MAKE-ARRAY (LENGTH SB-C::X) :ELEMENT-TYPE 'CHARACTER) SB-C::X) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; compiling (DEFMETHOD SCAN ...) ; file: /<>/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 (SIMPLE-ARRAY * (*)). ; ; 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) ; --> LET COND IF THE COERCE THE IF REPLACE MAKE-ARRAY ; ==> ; (LENGTH SB-C::X) ; ; 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 VECTOR. ; --> LET COND IF THE COERCE THE IF ; ==> ; (REPLACE (MAKE-ARRAY (LENGTH SB-C::X) :ELEMENT-TYPE 'CHARACTER) SB-C::X) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; compiling (DEFMETHOD SCAN ...) ; file: /<>/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 (SIMPLE-ARRAY * (*)). ; ; 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) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN ; (CL-PPCRE:CREATE-SCANNER CL-PPCRE::PARSE-TREE)) ; ; 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) ; --> LET COND IF THE COERCE THE IF REPLACE MAKE-ARRAY ; ==> ; (LENGTH SB-C::X) ; ; 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 VECTOR. ; --> LET COND IF THE COERCE THE IF ; ==> ; (REPLACE (MAKE-ARRAY (LENGTH SB-C::X) :ELEMENT-TYPE 'CHARACTER) SB-C::X) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; compiling (DEFINE-COMPILER-MACRO SCAN ...) ; compiling (DEFUN SCAN-TO-STRINGS ...) ; file: /<>/cl-ppcre/api.lisp ; in: DEFUN SCAN-TO-STRINGS ; (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) ; --> TRULY-THE SB-KERNEL:%MAP MAP-INTO MAKE-SEQUENCE MIN LET ; ==> ; (LENGTH #:G33) ; ; 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 VECTOR. ; --> TRULY-THE SB-KERNEL:%MAP MAP-INTO MAKE-SEQUENCE MIN LET LET MIN LET ; ==> ; (LENGTH #:G34) ; ; 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 VECTOR. ; (LENGTH CL-PPCRE::TARGET-STRING) ; ; 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 VECTOR. ; compiling (DEFINE-COMPILER-MACRO SCAN-TO-STRINGS ...) ; compiling (DEFMACRO REGISTER-GROUPS-BIND ...) ; compiling (DEFMACRO DO-SCANS ...) ; file: /<>/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) ; "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. After ; the last match, returns RESULT-FORM if provided or NIL otherwise. An ; implicit block named NIL surrounds DO-SCANS; RETURN may be used to ; terminate the loop immediately. If REGEX matches an empty string the ; scan is continued one position behind this match. BODY may start with ; declarations." ; (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) ; compiling (DEFMACRO DO-MATCHES ...) ; file: /<>/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) ; "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, ; returns RESULT-FORM if provided or NIL otherwise. An implicit block ; named NIL surrounds DO-MATCHES; RETURN may be used to terminate the ; loop immediately. If REGEX matches an empty string the scan is ; continued one position behind this match. BODY may start with ; declarations." ; (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) ; compiling (DEFMACRO DO-MATCHES-AS-STRINGS ...) ; file: /<>/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) ; "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 ; match, returns RESULT-FORM if provided or NIL otherwise. An implicit ; block named NIL surrounds DO-MATCHES-AS-STRINGS; RETURN may be used to ; terminate the loop immediately. If REGEX matches an empty string the ; scan is continued one position behind this match. If SHAREDP is true, ; the substrings may share structure with TARGET-STRING. BODY may start ; with declarations." ; (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) ; compiling (DEFMACRO DO-REGISTER-GROUPS ...) ; file: /<>/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) ; "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 ; variable is either bound to a string or to NIL. For each element of ; VAR-LIST which is NIL there's no binding to the corresponding register ; group. The number of variables in VAR-LIST must not be greater than ; the number of register groups. After the last match, returns ; RESULT-FORM if provided or NIL otherwise. An implicit block named NIL ; surrounds DO-REGISTER-GROUPS; RETURN may be used to terminate the loop ; immediately. If REGEX matches an empty string the scan is continued ; one position behind this match. If SHAREDP is true, the substrings ; may share structure with TARGET-STRING. BODY may start with ; declarations." ; (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) ; compiling (DEFUN ALL-MATCHES ...) ; file: /<>/cl-ppcre/api.lisp ; in: DEFUN ALL-MATCHES ; (CL-PPCRE:DO-MATCHES (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END ; CL-PPCRE::REGEX CL-PPCRE::TARGET-STRING ; (NREVERSE CL-PPCRE::RESULT-LIST) :START CL-PPCRE::START ; :END CL-PPCRE::END) ; (PUSH CL-PPCRE::MATCH-START CL-PPCRE::RESULT-LIST) ; (PUSH CL-PPCRE::MATCH-END CL-PPCRE::RESULT-LIST)) ; --> CL-PPCRE:DO-SCANS LET BLOCK LET* LOOP BLOCK TAGBODY PROGN ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF ; ==> ; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a 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:DO-SCANS LET BLOCK LET* LOOP BLOCK TAGBODY PROGN ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+ ; ==> ; (+ CL-PPCRE::MATCH-END 1) ; ; 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 ; associate +/- of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (LENGTH CL-PPCRE::TARGET-STRING) ; ; 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 VECTOR. ; (CL-PPCRE:DO-MATCHES (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END ; CL-PPCRE::REGEX CL-PPCRE::TARGET-STRING ; (NREVERSE CL-PPCRE::RESULT-LIST) :START CL-PPCRE::START ; :END CL-PPCRE::END) ; (PUSH CL-PPCRE::MATCH-START CL-PPCRE::RESULT-LIST) ; (PUSH CL-PPCRE::MATCH-END CL-PPCRE::RESULT-LIST)) ; --> CL-PPCRE:DO-SCANS LET BLOCK LET* OR LET IF ; ==> ; (LENGTH #:TARGET-STRING3) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; --> CL-PPCRE:DO-SCANS LET BLOCK LET* SETQ THE ; --> CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND IF THE COERCE THE IF ; --> REPLACE MAKE-ARRAY ; ==> ; (LENGTH SB-C::X) ; ; 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 VECTOR. ; --> CL-PPCRE:DO-SCANS LET BLOCK LET* SETQ THE ; --> CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND IF THE COERCE THE IF ; ==> ; (REPLACE (MAKE-ARRAY (LENGTH SB-C::X) :ELEMENT-TYPE 'CHARACTER) SB-C::X) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; --> CL-PPCRE:DO-SCANS LET BLOCK LET* LOOP BLOCK TAGBODY PROGN ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF ; ==> ; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; ; note: forced to do GENERIC-= (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; --> CL-PPCRE:DO-SCANS LET BLOCK LET* LOOP BLOCK TAGBODY PROGN ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+ ; ==> ; (+ CL-PPCRE::MATCH-END 1) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; compiling (DEFINE-COMPILER-MACRO ALL-MATCHES ...) ; compiling (DEFUN ALL-MATCHES-AS-STRINGS ...) ; file: /<>/cl-ppcre/api.lisp ; in: DEFUN ALL-MATCHES-AS-STRINGS ; (CL-PPCRE:DO-MATCHES-AS-STRINGS (CL-PPCRE::MATCH CL-PPCRE::REGEX ; CL-PPCRE::TARGET-STRING ; (NREVERSE CL-PPCRE::RESULT-LIST) :START ; CL-PPCRE::START :END CL-PPCRE::END :SHAREDP ; CL-PPCRE::SHAREDP) ; (PUSH CL-PPCRE::MATCH CL-PPCRE::RESULT-LIST)) ; --> LET LET CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* LOOP BLOCK ; --> TAGBODY PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION SETQ THE ; --> IF ; ==> ; (= #:MATCH-START2 #:MATCH-END3) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a 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 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+ ; ==> ; (+ #:MATCH-END3 1) ; ; 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 ; associate +/- of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (LENGTH CL-PPCRE::TARGET-STRING) ; ; 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 VECTOR. ; (CL-PPCRE:DO-MATCHES-AS-STRINGS (CL-PPCRE::MATCH CL-PPCRE::REGEX ; CL-PPCRE::TARGET-STRING ; (NREVERSE CL-PPCRE::RESULT-LIST) :START ; CL-PPCRE::START :END CL-PPCRE::END :SHAREDP ; CL-PPCRE::SHAREDP) ; (PUSH CL-PPCRE::MATCH CL-PPCRE::RESULT-LIST)) ; --> LET LET CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* OR LET IF ; ==> ; (LENGTH #:TARGET-STRING7) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; --> LET LET CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* SETQ THE ; --> CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND IF THE COERCE THE IF ; --> REPLACE MAKE-ARRAY ; ==> ; (LENGTH SB-C::X) ; ; 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 VECTOR. ; --> LET LET CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* SETQ THE ; --> CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND IF THE COERCE THE IF ; ==> ; (REPLACE (MAKE-ARRAY (LENGTH SB-C::X) :ELEMENT-TYPE 'CHARACTER) SB-C::X) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; --> LET LET CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* LOOP BLOCK ; --> TAGBODY PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION SETQ THE ; --> IF ; ==> ; (= #:MATCH-START2 #:MATCH-END3) ; ; note: forced to do GENERIC-= (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; --> LET LET CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* LOOP BLOCK ; --> TAGBODY PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION SETQ THE ; --> IF 1+ ; ==> ; (+ #:MATCH-END3 1) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; compiling (DEFINE-COMPILER-MACRO ALL-MATCHES-AS-STRINGS ...) ; compiling (DEFUN SPLIT ...) ; file: /<>/cl-ppcre/api.lisp ; in: DEFUN SPLIT ; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a 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 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 ; 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. ; (LOOP CL-PPCRE::FOR CL-PPCRE::REG-START CL-PPCRE::ACROSS CL-PPCRE::REG-STARTS ; CL-PPCRE::FOR CL-PPCRE::REG-END CL-PPCRE::ACROSS CL-PPCRE::REG-ENDS ; IF CL-PPCRE::REG-START ; DO ...) ; --> BLOCK LET LET TAGBODY SB-LOOP::LOOP-REALLY-DESETQ SETQ THE AREF ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-ARRAY. ; (CL-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 (>= # CL-PPCRE::LIMIT)) (RETURN)) ; (PUSH CL-PPCRE::MATCH-START CL-PPCRE::POS-LIST) ; (WHEN CL-PPCRE::WITH-REGISTERS-P ; (LOOP CL-PPCRE::FOR CL-PPCRE::REG-START CL-PPCRE::ACROSS CL-PPCRE::REG-STARTS ; CL-PPCRE::FOR CL-PPCRE::REG-END CL-PPCRE::ACROSS CL-PPCRE::REG-ENDS ; IF CL-PPCRE::REG-START ; DO ...)) ; (PUSH CL-PPCRE::MATCH-END CL-PPCRE::POS-LIST))) ; --> LET BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF ; ==> ; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; ; note: unable to ; open-code FLOAT 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 ; 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+ ; ==> ; (+ CL-PPCRE::MATCH-END 1) ; ; 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 ; associate +/- of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (> CL-PPCRE::THIS-END CL-PPCRE::THIS-START) ; ; 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. ; (LENGTH CL-PPCRE::TARGET-STRING) ; ; 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 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 (>= # CL-PPCRE::LIMIT)) (RETURN)) ; (PUSH CL-PPCRE::MATCH-START CL-PPCRE::POS-LIST) ; (WHEN CL-PPCRE::WITH-REGISTERS-P ; (LOOP CL-PPCRE::FOR CL-PPCRE::REG-START CL-PPCRE::ACROSS CL-PPCRE::REG-STARTS ; CL-PPCRE::FOR CL-PPCRE::REG-END CL-PPCRE::ACROSS CL-PPCRE::REG-ENDS ; IF CL-PPCRE::REG-START ; DO ...)) ; (PUSH CL-PPCRE::MATCH-END CL-PPCRE::POS-LIST))) ; --> LET BLOCK LET* OR LET IF ; ==> ; (LENGTH #:TARGET-STRING1) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)). ; ; 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 THE IF REPLACE MAKE-ARRAY ; ==> ; (LENGTH SB-C::X) ; ; 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 VECTOR. ; --> LET BLOCK LET* SETQ THE CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND ; --> IF THE COERCE THE IF ; ==> ; (REPLACE (MAKE-ARRAY (LENGTH SB-C::X) :ELEMENT-TYPE 'CHARACTER) SB-C::X) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; (>= (INCF CL-PPCRE::COUNTER) CL-PPCRE::LIMIT) ; --> OR LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; note: unable to open code because: The operands might not be the same type. ; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; ; note: forced to do GENERIC-= (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; (= CL-PPCRE::MATCH-START (CAR CL-PPCRE::POS-LIST)) ; ; note: forced to do GENERIC-= (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; (INCF CL-PPCRE::COUNTER) ; --> SETQ THE ; ==> ; (+ 1 CL-PPCRE::COUNTER) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; etc. ; (>= (INCF CL-PPCRE::COUNTER) CL-PPCRE::LIMIT) ; --> OR LET > IF ; ==> ; (> SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; (CL-PPCRE:DO-SCANS (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END ; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS CL-PPCRE::REGEX ; CL-PPCRE::TARGET-STRING NIL :START CL-PPCRE::START :END ; CL-PPCRE::END) ; (UNLESS ; (AND (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; (= CL-PPCRE::MATCH-START (CAR CL-PPCRE::POS-LIST))) ; (WHEN (AND CL-PPCRE::LIMIT (>= # CL-PPCRE::LIMIT)) (RETURN)) ; (PUSH CL-PPCRE::MATCH-START CL-PPCRE::POS-LIST) ; (WHEN CL-PPCRE::WITH-REGISTERS-P ; (LOOP CL-PPCRE::FOR CL-PPCRE::REG-START CL-PPCRE::ACROSS CL-PPCRE::REG-STARTS ; CL-PPCRE::FOR CL-PPCRE::REG-END CL-PPCRE::ACROSS CL-PPCRE::REG-ENDS ; IF CL-PPCRE::REG-START ; DO ...)) ; (PUSH CL-PPCRE::MATCH-END CL-PPCRE::POS-LIST))) ; --> LET BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF ; ==> ; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; ; note: forced to do GENERIC-= (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; --> LET BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+ ; ==> ; (+ CL-PPCRE::MATCH-END 1) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; (> CL-PPCRE::THIS-END CL-PPCRE::THIS-START) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; etc. ; compiling (DEFINE-COMPILER-MACRO SPLIT ...) ; compiling (DEFUN STRING-CASE-MODIFIER ...) ; file: /<>/cl-ppcre/api.lisp ; in: DEFUN STRING-CASE-MODIFIER ; (CHAR CL-PPCRE::STR (1- CL-PPCRE::FROM)) ; --> AREF ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; 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-PPCRE::STR CL-PPCRE::FROM) ; --> AREF ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; 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-PPCRE::STR CL-PPCRE::TO) ; --> AREF ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; 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-PPCRE::STR (1- CL-PPCRE::TO)) ; --> AREF ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; 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-PPCRE::STR CL-PPCRE::INDEX) ; --> AREF ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; 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. ; compiling (DEFGENERIC BUILD-REPLACEMENT-TEMPLATE ...) ; compiling (LET* (# #) ...) ; file: /<>/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) ; --> NTH-VALUE MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; ==> ; (SB-KERNEL:%FIND-POSITION-IF ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN SB-C::PREDICATE) SEQUENCE SB-C::FROM-END ; SB-C::START SB-C::END (SB-KERNEL:EFFECTIVE-FIND-POSITION-KEY SB-C::KEY)) ; ; 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)) ; --> AREF ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; 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-PPCRE:DO-MATCHES (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END ; CL-PPCRE::REG-SCANNER CL-PPCRE::REPLACEMENT-STRING) ; (WHEN (< CL-PPCRE::FROM CL-PPCRE::MATCH-START) ; (PUSH ; (SUBSEQ CL-PPCRE::REPLACEMENT-STRING CL-PPCRE::FROM ; CL-PPCRE::MATCH-START) ; CL-PPCRE::COLLECTOR)) ; (LET* ((CL-PPCRE::PARSE-START ; (POSITION-IF #'CL-PPCRE::DIGIT-CHAR-P CL-PPCRE::REPLACEMENT-STRING ; :START CL-PPCRE::MATCH-START :END ; CL-PPCRE::MATCH-END)) ; (CL-PPCRE::TOKEN ; (IF CL-PPCRE::PARSE-START ; # ; #))) ; (WHEN (AND (NUMBERP CL-PPCRE::TOKEN) (< CL-PPCRE::TOKEN 0)) ; (CL-PPCRE::SIGNAL-INVOCATION-ERROR ; "Illegal substring ~S in replacement string." ; (SUBSEQ CL-PPCRE::REPLACEMENT-STRING CL-PPCRE::MATCH-START ; CL-PPCRE::MATCH-END))) ; (PUSH CL-PPCRE::TOKEN CL-PPCRE::COLLECTOR)) ; (SETQ CL-PPCRE::FROM CL-PPCRE::MATCH-END)) ; --> CL-PPCRE:DO-SCANS LET BLOCK LET* SETQ THE ; --> CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND IF THE COERCE THE IF ; ==> ; (REPLACE (MAKE-ARRAY (LENGTH SB-C::X) :ELEMENT-TYPE 'CHARACTER) SB-C::X) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a STRING, not a SIMPLE-BASE-STRING. ; (< CL-PPCRE::FROM CL-PPCRE::MATCH-START) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; (1- ; (PARSE-INTEGER CL-PPCRE::REPLACEMENT-STRING :START CL-PPCRE::PARSE-START ; :JUNK-ALLOWED T)) ; ==> ; (- ; (PARSE-INTEGER CL-PPCRE::REPLACEMENT-STRING :START CL-PPCRE::PARSE-START ; :JUNK-ALLOWED T) ; 1) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; (< CL-PPCRE::TOKEN 0) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a INTEGER, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; etc. ; compiling (DEFMETHOD BUILD-REPLACEMENT-TEMPLATE ...) ; compiling (DEFMETHOD BUILD-REPLACEMENT-TEMPLATE ...) ; compiling (DEFMETHOD BUILD-REPLACEMENT-TEMPLATE ...) ; compiling (DEFUN BUILD-REPLACEMENT ...) ; file: /<>/cl-ppcre/api.lisp ; in: DEFUN BUILD-REPLACEMENT ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START ; CL-PPCRE::REG-END) ; --> BLOCK MAKE-ARRAY ; ==> ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: unable to ; 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) ; --> BLOCK MAKE-ARRAY ; ==> ; (- CL-PPCRE::END CL-PPCRE::START) ; ; 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 ; 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) ; --> BLOCK ; ==> ; (MAKE-ARRAY (- CL-PPCRE::END CL-PPCRE::START) :ELEMENT-TYPE ; (ARRAY-ELEMENT-TYPE SEQUENCE) :DISPLACED-TO SEQUENCE ; :DISPLACED-INDEX-OFFSET CL-PPCRE::START) ; ; note: unable to optimize because: ELEMENT-TYPE is not constant. ; (MAP 'LIST ; (LAMBDA (CL-PPCRE::REG-START CL-PPCRE::REG-END) ; (AND CL-PPCRE::REG-START ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START ; CL-PPCRE::REG-END))) ; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS) ; --> TRULY-THE ; ==> ; (SB-KERNEL:%MAP SB-C::RESULT-TYPE-ARG SB-C::FUN #:G42 #:G43) ; ; 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)) ; --> MULTIPLE-VALUE-CALL ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CL-PPCRE::TOKEN) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TOKEN is not known to be a function ; (MAP 'LIST ; (LAMBDA (CL-PPCRE::REG-START CL-PPCRE::REG-END) ; (AND CL-PPCRE::REG-START ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START ; CL-PPCRE::REG-END))) ; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS) ; --> TRULY-THE ; ==> ; (SB-KERNEL:%MAP SB-C::RESULT-TYPE-ARG SB-C::FUN #:G46 #:G47) ; ; 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) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CL-PPCRE::TOKEN) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TOKEN is not known to be a function ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START ; CL-PPCRE::REG-END) ; --> BLOCK MAKE-ARRAY ; ==> ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: unable to ; 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). ; --> BLOCK ; ==> ; (MAKE-ARRAY (- CL-PPCRE::END CL-PPCRE::START) :ELEMENT-TYPE ; (ARRAY-ELEMENT-TYPE SEQUENCE) :DISPLACED-TO SEQUENCE ; :DISPLACED-INDEX-OFFSET CL-PPCRE::START) ; ; note: unable to optimize because: ELEMENT-TYPE is not constant. ; ; note: unable to optimize because: ELEMENT-TYPE is not constant. ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::MATCH-START ; CL-PPCRE::MATCH-END) ; --> BLOCK ; ==> ; (MAKE-ARRAY (- CL-PPCRE::END CL-PPCRE::START) :ELEMENT-TYPE ; (ARRAY-ELEMENT-TYPE SEQUENCE) :DISPLACED-TO SEQUENCE ; :DISPLACED-INDEX-OFFSET CL-PPCRE::START) ; ; note: unable to optimize because: ELEMENT-TYPE is not constant. ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START ; CL-PPCRE::REG-END) ; --> BLOCK MAKE-ARRAY ; ==> ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; (>= CL-PPCRE::TOKEN CL-PPCRE::REG-BOUND) ; --> IF ; ==> ; (< SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (1+ CL-PPCRE::TOKEN) ; ==> ; (+ CL-PPCRE::TOKEN 1) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; etc. ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::MATCH-START ; CL-PPCRE::MATCH-END) ; --> BLOCK MAKE-ARRAY ; ==> ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; compiling (DEFUN REPLACE-AUX ...) ; file: /<>/cl-ppcre/api.lisp ; in: DEFUN REPLACE-AUX ; (FUNCALL ; (CL-PPCRE::STRING-CASE-MODIFIER CL-PPCRE::TARGET-STRING CL-PPCRE::FROM ; CL-PPCRE::TO CL-PPCRE::START CL-PPCRE::END) ; CL-PPCRE::CURR-REPLACEMENT) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN ; (CL-PPCRE::STRING-CASE-MODIFIER CL-PPCRE::TARGET-STRING CL-PPCRE::FROM ; CL-PPCRE::TO 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 ; compiling (DEFUN REGEX-REPLACE ...) ; file: /<>/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 (SIMPLE-ARRAY * (*)). ; ; 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. ; compiling (DEFINE-COMPILER-MACRO REGEX-REPLACE ...) ; compiling (DEFUN REGEX-REPLACE-ALL ...) ; file: /<>/cl-ppcre/api.lisp ; in: DEFUN REGEX-REPLACE-ALL ; (CL-PPCRE:DO-SCANS (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END ; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS CL-PPCRE::REGEX ; CL-PPCRE::TARGET-STRING NIL :START CL-PPCRE::START :END ; CL-PPCRE::END) ; (PUSH CL-PPCRE::MATCH-START CL-PPCRE::POS-LIST) ; (PUSH CL-PPCRE::MATCH-END CL-PPCRE::POS-LIST) ; (PUSH CL-PPCRE::REG-STARTS CL-PPCRE::REG-LIST) ; (PUSH CL-PPCRE::REG-ENDS CL-PPCRE::REG-LIST)) ; --> LET BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF ; ==> ; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; ; note: 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 ; 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+ ; ==> ; (+ CL-PPCRE::MATCH-END 1) ; ; 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 ; associate +/- of constants ; due to type uncertainty: ; The first argument is a NUMBER, 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. ; (LENGTH CL-PPCRE::TARGET-STRING) ; ; 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 VECTOR. ; (CL-PPCRE:DO-SCANS (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END ; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS CL-PPCRE::REGEX ; CL-PPCRE::TARGET-STRING NIL :START CL-PPCRE::START :END ; CL-PPCRE::END) ; (PUSH CL-PPCRE::MATCH-START CL-PPCRE::POS-LIST) ; (PUSH CL-PPCRE::MATCH-END CL-PPCRE::POS-LIST) ; (PUSH CL-PPCRE::REG-STARTS CL-PPCRE::REG-LIST) ; (PUSH CL-PPCRE::REG-ENDS CL-PPCRE::REG-LIST)) ; --> LET BLOCK LET* OR LET IF ; ==> ; (LENGTH #:TARGET-STRING1) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)). ; ; 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 THE IF REPLACE MAKE-ARRAY ; ==> ; (LENGTH SB-C::X) ; ; 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 VECTOR. ; --> LET BLOCK LET* SETQ THE CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND ; --> IF THE COERCE THE IF ; ==> ; (REPLACE (MAKE-ARRAY (LENGTH SB-C::X) :ELEMENT-TYPE 'CHARACTER) SB-C::X) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; --> LET BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF ; ==> ; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; ; note: forced to do GENERIC-= (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; --> LET BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+ ; ==> ; (+ CL-PPCRE::MATCH-END 1) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; compiling (DEFINE-COMPILER-MACRO REGEX-REPLACE-ALL ...) ; compiling (DEFMACRO REGEX-APROPOS-AUX ...) ; compiling (DEFUN REGEX-APROPOS-LIST ...) ; file: /<>/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 (SAFETY 0) (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; "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-insensitive scanner is used." ; (LET ((CL-PPCRE::COLLECTOR 'NIL)) ; (CL-PPCRE::REGEX-APROPOS-AUX (CL-PPCRE::REGEX CL-PPCRE::PACKAGES ; CL-PPCRE::CASE-INSENSITIVE ; CL-PPCRE::COLLECTOR) ; (PUSH SYMBOL CL-PPCRE::COLLECTOR)))) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-PPCRE:REGEX-APROPOS-LIST ; (CL-PPCRE::REGEX &OPTIONAL CL-PPCRE::PACKAGES &KEY ; (CL-PPCRE::CASE-INSENSITIVE T)) ; "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-insensitive scanner is used." ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (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)) ; compiling (DEFUN PRINT-SYMBOL-INFO ...) ; compiling (DEFUN REGEX-APROPOS ...) ; file: /<>/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)) ; "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 scanner ; is used." ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0))) ; (CL-PPCRE::REGEX-APROPOS-AUX (CL-PPCRE::REGEX CL-PPCRE::PACKAGES ; CL-PPCRE::CASE-INSENSITIVE) ; (CL-PPCRE::PRINT-SYMBOL-INFO SYMBOL)) ; (VALUES)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-PPCRE:REGEX-APROPOS ; (CL-PPCRE::REGEX &OPTIONAL CL-PPCRE::PACKAGES &KEY ; (CL-PPCRE::CASE-INSENSITIVE T)) ; "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 scanner ; is used." ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (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)) ; compiling (LET* (# #) ...) ; compiling (LET* (# # ...) ...) ; compiling (LET* (# # ...) ...) ; compiling (DEFUN PARSE-TREE-SYNONYM ...) ; compiling (DEFUN (SETF PARSE-TREE-SYNONYM) ...) ; compiling (DEFMACRO DEFINE-PARSE-TREE-SYNONYM ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/cl-ppcre/api-TMP.fasl written ; compilation finished in 0:00:00.263 WARNING: Lisp compilation had style-warnings while compiling # ; ; compilation unit finished ; caught 7 STYLE-WARNING conditions ; printed 885 notes ; compiling file "/<>/chaos-package.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (PUSHNEW :BIGPINK ...) ; compiling (REQUIRE :ASDF) ; compiling (DEFPACKAGE :CL-PPCRE-ASD ...) ; compiling (DEFPACKAGE :CL-PPCRE ...) ; compiling (DEFPACKAGE "CHAOS" ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/chaos-package-TMP.fasl written ; compilation finished in 0:00:00.001 ; compiling file "/<>/version.lisp" (written 23 DEC 2017 09:25:03 PM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DEFVAR CAFEOBJ-VERSION) ; compiling (DEFVAR CAFEOBJ-VERSION-MAJOR) ; compiling (DEFVAR CAFEOBJ-VERSION-MINOR) ; compiling (DEFVAR CAFEOBJ-VERSION-MEMO) ; compiling (DEFVAR PATCH-LEVEL ...) ; compiling (SETQ CAFEOBJ-VERSION-MAJOR ...) ; compiling (SETQ CAFEOBJ-VERSION-MEMO ...) ; compiling (SETQ PATCH-LEVEL ...) ; compiling (IF (NOT #) ...) ; compiling (SETQ CAFEOBJ-VERSION ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/version-TMP.fasl written ; compilation finished in 0:00:00.002 ; compiling file "/<>/comlib/globals.lisp" (written 28 DEC 2015 06:25:53 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DECLAIM (SPECIAL *CURRENT-MODULE* ...)) ; compiling (DEFVAR *TOP-LEVEL-DEFINITION-IN-PROGRESS* ...) ; compiling (DECLAIM (SPECIAL *OPEN-MODULE* ...)) ; compiling (DEFVAR *CURRENT-MODULE* ...) ; compiling (DEFVAR *CURRENT-SORT-ORDER* ...) ; compiling (DEFVAR *CURRENT-OPINFO-TABLE* ...) ; compiling (DEFVAR *CURRENT-EXT-RULE-TABLE* ...) ; compiling (DEFVAR *OPEN-MODULE* ...) ; compiling (DEFVAR *LAST-BEFORE-OPEN* ...) ; compiling (DEFVAR *CHAOS-FEATURES* ...) ; compiling (DECLAIM (SPECIAL *CHAOS-VERBOSE* ...)) ; compiling (DEFVAR *CHAOS-VERBOSE* ...) ; compiling (DEFVAR *CHAOS-QUIET* ...) ; compiling (DEFVAR *CHAOS-INPUT-SOURCE* ...) ; compiling (DECLAIM (SPECIAL *CHAOS-INPUT-LEVEL*) ...) ; compiling (DEFVAR *CHAOS-INPUT-LEVEL* ...) ; compiling (DEFVAR *CHAOS-INPUT-NESTING-LIMIT* ...) ; compiling (DECLAIM (SPECIAL *AUTO-CONTEXT-CHANGE*)) ; compiling (DEFVAR *AUTO-CONTEXT-CHANGE* ...) ; compiling (DEFVAR *SYSTEM-PRELUDE-DIR* ...) ; compiling (DEFVAR *SYSTEM-LIB-DIR* ...) ; compiling (DEFVAR *SYSTEM-EX-DIR* ...) ; compiling (DECLAIM (SPECIAL *TRACE-LEVEL*)) ; compiling (DECLAIM (TYPE # ...)) ; compiling (DEFVAR *TRACE-LEVEL* ...) ; compiling (DECLAIM (SPECIAL *SELF*)) ; compiling (DEFVAR *SELF* ...) ; compiling (DEFVAR $$COND ...) ; compiling (DEFVAR $$TRACE-REWRITE ...) ; compiling (DEFVAR $$TRACE-REWRITE-WHOLE ...) ; compiling (DEFVAR $$TRACE-PROOF ...) ; compiling (DEFVAR *PROOF-TREE* ...) ; compiling (DEFVAR *NEXT-DEFAULT-PROOF-NODE* ...) ; compiling (DEFVAR *CITP-VERBOSE* ...) ; compiling (DEFVAR *CITP-NORMALIZE-INSTANCE* ...) ; compiling (DEFVAR *REWRITE-STEPPING* ...) ; compiling (DECLAIM (TYPE # ...)) ; compiling (DEFVAR *REWRITE-COUNT-LIMIT* ...) ; compiling (DEFVAR *REWRITE-STOP-PATTERN* ...) ; compiling (DEFVAR *STEPS-TO-BE-DONE* ...) ; compiling (DEFVAR $$MOD ...) ; compiling (DEFVAR *OLD-CONTEXT* ...) ; compiling (DECLAIM (SPECIAL *OLD-CONTEXT*)) ; compiling (DECLAIM (SPECIAL *ALLOW-$$TERM*)) ; compiling (DEFVAR *ALLOW-$$TERM* ...) ; compiling (DEFVAR $$TERM ...) ; compiling (DEFVAR $$SUBTERM ...) ; compiling (DEFVAR $$TERM-CONTEXT ...) ; compiling (DEFVAR $$SELECTION-STACK ...) ; compiling (DEFVAR $$ACTION-STACK ...) ; compiling (DEFVAR $$NORM ...) ; compiling (DEFVAR $$SHOW-RED ...) ; compiling (DEFVAR *PERFORM-ON-DEMAND-REDUCTION* ...) ; compiling (DECLAIM (SPECIAL *REWRITE-EXEC-MODE*)) ; compiling (DEFVAR *REWRITE-EXEC-MODE* ...) ; compiling (DECLAIM (SPECIAL *CEXEC-TARGET*)) ; compiling (DEFVAR *CEXEC-TARGET* ...) ; compiling (DECLAIM (SPECIAL *REWRITE-EXEC-CONDITION*)) ; compiling (DEFVAR *REWRITE-EXEC-CONDITION* ...) ; compiling (DECLAIM (SPECIAL *REWRITE-SEMANTIC-REDUCE*) ...) ; compiling (DEFVAR *REWRITE-SEMANTIC-REDUCE* ...) ; compiling (DECLAIM (SPECIAL *BEH-REWRITE*) ...) ; compiling (DEFVAR *BEH-REWRITE* ...) ; compiling (DECLAIM (TYPE FIXNUM ...) ...) ; compiling (DEFVAR *RULE-COUNT* ...) ; compiling (DEFVAR *SHOW-STATS* ...) ; compiling (DEFVAR *TRY-TRY* ...) ; compiling (DEFVAR *REDUCE-CONDITIONS* ...) ; compiling (DECLAIM (TYPE FIXNUM ...)) ; compiling (DEFVAR $$TRIALS ...) ; compiling (DECLAIM (TYPE FIXNUM ...) ...) ; compiling (DEFVAR $$MATCHES ...) ; compiling (DEFVAR *ON-REDUCTION* ...) ; compiling (DEFVAR *REDUCE-BUILTIN-EAGER* ...) ; compiling (DEFPARAMETER .CONDITION-TRIAL-LIMIT-DEFAULT. ...) ; compiling (DEFVAR *CONDITION-TRIAL-LIMIT* ...) ; compiling (DEFVAR *MEL-SORT* ...) ; compiling (DEFVAR *MEL-ALWAYS* ...) ; compiling (DEFVAR *M-PATTERN-SUBST* ...) ; compiling (DEFVAR *MEMO-REWRITE* ...) ; compiling (DEFVAR *CLEAN-MEMO-IN-NORMALIZE* ...) ; compiling (DEFVAR *ALWAYS-MEMO* ...) ; compiling (DECLAIM (SPECIAL *HASH-HIT*) ...) ; compiling (DEFVAR *TERM-MEMO-HASH-HIT* ...) ; compiling (DEFVAR *ALLOW-ILLEGAL-BEH-AXIOM* ...) ; compiling (DECLAIM (SPECIAL *REGULARIZE-SIGNATURE*)) ; compiling (DEFVAR *REGULARIZE-SIGNATURE* ...) ; compiling (DEFVAR *CHECK-REGULARITY* ...) ; compiling (DECLAIM (SPECIAL *CHECK-COMPATIBILITY*)) ; compiling (DEFVAR *CHECK-COMPATIBILITY* ...) ; compiling (DECLAIM (SPECIAL *CHECK-SENSIBLENESS*)) ; compiling (DEFVAR *CHECK-SENSIBLENESS* ...) ; compiling (DECLAIM (SPECIAL *CHECK-RWL-COHERENCY*)) ; compiling (DEFVAR *CHECK-RWL-COHERENCY* ...) ; compiling (DECLAIM (SPECIAL *BUILTIN-OVERLOADING-CHECK*)) ; compiling (DEFVAR *BUILTIN-OVERLOADING-CHECK* ...) ; compiling (DECLAIM (SPECIAL *PRINT-INDENT*)) ; compiling (DECLAIM (TYPE # ...)) ; compiling (DEFVAR *MODULE-ALL-RULES-EVERY* ...) ; compiling (DEFVAR *FANCY-PRINT* ...) ; compiling (DEFVAR *PRINT-TERM-STRUCT* ...) ; compiling (DEFVAR *PRINT-XMODE* ...) ; compiling (DEFVAR *SHOW-MODE* ...) ; compiling (DEFVAR *PRINT-INDENT* ...) ; compiling (DEFPARAMETER *PRINT-INDENT-INCREMENT* ...) ; compiling (DEFVAR *PRINT-EXPLICIT* ...) ; compiling (DEFVAR *PRINT-ABBREV-MOD* ...) ; compiling (DEFVAR *PRINT-ABBREV-NUM* ...) ; compiling (DEFVAR *PRINT-ABBREV-TABLE* ...) ; compiling (DEFVAR *PRINT-ABBREV-QUALS* ...) ; compiling (DEFVAR *PRINT-WITH-SORT* ...) ; compiling (DEFVAR *PRINT-OPERATOR-TABLE* ...) ; compiling (DEFVAR *PRINT-FLAG-MODULE-VALUES* ...) ; compiling (DEFVAR *PRINT-INDENT-CONTIN* ...) ; compiling (DEFVAR *PRINT-LINE-LIMIT* ...) ; compiling (DEFVAR *PRINT-MODE* ...) ; compiling (DEFVAR *PRINT-ALL-EQNS* ...) ; compiling (DEFVAR *PRINT-EXEC-RULE* ...) ; compiling (DEFVAR *PRINT-IGNORE-MODS* ...) ; compiling (DEFVAR *CHAOS-PRINT-LEVEL* ...) ; compiling (DEFVAR *CHAOS-PRINT-LENGTH* ...) ; compiling (DEFVAR *CHAOS-PRINT-ERRORS* ...) ; compiling (DEFVAR *CHAOS-INPUT-QUIET* ...) ; compiling (DEFVAR *PRINT-VARIABLES* ...) ; compiling (DEFVAR *GRIND-BOOL-TERM* ...) ; compiling (DECLAIM (SPECIAL .FILE-COL.) ...) ; compiling (DEFVAR .FILE-COL. ...) ; compiling (DECLAIM (TYPE # ...)) ; compiling (DEFVAR *TERM-PRINT-DEPTH* ...) ; compiling (DEFVAR *SHOW-TREE-HORIZONTAL* ...) ; compiling (DEFVAR *CAFEOBJ-INPUT-QUIET* ...) ; compiling (DEFVAR $) ; compiling (DEFVAR -CAFEOBJ-LOAD-TIME- ...) ; compiling (DEFVAR *CAFEOBJ-STANDARD-PRELUDE-PATH* ...) ; compiling (DEFCONSTANT $NAME-SORT ...) ; compiling (DEFCONSTANT $NAME-GEN-SORT ...) ; compiling (DEFCONSTANT $NAME-BI-SORT ...) ; compiling (DEFCONSTANT $NAME-IDENTIFIER ...) ; compiling (DEFCONSTANT $NAME-COSMOS ...) ; compiling (DEFCONSTANT $NAME-UNIVERSAL ...) ; compiling (DEFCONSTANT $NAME-HUNIVERSAL ...) ; compiling (DEFCONSTANT $NAME-TERM ...) ; compiling (DEFCONSTANT $NAME-BOTTOM ...) ; compiling (DEFCONSTANT $NAME-HBOTTOM ...) ; compiling (DEFCONSTANT $NAME-RECORD ...) ; compiling (DEFCONSTANT $NAME-CLASS ...) ; compiling (DEFCONSTANT $NAME-AND-SORT ...) ; compiling (DEFCONSTANT $NAME-OR-SORT ...) ; compiling (DEFCONSTANT $NAME-ERR-SORT ...) ; compiling (DEFCONSTANT $NAME-OPERATOR ...) ; compiling (DEFCONSTANT $NAME-OPTHEORY ...) ; compiling (DEFCONSTANT $NAME-MODULE ...) ; compiling (DEFCONSTANT $NAME-SIGNATURE ...) ; compiling (DEFCONSTANT $NAME-AXIOMSET ...) ; compiling (DEFCONSTANT $NAME-TRS ...) ; compiling (DEFCONSTANT $NAME-AXIOM ...) ; compiling (DEFCONSTANT $NAME-CHAOS-OBJECT ...) ; compiling (DEFCONSTANT $NAME-CHAOS-EXPR ...) ; compiling (DEFCONSTANT $NAME-TERM-TYPE ...) ; compiling (DEFCONSTANT $NAME-CHAOS-LIST ...) ; compiling (DEFCONSTANT $NAME-VOID ...) ; compiling (DEFCONSTANT $NAME-IMPORT ...) ; compiling (DEFCONSTANT $NAME-SUBST ...) ; compiling (DEFCONSTANT $NAME-PARAMETER ...) ; compiling (DEFVAR *COSMOS* ...) ; compiling (DEFVAR *CHAOS-OBJECT* ...) ; compiling (DEFVAR *CHAOS-EXPR-SORT* ...) ; compiling (DEFVAR *TERM-SORT* ...) ; compiling (DEFVAR *UNIVERSAL-SORT* ...) ; compiling (DEFVAR *HUNIVERSAL-SORT* ...) ; compiling (DEFVAR *BOTTOM-SORT* ...) ; compiling (DEFVAR *HBOTTOM-SORT* ...) ; compiling (DEFVAR *SORT-SORT* ...) ; compiling (DEFVAR *GENERAL-SORT* ...) ; compiling (DEFVAR *BUILTIN-SORT* ...) ; compiling (DEFVAR *IDENTIFIER-SORT* ...) ; compiling (DEFVAR *ID-SORT* ...) ; compiling (DEFVAR *QID-SORT* ...) ; compiling (DEFVAR *SYNTAX-ERR-SORT* ...) ; compiling (DEFVAR *TYPE-ERR-SORT* ...) ; compiling (DEFVAR *OP-ERR-SORT* ...) ; compiling (DEFVAR *AND-SORT* ...) ; compiling (DEFVAR *OR-SORT* ...) ; compiling (DEFVAR *ERR-SORT* ...) ; compiling (DEFVAR *SORT-ERROR* ...) ; compiling (DEFVAR *RECORD-SORT* ...) ; compiling (DEFVAR *CLASS-SORT* ...) ; compiling (DEFVAR *OPERATOR-SORT* ...) ; compiling (DEFVAR *OPTHEORY-SORT* ...) ; compiling (DEFVAR *MODULE-SORT* ...) ; compiling (DEFVAR *IMPORT-SORT* ...) ; compiling (DEFVAR *SIGNATURE-SORT* ...) ; compiling (DEFVAR *AXIOMSET-SORT* ...) ; compiling (DEFVAR *TRS-SORT* ...) ; compiling (DEFVAR *VARIABLE-SORT* ...) ; compiling (DEFVAR *APPL-FORM-SORT* ...) ; compiling (DEFVAR *PVARIABLE-SORT* ...) ; compiling (DEFVAR *LISP-TERM-SORT* ...) ; compiling (DEFVAR *SLISP-TERM-SORT* ...) ; compiling (DEFVAR *GLISP-TERM-SORT* ...) ; compiling (DEFVAR *BCONST-TERM-SORT* ...) ; compiling (DEFVAR *MODEXPR-SORT* ...) ; compiling (DEFVAR *CHAOS-LIST-SORT* ...) ; compiling (DEFVAR *CHAOS-VOID-SORT* ...) ; compiling (DEFVAR *BOOL-SORT* ...) ; compiling (DEFVAR *SORT-ID-SORT* ...) ; compiling (DEFVAR *STRING-SORT* ...) ; compiling (DEFVAR *CHAOS-VALUE-SORT* ...) ; compiling (DEFVAR *CHARACTER-SORT* ...) ; compiling (DEFVAR *AXIOM-SORT* ...) ; compiling (DEFVAR *OBJECT-IDENTIFIER-SORT* ...) ; compiling (DEFVAR *OBJECT-SORT* ...) ; compiling (DEFVAR *RECORD-INSTANCE-SORT* ...) ; compiling (DEFVAR *CLASS-ID-SORT* ...) ; compiling (DEFVAR *RECORD-ID-SORT* ...) ; compiling (DEFVAR *ATTRIBUTE-ID-SORT* ...) ; compiling (DEFVAR *ATTRIBUTE-SORT* ...) ; compiling (DEFVAR *ATTRIBUTE-LIST-SORT* ...) ; compiling (DEFVAR *ATTR-VALUE-SORT* ...) ; compiling (DEFVAR *MESSAGE-SORT* ...) ; compiling (DEFVAR *CONFIGURATION-SORT* ...) ; compiling (DEFVAR *ACZ-CONFIGURATION-SORT* ...) ; compiling (DEFVAR *SUBST-SORT* ...) ; compiling (DEFVAR *SORT_BUILTIN* ...) ; compiling (DEFVAR *PARAMETER-SORT* ...) ; compiling (DEFVAR *CONDITION-SORT* ...) ; compiling (DEFVAR SUP-UNIVERSAL-SORT-NAME ...) ; compiling (DEFVAR SUP-HUNIVERSAL-SORT-NAME ...) ; compiling (DEFVAR *SYSTEM-STANDARD-PRELUDE* ...) ; compiling (DEFVAR *SYSTEM-SOFT-WIRED* ...) ; compiling (DEFVAR *KERNEL-HARD-WIRED-BUILTIN-MODULES* ...) ; compiling (DEFVAR *SYSTEM-MODULE* ...) ; compiling (DEFVAR *CHAOS-META* ...) ; compiling (DEFVAR *CHAOS-MODULE* ...) ; compiling (DEFVAR *CHAOS-OBJECT-MODULE* ...) ; compiling (DEFVAR *BUILTIN-METALEVEL-SORT* ...) ; compiling (DEFVAR *STRING-NOT-FOUND* ...) ; compiling (DEFVAR *CHAOS-SORT-ORDER* ...) ; compiling (DEFVAR *PARSER-SORT-ORDER* ...) ; compiling (DEFVAR *SYSTEM-OBJECT-MODULE* ...) ; compiling (DEFVAR *IDENTIFIER-MODULE* ...) ; compiling (DEFVAR *UNIVERSAL-MODULE* ...) ; compiling (DEFVAR *PARSER-MODULE* ...) ; compiling (DEFVAR *QID-MODULE* ...) ; compiling (DEFVAR *ID-MODULE* ...) ; compiling (DEFVAR .INT-MODULE. ...) ; compiling (DEFVAR *BUILTIN-METHOD* ...) ; compiling (DEFVAR *BUILTIN-OP* ...) ; compiling (DEFVAR *PARTIAL-OP* ...) ; compiling (DEFVAR *VOID-OP* ...) ; compiling (DEFVAR *PARTIAL-METHOD* ...) ; compiling (DEFVAR *VOID-METHOD* ...) ; compiling (DEFVAR *TYPE-ERR-OP* ...) ; compiling (DEFVAR *TYPE-ERR-METHOD* ...) ; compiling (DEFVAR *OP-ERR-OP* ...) ; compiling (DEFVAR *OP-ERR-METHOD* ...) ; compiling (DEFVAR *OP-TERM* ...) ; compiling (DEFVAR *TRUTH-VALUE-MODULE* ...) ; compiling (DEFVAR *TRUTH-MODULE* ...) ; compiling (DEFVAR *BOOL-MODULE* ...) ; compiling (DEFVAR *IDENTICAL-MODULE* ...) ; compiling (DEFVAR *EQL-MODULE* ...) ; compiling (DEFVAR *BOOTSTRAPPING-BOOL* ...) ; compiling (DEFVAR *BOOL-TRUE* ...) ; compiling (DEFVAR *BOOL-TRUE-METH* ...) ; compiling (DEFVAR *BOOL-FALSE* ...) ; compiling (DEFVAR *BOOL-FALSE-METH* ...) ; compiling (DEFVAR *BOOL-AND* ...) ; compiling (DEFVAR *BOOL-OR* ...) ; compiling (DEFVAR *BOOL-NOT* ...) ; compiling (DEFVAR *SORT-MEMBERSHIP* ...) ; compiling (DEFVAR *BOOL-IF* ...) ; compiling (DEFVAR *BOOL-IMPLY* ...) ; compiling (DEFVAR *BOOL-XOR* ...) ; compiling (DEFVAR *BOOL-EQUAL* ...) ; compiling (DEFVAR *BOOL-MATCH* ...) ; compiling (DEFVAR *BEH-EQUAL* ...) ; compiling (DEFVAR *BOOL-NONEQUAL* ...) ; compiling (DEFVAR *BEH-EQ-PRED* ...) ; compiling (DEFVAR *BOOL-AND-ALSO* ...) ; compiling (DEFVAR *BOOL-OR-ELSE* ...) ; compiling (DEFVAR *BOOL-IFF* ...) ; compiling (DEFVAR *BOOL-COND-OP* ...) ; compiling (DEFVAR *EQL-OP* ...) ; compiling (DEFVAR *M-AND-OP* ...) ; compiling (DEFVAR *M-OR-OP* ...) ; compiling (DEFVAR *RWL-MODULE* ...) ; compiling (DEFVAR *RWL-NAT-STAR-SORT* ...) ; compiling (DEFVAR *RWL-PREDICATE* ...) ; compiling (DEFVAR *RWL-PREDICATE2* ...) ; compiling (DEFVAR .RWL-SCH-CONTEXT. ...) ; compiling (DEFVAR .RWL-CONTEXT-STACK. ...) ; compiling (DEFVAR .RWL-STATES-SO-FAR. ...) ; compiling (DEFVAR *RWL-SEARCH-NO-STATE-REPORT* ...) ; compiling (DEFVAR *IDENTICAL* ...) ; compiling (DEFVAR *NONIDENTICAL* ...) ; compiling (DEFVAR *ATTRIBUTE-CONSTRUCTOR* ...) ; compiling (DEFVAR *ATTRIBUTE-LIST-CONSTRUCTOR* ...) ; compiling (DEFVAR *ATTRIBUTE-LIST-AUX-VARIABLE* ...) ; compiling (DEFVAR *OBJECT-REFERENCE-METHOD* ...) ; compiling (DEFVAR *OBJECT-CONSTRUCTOR-METHOD* ...) ; compiling (DEFVAR *OBJECT-CONSTRUCTOR-OP* ...) ; compiling (DEFVAR *RECORD-CONSTRUCTOR-METHOD* ...) ; compiling (DEFVAR *RECORD-CONSTRUCTOR-OP* ...) ; compiling (DEFVAR *VOID-OBJECT* ...) ; compiling (DEFVAR *VOID-RECORD* ...) ; compiling (DECLAIM (SPECIAL *PARSE-VARIABLES* ...)) ; compiling (DECLAIM (SPECIAL *READER-SCHEMA-ENV* ...)) ; compiling (DECLAIM (SPECIAL *MACROEXPAND*)) ; compiling (DEFVAR *FILL-RC-ATTRIBUTE* ...) ; compiling (DEFVAR *PARSING-AXIOM-LHS* ...) ; compiling (DEFVAR *PARSE-LHS-ATTR-VARS* ...) ; compiling (DEFVAR *LHS-ATTRID-VARS* ...) ; compiling (DEFPARAMETER .LISP-START-SYMBOL. ...) ; compiling (DEFVAR *PARSE-VARIABLES* ...) ; compiling (DEFCONSTANT PARSER-MIN-PRECEDENCE ...) ; compiling (DEFCONSTANT PARSER-MAX-PRECEDENCE ...) ; compiling (DEFVAR *READER-SCHEMA-ENV* ...) ; compiling (DEFVAR *READER-CURRENT-SCHEMA* ...) ; compiling (DEFVAR *READER-CURRENT-CONTEXT* ...) ; compiling (DEFVAR *READER-STARTING-POSITION* ...) ; compiling (DEFVAR *BUILTIN-AST-DICT* ...) ; compiling (DEFVAR *PARSE-NORMALIZE* ...) ; compiling (DEFVAR *MACROEXPAND* ...) ; compiling (DEFVAR *INCLUDE-BOOL* ...) ; compiling (DEFVAR *INCLUDE-BOOL-SAVE*) ; compiling (DEFVAR *INCLUDE-RWL* ...) ; compiling (DEFVAR *INCLUDE-FOPL* ...) ; compiling (DEFVAR *COMPILE-LISP-RHS* ...) ; compiling (DEFVAR *RUNNING-WITH-TK* ...) ; compiling (DEFVAR *SUB-PROMPT* ...) ; compiling (DEFVAR *NO-PROMPT* ...) ; compiling (DEFVAR *CONSIDER-OBJECT* ...) ; compiling (DEFVAR *AUTO-RECONSTRUCT* ...) ; compiling (DEFVAR *SAVE-DEFINITION* ...) ; compiling (DECLAIM (SPECIAL *MODMORPH-NEW-MODULE*)) ; compiling (DEFVAR *MODMORPH-NEW-MODULE* ...) ; compiling (DEFVAR *TIME-ZONE* ...) ; compiling (DEFVAR *ALLOW-GENERAL-TERM-INPUT* ...) ; compiling (DEFVAR *CHAOS-LIBPATH* ...) ; compiling (DECLAIM (SPECIAL *BEH-PROOF-IN-PROGRESS*)) ; compiling (DEFVAR *BEH-PROOF-IN-PROGRESS* ...) ; compiling (DEFVAR *USER-BOOL* ...) ; compiling (DEFVAR *TRAM-PATH* ...) ; compiling (DEFVAR *TRAM-OPTIONS* ...) ; compiling (DEFVAR *TRAM-BUILTIN-MODULES*) ; compiling (DEFVAR *TRAM-BOOL-MODULES*) ; compiling (DECLAIM (TYPE FIXNUM ...)) ; compiling (DEFVAR *CEXEC-LIMIT* ...) ; compiling (DECLAIM (TYPE # ...)) ; compiling (DEFVAR *CEXEC-TRACE* ...) ; compiling (DEFVAR *CEXEC-NORMALIZE* ...) ; compiling (DEFVAR *CEXEC-FIND-ALL-SOLUTIONS* ...) ; compiling (DEFVAR *COMPILE-BUILTIN-AXIOM* ...) ; compiling (DEFVAR *BI-UNIVERSAL-OPERATORS* ...) ; compiling (DEFVAR *ALLOW-UNIVERSAL-SORT* ...) ; compiling (DEFVAR *AUTOLOAD-ALIST* ...) ; compiling (DEFVAR *SELECT-AMBIG-TERM* ...) ; compiling (DEFVAR *ACCEPT-SYSTEM-PROOF* ...) ; compiling (DEFVAR *FIND-ALL-RULES* ...) ; compiling (DEFVAR *NO-ID-COMPLETION* ...) ; compiling (DEFVAR *REWRITE-DEBUG* ...) ; compiling (DEFVAR *ON-TERM-HASH-DEBUG* ...) ; compiling (DEFVAR *ON-AXIOM-DEBUG* ...) ; compiling (DEFVAR *BEH-DEBUG* ...) ; compiling (DEFVAR *GEN-RULE-DEBUG* ...) ; compiling (DEFVAR *ON-CHANGE-DEBUG* ...) ; compiling (DEFVAR *ON-OPERATOR-DEBUG* ...) ; compiling (DEFVAR *ON-SORT-DEBUG* ...) ; compiling (DEFVAR *ON-TRS-DEBUG* ...) ; compiling (DEFVAR *ON-IMPORT-DEBUG* ...) ; compiling (DEFVAR *ON-MODEXP-DEBUG* ...) ; compiling (DEFVAR *ON-VIEW-DEBUG* ...) ; compiling (DEFVAR *MATCH-DEBUG* ...) ; compiling (DEFVAR *MODULE-DEP-DEBUG* ...) ; compiling (DEFVAR *TERM-DEBUG* ...) ; compiling (DEFVAR *ON-PARSE-DEBUG* ...) ; compiling (DEFVAR *REGULARIZE-DEBUG* ...) ; compiling (DEFVAR *ON-TRAM-DEBUG* ...) ; compiling (DEFVAR *MEL-DEBUG* ...) ; compiling (DEFVAR *CHECK-IMPORT-MODE* ...) ; compiling (DEFVAR *CEXEC-DEBUG* ...) ; compiling (DEFVAR *DEBUG-META* ...) ; compiling (DEFVAR *DEBUG-CITP* ...) ; compiling (DEFVAR *DEBUG-PRINT* ...) ; compiling (DEFVAR *DEBUG-BTERM* ...) ; compiling (PROCLAIM (QUOTE #)) ; compiling (DEFVAR *TOP-LEVEL-TAG* ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/comlib/globals-TMP.fasl written ; compilation finished in 0:00:00.031 ; compiling file "/<>/comlib/macros.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DEFMACRO ONCE-ONLY ...) ; compiling (DEFMACRO MEMQ ...) ; compiling (DEFMACRO ASSQ ...) ; compiling (DEFMACRO POSQ ...) ; compiling (DEFMACRO MEMEQ ...) ; compiling (DEFMACRO ASSEQ ...) ; compiling (DEFMACRO POSEQ ...) ; compiling (DEFMACRO CASE-EQUAL ...) ; compiling (DEFMACRO DOTIMES-FIXNUM ...) ; compiling (DEFMACRO MSETQ ...) ; compiling (DEFMACRO MLET ...) ; compiling (DEFMACRO LET-IF ...) ; compiling (DEFMACRO WHEN-BIND ...) ; compiling (DEFMACRO WHILE ...) ; compiling (DEFMACRO WHILE-NOT ...) ; compiling (DEFMACRO DEF-SYNONYM ...) ; compiling (DEFMACRO FIXNUMP ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/comlib/macros-TMP.fasl written ; compilation finished in 0:00:00.040 ; compiling file "/<>/comlib/print-utils.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DEFUN FILECOL ...) ; compiling (DEFUN FILE-COLUMN ...) ; file: /<>/comlib/print-utils.lisp ; in: DEFUN FILE-COLUMN ; (DEFUN CHAOS::FILE-COLUMN (CHAOS::STRM) ; (DECLARE (INLINE CHAOS::FILECOL) ; (VALUES FIXNUM)) ; (CHAOS::FILECOL CHAOS::STRM)) ; --> PROGN ; ==> ; (SB-IMPL::%DEFUN 'CHAOS::FILE-COLUMN ; (SB-INT:NAMED-LAMBDA CHAOS::FILE-COLUMN ; (CHAOS::STRM) ; (DECLARE (INLINE CHAOS::FILECOL) ; (VALUES FIXNUM)) ; (BLOCK CHAOS::FILE-COLUMN (CHAOS::FILECOL CHAOS::STRM))) ; (SB-C:SOURCE-LOCATION)) ; ; caught STYLE-WARNING: ; Call to CHAOS::FILECOL 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. ; compiling (DEFUN PRINT-CHECK ...) ; file: /<>/comlib/print-utils.lisp ; in: DEFUN PRINT-CHECK ; (<= CHAOS::*PRINT-LINE-LIMIT* (+ (CHAOS::FILE-COLUMN STREAM) CHAOS::FWD)) ; --> OR LET < IF ; ==> ; (< SB-C::X SB-C::Y) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> OR LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; 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. ; (>= (1+ CHAOS::INDENT) CHAOS::*PRINT-LINE-LIMIT*) ; --> OR LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; note: unable to open code because: The operands might not be the same type. ; (<= CHAOS::*PRINT-LINE-LIMIT* (+ (CHAOS::FILE-COLUMN STREAM) CHAOS::FWD)) ; --> OR LET < IF ; ==> ; (< SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; The second argument is a (INTEGER -1073741824 1073741822), not a FIXNUM. ; (>= (1+ CHAOS::INDENT) CHAOS::*PRINT-LINE-LIMIT*) ; --> OR LET > IF ; ==> ; (> SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER -536870911 536870912), not a FIXNUM. ; The second argument is a REAL, not a FIXNUM. ; (<= CHAOS::*PRINT-LINE-LIMIT* (+ (CHAOS::FILE-COLUMN STREAM) CHAOS::FWD)) ; --> OR LET < IF ; ==> ; (< SB-C::X SB-C::Y) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-< ; (>= (1+ CHAOS::INDENT) CHAOS::*PRINT-LINE-LIMIT*) ; --> OR LET > IF ; ==> ; (> SB-C::X SB-C::Y) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-> ; --> OR LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; note: doing signed word to integer coercion (cost 20), for: ; the first argument of GENERIC-= ; (<= CHAOS::*PRINT-LINE-LIMIT* (+ (CHAOS::FILE-COLUMN STREAM) CHAOS::FWD)) ; --> OR LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of GENERIC-= ; compiling (DEFUN PRINT-INDENT ...) ; compiling (DEFPARAMETER .TERMINAL-WIDTH. ...) ; compiling (DEFUN PRINT-CENTERING ...) ; file: /<>/comlib/print-utils.lisp ; in: DEFUN PRINT-CENTERING ; (- CHAOS::.TERMINAL-WIDTH. (LENGTH STRING)) ; ; 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). ; (/ (- CHAOS::.TERMINAL-WIDTH. (LENGTH STRING)) 2.0) ; ; note: unable to ; convert to multiplication by reciprocal ; 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). ; (+ (/ (- CHAOS::.TERMINAL-WIDTH. (LENGTH STRING)) 2.0) 0.5) ; ; 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). ; (TRUNCATE (+ (/ (- CHAOS::.TERMINAL-WIDTH. (LENGTH STRING)) 2.0) 0.5)) ; --> TRUNCATE LET ; ==> ; (SB-KERNEL:%UNARY-TRUNCATE SB-C::X) ; ; 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. ; (- CHAOS::.TERMINAL-WIDTH. (LENGTH STRING)) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 32). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32) ; &REST T). ; etc. ; (/ (- CHAOS::.TERMINAL-WIDTH. (LENGTH STRING)) 2.0) ; ; note: forced to do full call ; unable to do inline float arithmetic (cost 12) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; (+ (/ (- CHAOS::.TERMINAL-WIDTH. (LENGTH STRING)) 2.0) 0.5) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT &REST ; T). ; compiling (DEFUN PRINT-TO-RIGHT ...) ; file: /<>/comlib/print-utils.lisp ; in: DEFUN PRINT-TO-RIGHT ; (- CHAOS::.TERMINAL-WIDTH. 1 (CHAOS::FILECOL STREAM) CHAOS::*PRINT-INDENT* ; (LENGTH STRING)) ; --> - - - ; ==> ; (- CHAOS::.TERMINAL-WIDTH. 1) ; ; 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). ; --> - - ; ==> ; (- (- CHAOS::.TERMINAL-WIDTH. 1) (CHAOS::FILECOL STREAM)) ; ; 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). ; --> - ; ==> ; (- (- (- CHAOS::.TERMINAL-WIDTH. 1) (CHAOS::FILECOL STREAM)) ; CHAOS::*PRINT-INDENT*) ; ; 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). ; ==> ; (- ; (- (- (- CHAOS::.TERMINAL-WIDTH. 1) (CHAOS::FILECOL STREAM)) ; CHAOS::*PRINT-INDENT*) ; (LENGTH STRING)) ; ; 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). ; --> - - - ; ==> ; (- CHAOS::.TERMINAL-WIDTH. 1) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; --> - - ; ==> ; (- (- CHAOS::.TERMINAL-WIDTH. 1) (CHAOS::FILECOL STREAM)) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 32). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32) ; &REST T). ; etc. ; --> - ; ==> ; (- (- (- CHAOS::.TERMINAL-WIDTH. 1) (CHAOS::FILECOL STREAM)) ; CHAOS::*PRINT-INDENT*) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 32). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32) ; &REST T). ; etc. ; ==> ; (- ; (- (- (- CHAOS::.TERMINAL-WIDTH. 1) (CHAOS::FILECOL STREAM)) ; CHAOS::*PRINT-INDENT*) ; (LENGTH STRING)) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 32). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 32) &REST ; T). ; etc. ; (DOTIMES ; (CHAOS::X ; (- CHAOS::.TERMINAL-WIDTH. 1 (CHAOS::FILECOL STREAM) ; CHAOS::*PRINT-INDENT* (LENGTH STRING))) ; (DECLARE (TYPE FIXNUM CHAOS::X)) ; (PRINC CHAOS::FILL-CHAR STREAM)) ; --> DO BLOCK LET TAGBODY UNLESS IF >= IF ; ==> ; (< SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a INTEGER, not a FIXNUM. ; compiling (DEFUN PRINT-TO-LEFT ...) ; file: /<>/comlib/print-utils.lisp ; in: DEFUN PRINT-TO-LEFT ; (- CHAOS::*PRINT-LINE-LIMIT* 1 CHAOS::*PRINT-INDENT* (CHAOS::FILECOL STREAM) ; (LENGTH STRING)) ; --> - - - ; ==> ; (- CHAOS::*PRINT-LINE-LIMIT* 1) ; ; 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). ; --> - - ; ==> ; (- (- CHAOS::*PRINT-LINE-LIMIT* 1) CHAOS::*PRINT-INDENT*) ; ; 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). ; --> - ; ==> ; (- (- (- CHAOS::*PRINT-LINE-LIMIT* 1) CHAOS::*PRINT-INDENT*) ; (CHAOS::FILECOL STREAM)) ; ; 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). ; ==> ; (- ; (- (- (- CHAOS::*PRINT-LINE-LIMIT* 1) CHAOS::*PRINT-INDENT*) ; (CHAOS::FILECOL STREAM)) ; (LENGTH STRING)) ; ; 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). ; --> - - - ; ==> ; (- CHAOS::*PRINT-LINE-LIMIT* 1) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; --> - - ; ==> ; (- (- CHAOS::*PRINT-LINE-LIMIT* 1) CHAOS::*PRINT-INDENT*) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 32). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32) ; &REST T). ; etc. ; --> - ; ==> ; (- (- (- CHAOS::*PRINT-LINE-LIMIT* 1) CHAOS::*PRINT-INDENT*) ; (CHAOS::FILECOL STREAM)) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 32). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32) ; &REST T). ; etc. ; ==> ; (- ; (- (- (- CHAOS::*PRINT-LINE-LIMIT* 1) CHAOS::*PRINT-INDENT*) ; (CHAOS::FILECOL STREAM)) ; (LENGTH STRING)) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 32). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 32) &REST ; T). ; etc. ; (DOTIMES ; (CHAOS::X ; (- CHAOS::*PRINT-LINE-LIMIT* 1 CHAOS::*PRINT-INDENT* ; (CHAOS::FILECOL STREAM) (LENGTH STRING))) ; (DECLARE (TYPE FIXNUM CHAOS::X)) ; (PRINC CHAOS::FILL-CHAR STREAM)) ; --> DO BLOCK LET TAGBODY UNLESS IF >= IF ; ==> ; (< SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a INTEGER, not a FIXNUM. ; compiling (DEFUN PRINT-NEXT ...) ; compiling (DEFUN PRINT-NEXT-PREFIX ...) ; compiling (DEFUN PRINT-SIMPLE ...) ; compiling (DEFUN PRINT-SIMPLE-PRINC ...) ; compiling (DEFUN PRINT-SIMPLE-PRINC-OPEN ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/comlib/print-utils-TMP.fasl written ; compilation finished in 0:00:00.028 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/<>/comlib/message.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DEFUN FLUSH-ALL ...) ; compiling (DEFUN FRESH-ALL ...) ; compiling (DEFVAR *MESSAGE-DB* ...) ; compiling (DEFUN GET-MSG-TYPE ...) ; compiling (DEFUN GET-MSG-LEVEL ...) ; compiling (DEFUN GET-MSG-FMT ...) ; compiling (DEFUN GET-MSG-DESCRIPTION ...) ; compiling (DEFUN REGISTER-MESSAGE ...) ; compiling (DEFVAR *MSG-LVL* ...) ; compiling (DEFVAR *OLD-MSG-LVL* ...) ; compiling (DEFUN SET-VERBOSE-LVL ...) ; file: /<>/comlib/message.lisp ; in: DEFUN SET-VERBOSE-LVL ; (<= CHAOS::LVL 3) ; --> OR LET < IF ; ==> ; (< SB-C::X SB-C::Y) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> OR LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; 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. ; --> OR LET < IF ; ==> ; (< SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; compiling (DEFUN SET-VERBOSE-ON ...) ; compiling (DEFUN SET-VERBOSE-OFF ...) ; file: /<>/comlib/message.lisp ; in: DEFUN SET-VERBOSE-OFF ; (ZEROP CHAOS::*MSG-LVL*) ; ==> ; (= CHAOS::*MSG-LVL* 0) ; ; 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 ; 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. ; compiling (DEFUN SET-EXPERT-ON ...) ; compiling (DEFUN SET-EXPORT-OFF ...) ; file: /<>/comlib/message.lisp ; in: DEFUN SET-EXPORT-OFF ; (= CHAOS::*MSG-LVL* 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 ; 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. ; compiling (DEFUN SET-QUIET-ON ...) ; compiling (DEFUN SET-QUIET-OFF ...) ; file: /<>/comlib/message.lisp ; in: DEFUN SET-QUIET-OFF ; (= CHAOS::*MSG-LVL* 3) ; ; 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 ; 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. ; compiling (DEFUN OUTPUT-MSG ...) ; file: /<>/comlib/message.lisp ; in: DEFUN OUTPUT-MSG ; (STRING CHAOS::ID) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a STRING. ; (>= (CHAOS::GET-MSG-LEVEL CHAOS::ID) CHAOS::*MSG-LVL*) ; --> OR LET > IF ; ==> ; (> SB-C::X SB-C::Y) ; ; 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. ; --> OR LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; 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. ; --> OR LET > IF ; ==> ; (> SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; etc. ; --> OR LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-= (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; compiling (DEFMACRO WITH-OUTPUT-CHAOS-ERROR-N ...) ; compiling (DEFMACRO WITH-OUTPUT-CHAOS-WARNING-N ...) ; compiling (DEFMACRO WITH-OUTPUT-PANIC-MESSAGE-N ...) ; compiling (DEFMACRO WITH-OUTPUT-MSG-N ...) ; compiling (DEFMACRO WITH-OUTPUT-SIMPLE-MSG-N ...) ; compiling (DEFMACRO WITH-OUTPUT-CHAOS-ERROR ...) ; compiling (DEFMACRO WITH-OUTPUT-CHAOS-WARNING ...) ; compiling (DEFMACRO WITH-OUTPUT-PANIC-MESSAGE ...) ; compiling (DEFMACRO WITH-OUTPUT-MSG ...) ; compiling (DEFMACRO WITH-OUTPUT-SIMPLE-MSG ...) ; compiling (DEFUN PRINT-IN-PROGRESS ...) ; compiling (DEFMACRO I-MISS-CURRENT-MODULE ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/comlib/message-TMP.fasl written ; compilation finished in 0:00:00.060 ; compiling file "/<>/comlib/error.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DECLAIM (SPECIAL *SUPPRESS-ERR-HANDLER-MSG*)) ; compiling (DEFVAR *SUPPRESS-ERR-HANDLER-MSG* ...) ; compiling (DEFUN CHAOS-ERROR ...) ; compiling (DEFUN GET-CHAOS-ERROR-PROC ...) ; compiling (DEFMACRO WITH-CHAOS-ERROR ...) ; compiling (DEFUN CHAOS-INDICATE-POSITION ...) ; compiling (DEFUN CHAOS-TO-TOP ...) ; compiling (DEFMACRO WITH-CHAOS-TOP-ERROR ...) ; compiling (DEFMACRO IGNORING-CHAOS-ERROR ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/comlib/error-TMP.fasl written ; compilation finished in 0:00:00.013 ; compiling file "/<>/comlib/misc.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DEFVAR *KEYWORD-PACKAGE* ...) ; compiling (DEFUN MAKE-KEYWORD ...) ; compiling (DEFUN EXTRACT-KEYWORD ...) ; file: /<>/comlib/misc.lisp ; in: DEFUN EXTRACT-KEYWORD ; (DEFUN CHAOS::EXTRACT-KEYWORD ; (CHAOS::KEY CHAOS::ARGLIST ; &OPTIONAL (CHAOS::DEFAULT NIL) ; &KEY (CHAOS::NO-VALUE NIL)) ; (DECLARE (TYPE LIST CHAOS::ARGLIST) ; (TYPE T CHAOS::DEFAULT) ; (TYPE KEYWORD CHAOS::KEY) ; (VALUES SYMBOL)) ; (LET ((CHAOS::BINDING (MEMBER CHAOS::KEY CHAOS::ARGLIST :TEST #'EQL))) ; (COND ((AND # CHAOS::NO-VALUE) CHAOS::NO-VALUE) ; ((CDR CHAOS::BINDING) (CADR CHAOS::BINDING)) (T CHAOS::DEFAULT)))) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CHAOS::EXTRACT-KEYWORD ; (CHAOS::KEY CHAOS::ARGLIST &OPTIONAL (CHAOS::DEFAULT NIL) &KEY ; (CHAOS::NO-VALUE NIL)) ; (DECLARE (TYPE LIST CHAOS::ARGLIST) ; (TYPE T CHAOS::DEFAULT) ; (TYPE KEYWORD CHAOS::KEY) ; (VALUES SYMBOL)) ; (BLOCK CHAOS::EXTRACT-KEYWORD ; (LET ((CHAOS::BINDING #)) ; (COND (# CHAOS::NO-VALUE) (# #) (T CHAOS::DEFAULT))))) ; ; caught STYLE-WARNING: ; &OPTIONAL and &KEY found in the same lambda list: (KEY ARGLIST &OPTIONAL ; (DEFAULT NIL) &KEY ; (NO-VALUE NIL)) ; compiling (DEFMACRO ALLOC-SVEC ...) ; compiling (DEFMACRO ALLOC-SVEC-FIXNUM ...) ; compiling (DEFMACRO %SVREF ...) ; compiling (DECLAIM (INLINE SVREF ...)) ; compiling (DEFUN AT-TOP-LEVEL ...) ; compiling (DEFUN GET-ENVIRONMENT-VARIABLE ...) ; compiling (DEFVAR *ON-DEBUG* ...) ; compiling (DEFVAR *DEBUG-LEVEL* ...) ; compiling (DEFMACRO DEBUG-MSG ...) ; compiling (DEFMACRO DEBUG-FORM ...) ; compiling (DEFUN ON-DEBUG ...) ; compiling (DEFUN OFF-DEBUG ...) ; compiling (DEFUN OB< ...) ; compiling (DEFUN OB-COMPARE ...) ; file: /<>/comlib/misc.lisp ; in: DEFUN OB-COMPARE ; (< (THE NUMBER CHAOS::X) (THE NUMBER CHAOS::Y)) ; ; 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. ; (< (THE NUMBER CHAOS::Y) (THE NUMBER CHAOS::X)) ; ; 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. ; (LENGTH (THE SEQUENCE CHAOS::X)) ; ; 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 VECTOR. ; (LENGTH (THE SEQUENCE CHAOS::Y)) ; ; 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 VECTOR. ; (ELT CHAOS::X CHAOS::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. ; (ELT CHAOS::Y CHAOS::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. ; (< (THE NUMBER CHAOS::X) (THE NUMBER CHAOS::Y)) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; etc. ; (< (THE NUMBER CHAOS::Y) (THE NUMBER CHAOS::X)) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; etc. ; (< (THE INTEGER CHAOS::X) (THE INTEGER CHAOS::Y)) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; (< (THE INTEGER CHAOS::Y) (THE INTEGER CHAOS::X)) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; compiling (DEFUN TOPO-SORT ...) ; file: /<>/comlib/misc.lisp ; in: DEFUN TOPO-SORT ; (FUNCALL CHAOS::PRED CHAOS::VALR CHAOS::VAL) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CHAOS::PRED) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; PRED is not known to be a function ; compiling (DEFVAR .32BIT. ...) ; compiling (DECLAIM (INLINE ADDR-OF)) ; compiling (DEFUN ADDR-OF ...) ; file: /<>/comlib/misc.lisp ; in: DEFUN ADDR-OF ; (LOGAND CHAOS::.32BIT. (SB-KERNEL:GET-LISP-OBJ-ADDRESS CHAOS::X)) ; ==> ; (LOGAND 'SB-C::DUMMY 4294967295) ; ; note: forced to do LOGAND-WORD-MASK (cost 10) ; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 32). ; etc. ; (DEFUN CHAOS::ADDR-OF (CHAOS::X) ; (LOGAND CHAOS::.32BIT. (SB-KERNEL:GET-LISP-OBJ-ADDRESS CHAOS::X))) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CHAOS::ADDR-OF ; (CHAOS::X) ; (BLOCK CHAOS::ADDR-OF ; (LOGAND CHAOS::.32BIT. (SB-KERNEL:GET-LISP-OBJ-ADDRESS CHAOS::X)))) ; ; note: doing unsigned word to integer coercion (cost 20) to "" ; compiling (DEFUN PRINT-ADDR ...) ; file: /<>/comlib/misc.lisp ; in: DEFUN PRINT-ADDR ; (CHAOS::ADDR-OF CHAOS::X) ; --> BLOCK LOGAND ; ==> ; (LOGAND 'SB-C::DUMMY 4294967295) ; ; note: forced to do LOGAND-WORD-MASK (cost 10) ; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 32). ; etc. ; (FORMAT T "0x~8,'0x" (CHAOS::ADDR-OF CHAOS::X)) ; --> FORMAT SB-INT:NAMED-LAMBDA FUNCTION BLOCK LET ; ==> ; (SB-FORMAT::FORMAT-PRINT-INTEGER STREAM SB-FORMAT::FORMAT-ARG1 NIL NIL 16 ; #:FVAR1 #:FVAR2 #:FVAR3 #:FVAR4) ; ; note: doing unsigned word to integer coercion (cost 20) ; compiling (DEFUN QUERY-INPUT ...) ; compiling (DEFUN INTERNAL-REAL-TIME-IN-SECONDS ...) ; file: /<>/comlib/misc.lisp ; in: DEFUN INTERNAL-REAL-TIME-IN-SECONDS ; (FLOAT (/ (GET-INTERNAL-REAL-TIME) INTERNAL-TIME-UNITS-PER-SECOND)) ; --> IF ; ==> ; (SB-KERNEL:%SINGLE-FLOAT SB-C::N) ; ; note: forced to do full call ; unable to do inline float coercion (cost 5) because: ; The first argument is a (RATIONAL 0 4611686018427387903/1000), not a (SIGNED-BYTE ; 32). ; unable to do inline float coercion (cost 6) because: ; The first argument is a (RATIONAL 0 4611686018427387903/1000), not a (UNSIGNED-BYTE ; 32). ; compiling (DEFUN READ-CHAR-WAIT ...) ; file: /<>/comlib/misc.lisp ; in: DEFUN READ-CHAR-WAIT ; (+ CHAOS::START CHAOS::TIMEOUT) ; ; 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 GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; (< (+ CHAOS::START CHAOS::TIMEOUT) (CHAOS::INTERNAL-REAL-TIME-IN-SECONDS)) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; compiling (DEFVAR *USE-TIMEOUTS* ...) ; compiling (DEFVAR *CLEAR-INPUT-BEFORE-QUERY* ...) ; compiling (DEFUN Y-OR-N-P-WAIT ...) ; file: /<>/comlib/misc.lisp ; in: DEFUN Y-OR-N-P-WAIT ; (FIND CHAR '(#\Tab #\Newline #\Return)) ; --> NTH-VALUE MULTIPLE-VALUE-BIND LET SB-KERNEL:%FIND-POSITION ; --> SB-KERNEL:%FIND-POSITION-IF LET LAMBDA FUNCTION FUNCALL ; ==> ; (SB-C::%FUNCALL (SB-KERNEL:%COERCE-CALLABLE-TO-FUN SB-C::TEST-FUN) SB-C::ITEM ; SB-C::I) ; ; 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 GENERIC-EQL (cost 10) ; 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. ; compiling (DEFSTRUCT (MULTISET # ...) ...) ; compiling (DEFMACRO MULTISET-NEW ...) ; compiling (DEFMACRO MULTISET-IS-EMPTY ...) ; compiling (DEFMACRO MULTISET-INSERT ...) ; compiling (DEFMACRO LIST-TO-MULTISET ...) ; compiling (DEFMACRO MULTISET-TO-SET ...) ; compiling (DEFMACRO MULTISET-DELETE ...) ; compiling (DEFMACRO MULTISET-MERGE ...) ; compiling (DEFMACRO MULTISET-INTERSECTIN ...) ; compiling (DEFMACRO MULTISET-DIFF ...) ; compiling (DEFMACRO MULTISET-COUNT ...) ; compiling (DEFMACRO MULTISET-COPY ...) ; compiling (DEFMACRO XOR ...) ; compiling (DEFMACRO NAND ...) ; compiling (DEFMACRO NOR ...) ; compiling (DEFUN GET-TIME-STRING ...) ; compiling (DEFUN ELAPSED-TIME-IN-SECONDS ...) ; file: /<>/comlib/misc.lisp ; in: DEFUN ELAPSED-TIME-IN-SECONDS ; (- CHAOS::NOW CHAOS::BASE) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 32) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 32). ; The second argument is a INTEGER, not a (SIGNED-BYTE 32). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (SIGNED-BYTE 32) &REST ; T). ; etc. ; (COERCE (/ (- CHAOS::NOW CHAOS::BASE) INTERNAL-TIME-UNITS-PER-SECOND) ; 'SINGLE-FLOAT) ; --> THE ; ==> ; (SB-KERNEL:%SINGLE-FLOAT SB-C::X) ; ; note: forced to do full call ; unable to do inline float coercion (cost 5) because: ; The first argument is a RATIONAL, not a (SIGNED-BYTE 32). ; unable to do inline float coercion (cost 6) because: ; The first argument is a RATIONAL, not a (UNSIGNED-BYTE 32). ; compiling (DEFUN TIME-IN-SECONDS ...) ; file: /<>/comlib/misc.lisp ; in: DEFUN TIME-IN-SECONDS ; (COERCE (/ CHAOS::SUM INTERNAL-TIME-UNITS-PER-SECOND) 'SINGLE-FLOAT) ; --> THE ; ==> ; (SB-KERNEL:%SINGLE-FLOAT SB-C::X) ; ; note: forced to do full call ; unable to do inline float coercion (cost 5) because: ; The first argument is a RATIONAL, not a (SIGNED-BYTE 32). ; unable to do inline float coercion (cost 6) because: ; The first argument is a RATIONAL, not a (UNSIGNED-BYTE 32). ; compiling (DEFMACRO EVERY2LEN ...) ; compiling (DEFUN LIST2ARRAY ...) ; compiling (DEFUN MAKE-LIST-1-N ...) ; compiling (DEFUN MAKE-LIST-1-N-0 ...) ; compiling (DEFMACRO FIND-IN-ASSOC-TABLE ...) ; compiling (DEFMACRO GET-ENTRY-IN-ASSOC-TABLE ...) ; compiling (DEFMACRO DELETE-ENTRY-FROM-ASSOC-TABLE ...) ; compiling (DEFMACRO DELETE-OBJECT-FROM-ASSOC-TABLE ...) ; compiling (DEFMACRO ADD-TO-ASSOC-TABLE ...) ; compiling (DEFMACRO OBJECT-IS-IN-ASSOC-TABLE? ...) ; compiling (DEFMACRO TEST-AND ...) ; compiling (DEFMACRO MAKE-AND ...) ; compiling (DEFMACRO MAKE-OR ...) ; compiling (DEFMACRO MAKE-XOR ...) ; compiling (DEFMACRO EXPT-FIXNUM ...) ; compiling (DEFMACRO EXPT2 ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/comlib/misc-TMP.fasl written ; compilation finished in 0:00:00.150 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/<>/comlib/string.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DEFUN STRING-SEARCH-CAR ...) ; file: /<>/comlib/string.lisp ; in: DEFUN STRING-SEARCH-CAR ; (POSITION-IF ; #'(LAMBDA (CHARACTER) ; (DECLARE (TYPE CHARACTER CHARACTER)) ; (WHEN (FIND CHARACTER CHAOS::CHARACTER-BAG) ; (SETQ CHAOS::DELIMITER CHARACTER))) ; STRING) ; --> NTH-VALUE MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; ==> ; (SB-KERNEL:%FIND-POSITION-IF ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN SB-C::PREDICATE) SEQUENCE SB-C::FROM-END ; SB-C::START SB-C::END (SB-KERNEL:EFFECTIVE-FIND-POSITION-KEY SB-C::KEY)) ; ; note: unable to ; expand inline ; because: ; upgraded array element type not known at compile time ; compiling (DEFUN STRING-SEARCH-CDR ...) ; file: /<>/comlib/string.lisp ; in: DEFUN STRING-SEARCH-CDR ; (POSITION-IF ; #'(LAMBDA (CHARACTER) ; (WHEN (FIND CHARACTER CHAOS::CHARACTER-BAG) ; (SETQ CHAOS::DELIMITER CHARACTER))) ; STRING) ; --> NTH-VALUE MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; ==> ; (SB-KERNEL:%FIND-POSITION-IF ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN SB-C::PREDICATE) SEQUENCE SB-C::FROM-END ; SB-C::START SB-C::END (SB-KERNEL:EFFECTIVE-FIND-POSITION-KEY SB-C::KEY)) ; ; note: unable to ; expand inline ; because: ; upgraded array element type not known at compile time ; (FIND CHARACTER CHAOS::CHARACTER-BAG) ; --> NTH-VALUE MULTIPLE-VALUE-BIND LET SB-KERNEL:%FIND-POSITION ; --> SB-KERNEL:%FIND-POSITION-IF LET LAMBDA FUNCTION FUNCALL ; ==> ; (SB-C::%FUNCALL (SB-KERNEL:%COERCE-CALLABLE-TO-FUN SB-C::TEST-FUN) SB-C::ITEM ; SB-C::I) ; ; 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 GENERIC-EQL (cost 10) ; 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. ; compiling (DEFUN PARSE-WITH-DELIMITER ...) ; file: /<>/comlib/string.lisp ; in: DEFUN PARSE-WITH-DELIMITER ; (POSITION CHAOS::DELIM CHAOS::LINE) ; --> NTH-VALUE MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; ==> ; (SB-KERNEL:%FIND-POSITION SB-C::ITEM SEQUENCE SB-C::FROM-END SB-C::START ; SB-C::END ; (SB-KERNEL:EFFECTIVE-FIND-POSITION-KEY SB-C::KEY) ; (SB-KERNEL:EFFECTIVE-FIND-POSITION-TEST SB-C::TEST ; SB-C::TEST-NOT)) ; ; note: unable to ; expand inline ; because: ; upgraded array element type not known at compile time ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a CHARACTER. ; compiling (DEFUN PARSE-WITH-DELIMITER2 ...) ; file: /<>/comlib/string.lisp ; in: DEFUN PARSE-WITH-DELIMITER2 ; (POSITION CHAOS::DELIM CHAOS::LINE) ; --> NTH-VALUE MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; ==> ; (SB-KERNEL:%FIND-POSITION SB-C::ITEM SEQUENCE SB-C::FROM-END SB-C::START ; SB-C::END ; (SB-KERNEL:EFFECTIVE-FIND-POSITION-KEY SB-C::KEY) ; (SB-KERNEL:EFFECTIVE-FIND-POSITION-TEST SB-C::TEST ; SB-C::TEST-NOT)) ; ; note: unable to ; expand inline ; because: ; upgraded array element type not known at compile time ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a CHARACTER. ; (STRING CHAOS::DELIM) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a STRING. ; compiling (DEFUN PARSE-WITH-DELIMITERS ...) ; file: /<>/comlib/string.lisp ; in: DEFUN PARSE-WITH-DELIMITERS ; (POSITION-IF #'(LAMBDA (CHARACTER) (FIND CHARACTER CHAOS::DELIMITERS)) ; CHAOS::LINE) ; --> NTH-VALUE MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; ==> ; (SB-KERNEL:%FIND-POSITION-IF ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN SB-C::PREDICATE) SEQUENCE SB-C::FROM-END ; SB-C::START SB-C::END (SB-KERNEL:EFFECTIVE-FIND-POSITION-KEY SB-C::KEY)) ; ; note: unable to ; expand inline ; because: ; upgraded array element type not known at compile time ; (FIND CHARACTER CHAOS::DELIMITERS) ; --> NTH-VALUE MULTIPLE-VALUE-BIND LET SB-KERNEL:%FIND-POSITION ; --> SB-KERNEL:%FIND-POSITION-IF LET LAMBDA FUNCTION FUNCALL ; ==> ; (SB-C::%FUNCALL (SB-KERNEL:%COERCE-CALLABLE-TO-FUN SB-C::TEST-FUN) SB-C::ITEM ; SB-C::I) ; ; 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 GENERIC-EQL (cost 10) ; 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. ; compiling (DEFUN PARALLEL-SUBSTITUTE ...) ; compiling (DEFUN PARSE-WITH-STRING-DELIMITER ...) ; file: /<>/comlib/string.lisp ; in: DEFUN PARSE-WITH-STRING-DELIMITER ; (VALUES NIL (+ CHAOS::START CHAOS::DLENGTH) NIL) ; ; note: doing signed word to integer coercion (cost 20) ; (VALUES (SUBSEQ STRING CHAOS::START CHAOS::DELIM-POS) ; (+ CHAOS::DELIM-POS CHAOS::DLENGTH) NIL) ; ; note: doing signed word to integer coercion (cost 20) ; compiling (DEFUN PARSE-WITH-STRING-DELIMITER* ...) ; compiling (DEFUN SPLIT-STRING ...) ; compiling (DEFUN EXTRACT-STRINGS ...) ; file: /<>/comlib/string.lisp ; in: DEFUN EXTRACT-STRINGS ; (POSITION-IF-NOT #'(LAMBDA (CHARACTER) (FIND CHARACTER CHAOS::DELIMITERS)) ; STRING) ; --> NTH-VALUE MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; ==> ; (SB-KERNEL:%FIND-POSITION-IF-NOT ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN SB-C::PREDICATE) SEQUENCE SB-C::FROM-END ; SB-C::START SB-C::END (SB-KERNEL:EFFECTIVE-FIND-POSITION-KEY SB-C::KEY)) ; ; note: unable to ; expand inline ; because: ; upgraded array element type not known at compile time ; (POSITION-IF #'(LAMBDA (CHARACTER) (FIND CHARACTER CHAOS::DELIMITERS)) STRING ; :START CHAOS::BEGIN) ; --> NTH-VALUE MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; ==> ; (SB-KERNEL:%FIND-POSITION-IF ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN SB-C::PREDICATE) SEQUENCE SB-C::FROM-END ; SB-C::START SB-C::END (SB-KERNEL:EFFECTIVE-FIND-POSITION-KEY SB-C::KEY)) ; ; note: unable to ; expand inline ; because: ; upgraded array element type not known at compile time ; (FIND CHARACTER CHAOS::DELIMITERS) ; --> NTH-VALUE MULTIPLE-VALUE-BIND LET SB-KERNEL:%FIND-POSITION ; --> SB-KERNEL:%FIND-POSITION-IF LET LAMBDA FUNCTION FUNCALL ; ==> ; (SB-C::%FUNCALL (SB-KERNEL:%COERCE-CALLABLE-TO-FUN SB-C::TEST-FUN) SB-C::ITEM ; SB-C::I) ; ; 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. ; ; note: forced to do GENERIC-EQL (cost 10) ; 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. ; ; note: forced to do GENERIC-EQL (cost 10) ; 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. ; compiling (DEFUN FORMAT-JUSTIFIED-STRING ...) ; file: /<>/comlib/string.lisp ; in: DEFUN FORMAT-JUSTIFIED-STRING ; (LENGTH CHAOS::CONTENT) ; ; 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 VECTOR. ; (+ CHAOS::CURSOR CHAOS::CONTENT-LENGTH) ; ; 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). ; (< (+ CHAOS::CURSOR CHAOS::CONTENT-LENGTH) CHAOS::WIDTH) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (INCF CHAOS::CURSOR CHAOS::CONTENT-LENGTH) ; --> SETQ THE ; ==> ; (+ CHAOS::CONTENT-LENGTH CHAOS::CURSOR) ; ; 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). ; (LENGTH CHAOS::CONTENT) ; ; 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 VECTOR. ; (+ CHAOS::CURSOR CHAOS::CONTENT-LENGTH) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 32). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32) ; &REST T). ; etc. ; (< (+ CHAOS::CURSOR CHAOS::CONTENT-LENGTH) CHAOS::WIDTH) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; (INCF CHAOS::CURSOR CHAOS::CONTENT-LENGTH) ; --> SETQ THE ; ==> ; (+ CHAOS::CONTENT-LENGTH CHAOS::CURSOR) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 32) arithmetic (cost 5) because: ; The second argument is a NUMBER, not a (SIGNED-BYTE 32). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32) ; &REST T). ; etc. ; (SETF CHAOS::CURSOR (+ CHAOS::PROMPT-LENGTH CHAOS::CONTENT-LENGTH)) ; ==> ; (SETQ CHAOS::CURSOR (+ CHAOS::PROMPT-LENGTH CHAOS::CONTENT-LENGTH)) ; ; note: doing signed word to integer coercion (cost 20) to CURSOR ; compiling (DEFUN NUMBER-TO-STRING ...) ; file: /<>/comlib/string.lisp ; in: DEFUN NUMBER-TO-STRING ; (TRUNCATE (LOG NUMBER CHAOS::BASE)) ; --> TRUNCATE LET ; ==> ; (SB-KERNEL:%UNARY-TRUNCATE SB-C::X) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a FLOAT, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a FLOAT, not a DOUBLE-FLOAT. ; (1+ (TRUNCATE (LOG NUMBER CHAOS::BASE))) ; ==> ; (+ (TRUNCATE (LOG NUMBER CHAOS::BASE)) 1) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; etc. ; compiling (DEFUN NULL-STRING ...) ; compiling (DEFUN READ-DELIMITED-STRING ...) ; compiling (DEFMACRO NUMERIC-CHAR-P ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/comlib/string-TMP.fasl written ; compilation finished in 0:00:00.057 ; compiling file "/<>/comlib/list.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DEFUN FLATTEN-LIST ...) ; compiling (DEFUN FIRSTN ...) ; compiling (DEFUN IN-ORDER-UNION ...) ; compiling (DEFUN TRUE-LIST-P ...) ; compiling (DEFUN ROTATE-LIST ...) ; file: /<>/comlib/list.lisp ; in: DEFUN ROTATE-LIST ; (LENGTH LIST) ; ; 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 VECTOR. ; compiling (DEFUN DELETE-NTH ...) ; file: /<>/comlib/list.lisp ; in: DEFUN DELETE-NTH ; (LENGTH CHAOS::LST) ; ; 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 VECTOR. ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/comlib/list-TMP.fasl written ; compilation finished in 0:00:00.008 ; compiling file "/<>/comlib/dag.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DEFSTRUCT DAG-NODE ...) ; compiling (DEFMACRO CREATE-DAG-NODE ...) ; compiling (DEFMACRO ADD-SUBNODES ...) ; compiling (DEFMACRO PUSH-SUB-NODE ...) ; compiling (DEFMACRO DAG-NODE-IS-MARKED? ...) ; compiling (DEFMACRO MARK-DAG-NODE ...) ; compiling (DEFMACRO UNMARK-DAG-NODE ...) ; compiling (DEFUN UNMARK-ALL-DAG-NODES ...) ; compiling (DEFUN DAG-DFS ...) ; file: /<>/comlib/dag.lisp ; in: DEFUN DAG-DFS ; (FUNCALL FUNCTION CHAOS::D) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN FUNCTION) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; FUNCTION is not known to be a function ; compiling (DEFUN DAG-WFS ...) ; file: /<>/comlib/dag.lisp ; in: DEFUN DAG-WFS ; (FUNCALL FUNCTION CHAOS::D) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN FUNCTION) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; FUNCTION is not known to be a function ; compiling (DEFSTRUCT (BDAG #) ...) ; compiling (DEFMACRO CREATE-BDAG-NODE ...) ; compiling (DEFMACRO ADD-BDAG-SUBNODES ...) ; compiling (DEFMACRO PUSH-BDAG-NODE ...) ; compiling (DEFUN GET-BDAG-PARENTS ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/comlib/dag-TMP.fasl written ; compilation finished in 0:00:00.048 ; compiling file "/<>/comlib/fsys.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (REQUIRE (QUOTE SB-POSIX)) ; compiling (DEFUN LOAD-FILE ...) ; compiling (DECLAIM (FTYPE # ...)) ; compiling (DEFUN EXPAND-FILE-NAME ...) ; compiling (DEFMACRO DOFILE ...) ; compiling (DEFUN IS-DIRECTORY? ...) ; file: /<>/comlib/fsys.lisp ; in: DEFUN IS-DIRECTORY? ; (LENGTH (NAMESTRING CHAOS::P)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; NULL), not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; NULL), not a VECTOR. ; (SUBSEQ (NAMESTRING CHAOS::P) (1- (LENGTH (NAMESTRING CHAOS::P)))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; NULL), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; NULL), not a LIST. ; compiling (DEFUN IS-SIMPLE-FILE-NAME? ...) ; file: /<>/comlib/fsys.lisp ; in: DEFUN IS-SIMPLE-FILE-NAME? ; (ERROR "is-simple-file-name? : given non string arg ~a" CHAOS::PATH) ; ==> ; "is-simple-file-name? : given non string arg ~a" ; ; note: deleting unreachable code ; ; note: deleting unreachable code ; compiling (DEFUN IS-RELATIVE-FILE-NAME? ...) ; file: /<>/comlib/fsys.lisp ; in: DEFUN IS-RELATIVE-FILE-NAME? ; (ERROR "is-relative-file-name? : given non string arg ~a" CHAOS::PATH) ; ==> ; "is-relative-file-name? : given non string arg ~a" ; ; note: deleting unreachable code ; ; note: deleting unreachable code ; compiling (DEFUN SUPPLY-SUFFIXES ...) ; file: /<>/comlib/fsys.lisp ; in: DEFUN SUPPLY-SUFFIXES ; (POSITION #\. ; (IF (PATHNAMEP CHAOS::PATH) ; (PATHNAME-NAME CHAOS::PATH) ; CHAOS::PATH) ; :FROM-END T) ; --> NTH-VALUE MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; ==> ; (SB-KERNEL:%FIND-POSITION SB-C::ITEM SEQUENCE SB-C::FROM-END SB-C::START ; SB-C::END ; (SB-KERNEL:EFFECTIVE-FIND-POSITION-KEY SB-C::KEY) ; (SB-KERNEL:EFFECTIVE-FIND-POSITION-TEST SB-C::TEST ; SB-C::TEST-NOT)) ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR NULL (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY NIL (*)) ; SIMPLE-BASE-STRING), not a LIST. ; ; note: unable to ; expand inline ; due to type uncertainty: ; The second argument is a (OR NULL (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY NIL (*)) ; SIMPLE-BASE-STRING), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR NULL (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY NIL (*)) ; SIMPLE-BASE-STRING), not a STRING. ; (MAPCAR #'PATHNAME ; (MAPCAR ; #'(LAMBDA (CHAOS::X) ; (CONCATENATE 'STRING (NAMESTRING CHAOS::PATH) ; (NAMESTRING CHAOS::X))) ; CHAOS::SUFFIXES)) ; --> LET LET SB-INT:DO-ANONYMOUS BLOCK LET TAGBODY TAGBODY SB-KERNEL:%RPLACD ; --> SETQ THE CONS FUNCALL SB-C::%FUNCALL ; ==> ; (PATHNAME (CAR #:G1)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; PATHNAME FILE-STREAM), not a PATHNAME. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; PATHNAME FILE-STREAM), not a STRING. ; compiling (DEFUN CHAOS-PROBE-FILE ...) ; file: /<>/comlib/fsys.lisp ; in: DEFUN CHAOS-PROBE-FILE ; (PATHNAME CHAOS::LIBDIR) ; ==> ; CHAOS::LIBDIR ; ; note: deleting unreachable code ; ; note: deleting unreachable code ; compiling (DEFUN BARE-CHAOS-PWD ...) ; compiling (DEFUN CHAOS-PWD ...) ; compiling (DEFUN CHAOS-RELATIVE-PATHNAME? ...) ; file: /<>/comlib/fsys.lisp ; in: DEFUN CHAOS-RELATIVE-PATHNAME? ; (PATHNAME CHAOS::F-NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; PATHNAME FILE-STREAM), not a PATHNAME. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; PATHNAME FILE-STREAM), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; PATHNAME FILE-STREAM), not a PATHNAME. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; PATHNAME FILE-STREAM), not a STRING. ; compiling (DEFUN CHAOS-GET-RELATIVE-PATH ...) ; compiling (DEFUN CHAOS-GET-DIRECTORY ...) ; file: /<>/comlib/fsys.lisp ; in: DEFUN CHAOS-GET-DIRECTORY ; (PATHNAME CHAOS::FILE-PATH) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; PATHNAME FILE-STREAM), not a PATHNAME. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; PATHNAME FILE-STREAM), not a STRING. ; compiling (DEFUN CHAOS-GET-RELATIVE-PATH* ...) ; file: /<>/comlib/fsys.lisp ; in: DEFUN CHAOS-GET-RELATIVE-PATH* ; (PATHNAME CHAOS::F-NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; PATHNAME FILE-STREAM), not a PATHNAME. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; PATHNAME FILE-STREAM), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; PATHNAME FILE-STREAM), not a PATHNAME. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; PATHNAME FILE-STREAM), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; PATHNAME FILE-STREAM), not a PATHNAME. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; PATHNAME FILE-STREAM), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; PATHNAME FILE-STREAM), not a PATHNAME. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; PATHNAME FILE-STREAM), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; PATHNAME FILE-STREAM), not a PATHNAME. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; PATHNAME FILE-STREAM), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; PATHNAME FILE-STREAM), not a PATHNAME. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; PATHNAME FILE-STREAM), not a STRING. ; compiling (DEFUN CHAOS-LS ...) ; file: /<>/comlib/fsys.lisp ; in: DEFUN CHAOS-LS ; (APPLY #'RUN-PROGRAM "/bin/sh" (LIST "-c" CHAOS::COMM) :INPUT NIL :OUTPUT ; *TERMINAL-IO* NIL) ; --> MULTIPLE-VALUE-CALL ; ==> ; (SB-C::%FUNCALL ; # ; :DEFINED-TYPE # ; :WHERE-FROM :DEFINED ; :KIND :GLOBAL-FUNCTION {D0B83F9}> ; #:G12 #:G13 #:G14 #:G15 #:G16 #:G17) ; ; note: The third argument (in keyword position) is not a constant, weakening keyword ; argument checking. ; ; note: The fifth argument (in keyword position) is not a constant, weakening keyword ; argument checking. ; compiling (DEFVAR *CHAOS-DIRECTORY-STACK* ...) ; compiling (DEFUN CHAOS-PRINT-DIRECTORY-STACK ...) ; file: /<>/comlib/fsys.lisp ; in: DEFUN CHAOS-PRINT-DIRECTORY-STACK ; (FORMAT STREAM "~%~a" CHAOS::*CHAOS-DIRECTORY-STACK*) ; ==> ; (FORMAT SB-C::DEST ; (SB-INT:NAMED-LAMBDA "~%~a" ; (STREAM SB-FORMAT::FORMAT-ARG1 &REST SB-FORMAT::ARGS) ; (DECLARE (IGNORABLE STREAM SB-FORMAT::ARGS)) ; (BLOCK NIL (TERPRI STREAM) (PRINC SB-FORMAT::FORMAT-ARG1 STREAM)) ; NIL) ; #:G3) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a NULL. ; compiling (DEFUN FSYS-PARSE-NUMBER ...) ; compiling (DEFUN CHAOS-PUSHD ...) ; file: /<>/comlib/fsys.lisp ; in: DEFUN CHAOS-PUSHD ; (LENGTH CHAOS::*CHAOS-DIRECTORY-STACK*) ; ; 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 VECTOR. ; compiling (DEFUN CHAOS-POPD ...) ; compiling (DEFUN CHAOS-CD ...) ; compiling (DEFPARAMETER *CHAOS-BINARY-MAGIC* ...) ; compiling (DEFUN CHAOS-BINARY-FILE? ...) ; compiling (DEFPARAMETER *CHAOS-BIN-SUFFIX* ...) ; compiling (DEFUN CHAOS-INPUT-FILE ...) ; file: /<>/comlib/fsys.lisp ; in: DEFUN CHAOS-INPUT-FILE ; (APPLY CHAOS::PROC CHAOS::ARGS) ; --> MULTIPLE-VALUE-CALL ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CHAOS::PROC) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (>= (FILE-WRITE-DATE CHAOS::BIN-FNAME) (FILE-WRITE-DATE CHAOS::FNAME)) ; --> IF ; ==> ; (< SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The second argument is a UNSIGNED-BYTE, not a FIXNUM. ; compiling (DEFUN SET-SEARCH-PATH ...) ; compiling (DEFUN SET-SEARCH-PATH-PLUS ...) ; compiling (DEFUN SET-SEARCH-PATH-MINUS ...) ; compiling (DEFUN PR-SEARCH-PATH ...) ; file: /<>/comlib/fsys.lisp ; in: DEFUN PR-SEARCH-PATH ; (FORMAT STREAM "libpath = ~{~a~^:~}" CHAOS::*CHAOS-LIBPATH*) ; ==> ; (FORMAT SB-C::DEST ; (SB-INT:NAMED-LAMBDA "libpath = ~{~a~^:~}" ; (STREAM SB-FORMAT::FORMAT-ARG1 &REST SB-FORMAT::ARGS) ; (DECLARE (IGNORABLE STREAM SB-FORMAT::ARGS)) ; (BLOCK NIL ; (WRITE-STRING "libpath = " STREAM) ; (LET* (# #) ; (DECLARE #) ; (LOOP # ; # ; # ; #))) ; NIL) ; #:G3) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a NULL. ; compiling (DEFUN CHAOS-INITIALIZE-FSYS ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/comlib/fsys-TMP.fasl written ; compilation finished in 0:00:00.152 ; compiling file "/<>/comlib/tree-display.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DEFPARAMETER TREE-SPACING ...) ; compiling (DEFPARAMETER LEAVES-AT-BOTTOM? ...) ; compiling (DECLAIM (SPECIAL LEAF? ...)) ; compiling (DEFVAR LEAF? ...) ; compiling (DEFVAR LEAF-NAME ...) ; compiling (DEFVAR LEAF-INFO ...) ; compiling (DEFVAR INT-NODE-NAME ...) ; compiling (DEFVAR INT-NODE-CHILDREN ...) ; compiling (DEFUN MAKE-AUGM-LEAF ...) ; compiling (DEFUN MAKE-AUGM-PAD ...) ; compiling (DEFUN MAKE-AUGM-INT-NODE ...) ; compiling (DEFUN AUGM-TREE-INT-NODE? ...) ; compiling (DEFUN AUGM-TREE-PAD? ...) ; compiling (DEFUN AUGM-TREE-WIDTH ...) ; compiling (DEFUN AUGM-TREE-ROOT ...) ; compiling (DEFUN AUGM-TREE-NAME ...) ; compiling (DEFUN AUGM-LEAF-INFO ...) ; compiling (DEFUN AUGM-INT-NODE-LPAD ...) ; compiling (DEFUN AUGM-INT-NODE-RPAD ...) ; compiling (DEFUN AUGM-INT-NODE-CHILDREN ...) ; compiling (DEFUN PAD ...) ; compiling (DEFUN FIELD-WIDTH ...) ; compiling (DEFUN AUGMENT-TREE ...) ; file: /<>/comlib/tree-display.lisp ; in: DEFUN AUGMENT-TREE ; (FUNCALL CHAOS::LEAF? CHAOS::TREE) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CHAOS::LEAF?) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (FUNCALL CHAOS::LEAF-NAME CHAOS::TREE) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CHAOS::LEAF-NAME) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (FUNCALL CHAOS::LEAF-INFO CHAOS::TREE) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CHAOS::LEAF-INFO) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (FUNCALL CHAOS::INT-NODE-CHILDREN CHAOS::TREE) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CHAOS::INT-NODE-CHILDREN) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (FUNCALL CHAOS::INT-NODE-NAME CHAOS::TREE) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CHAOS::INT-NODE-NAME) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (* (- (THE FIXNUM (LENGTH (THE LIST CHAOS::CHILDREN))) 1) CHAOS::TREE-SPACING) ; ; 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 ; convert x*2^k to shift ; due to type uncertainty: ; The second argument is a NUMBER, not a INTEGER. ; (+ (* (- (THE FIXNUM (LENGTH #)) 1) CHAOS::TREE-SPACING) ; (THE FIXNUM (APPLY #'+ (MAPCAR #'CHAOS::AUGM-TREE-WIDTH CHAOS::CHILDREN)))) ; ; 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). ; (* (- (THE FIXNUM (LENGTH (THE LIST CHAOS::CHILDREN))) 1) CHAOS::TREE-SPACING) ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 4) because: ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 32) arithmetic (cost 5) because: ; The second argument is a NUMBER, not a (SIGNED-BYTE 32). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32) ; &REST T). ; etc. ; (+ (* (- (THE FIXNUM (LENGTH #)) 1) CHAOS::TREE-SPACING) ; (THE FIXNUM (APPLY #'+ (MAPCAR #'CHAOS::AUGM-TREE-WIDTH CHAOS::CHILDREN)))) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline (signed-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 32). ; etc. ; (TRUNCATE ; (+ (- CHAOS::WIDTH (THE FIXNUM (CHAOS::AUGM-TREE-WIDTH CHAOS::LAST-CHILD))) ; (+ (THE FIXNUM (CHAOS::AUGM-TREE-ROOT CHAOS::FIRST-CHILD)) ; (THE FIXNUM (CHAOS::AUGM-TREE-ROOT CHAOS::LAST-CHILD)))) ; 2.0) ; ; note: doing signed word to integer coercion (cost 20) ; (CHAOS::MAKE-AUGM-INT-NODE (+ CHAOS::MAX-LEFT CHAOS::MAX-RIGHT) ; CHAOS::MAX-LEFT CHAOS::NAME (- CHAOS::MAX-LEFT CHAOS::LEFT) ; (- CHAOS::MAX-RIGHT CHAOS::RIGHT) CHAOS::CHILDREN) ; ; 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) ; compiling (DECLAIM (TYPE HASH-TABLE ...) ...) ; compiling (DEFVAR _DUP-HASH_ ...) ; compiling (DEFVAR _REF-NUM-COUNTER_ ...) ; compiling (DEFVAR _DUP-INFOS_ ...) ; compiling (DEFUN AUGMENT-TREE-AS-GRAPH ...) ; compiling (DEFSTRUCT GRPH-INFO ...) ; compiling (DEFSTRUCT (GRPH-INT-NODE-INFO #)) ; compiling (DEFSTRUCT (GRPH-LEAF-INFO #) ...) ; compiling (DEFUN TRAVERSE-TREE-CHECKING-DUPS ...) ; file: /<>/comlib/tree-display.lisp ; in: DEFUN TRAVERSE-TREE-CHECKING-DUPS ; (FUNCALL CHAOS::LEAF? CHAOS::TREE) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CHAOS::LEAF?) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (FUNCALL CHAOS::LEAF-NAME CHAOS::TREE) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CHAOS::LEAF-NAME) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (FUNCALL CHAOS::LEAF-INFO CHAOS::TREE) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CHAOS::LEAF-INFO) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (FUNCALL CHAOS::INT-NODE-NAME CHAOS::TREE) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CHAOS::INT-NODE-NAME) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (FUNCALL CHAOS::INT-NODE-CHILDREN CHAOS::TREE) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CHAOS::INT-NODE-CHILDREN) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; compiling (DEFUN AUGMENT-TREE-AS-GRAPH-AUX ...) ; file: /<>/comlib/tree-display.lisp ; in: DEFUN AUGMENT-TREE-AS-GRAPH-AUX ; (FUNCALL CHAOS::INT-NODE-CHILDREN CHAOS::TREE) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CHAOS::INT-NODE-CHILDREN) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (* (- (THE FIXNUM (LENGTH CHAOS::CHILDREN)) 1) CHAOS::TREE-SPACING) ; ; 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 ; convert x*2^k to shift ; due to type uncertainty: ; The second argument is a NUMBER, not a INTEGER. ; (+ (* (- (THE FIXNUM (LENGTH CHAOS::CHILDREN)) 1) CHAOS::TREE-SPACING) ; (THE FIXNUM (APPLY #'+ (MAPCAR #'CHAOS::AUGM-TREE-WIDTH CHAOS::CHILDREN)))) ; ; 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). ; (* (- (THE FIXNUM (LENGTH CHAOS::CHILDREN)) 1) CHAOS::TREE-SPACING) ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 4) because: ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 32) arithmetic (cost 5) because: ; The second argument is a NUMBER, not a (SIGNED-BYTE 32). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32) ; &REST T). ; etc. ; (+ (* (- (THE FIXNUM (LENGTH CHAOS::CHILDREN)) 1) CHAOS::TREE-SPACING) ; (THE FIXNUM (APPLY #'+ (MAPCAR #'CHAOS::AUGM-TREE-WIDTH CHAOS::CHILDREN)))) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline (signed-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 32). ; etc. ; (TRUNCATE ; (+ (- CHAOS::WIDTH (THE FIXNUM (CHAOS::AUGM-TREE-WIDTH CHAOS::LAST-CHILD))) ; (+ (THE FIXNUM (CHAOS::AUGM-TREE-ROOT CHAOS::FIRST-CHILD)) ; (THE FIXNUM (CHAOS::AUGM-TREE-ROOT CHAOS::LAST-CHILD)))) ; 2.0) ; ; note: doing signed word to integer coercion (cost 20) ; (CHAOS::MAKE-AUGM-INT-NODE (+ CHAOS::MAX-LEFT CHAOS::MAX-RIGHT) ; CHAOS::MAX-LEFT CHAOS::NAME (- CHAOS::MAX-LEFT CHAOS::LEFT) ; (- CHAOS::MAX-RIGHT CHAOS::RIGHT) CHAOS::CHILDREN) ; ; 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) ; compiling (DEFUN ANY-INT-NODES? ...) ; compiling (DEFUN ALL-DONE? ...) ; compiling (DEFUN PRINT-SEQ ...) ; compiling (DEFUN PRINT-LOOP1 ...) ; compiling (DEFUN PRINT-LOOP2 ...) ; file: /<>/comlib/tree-display.lisp ; in: DEFUN PRINT-LOOP2 ; (+ CHAOS::LPAD CHAOS::ROOT1) ; ; 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). ; (+ CHAOS::ROOT CHAOS::TREE-SPACING CHAOS::RIGHT) ; --> + ; ==> ; (+ CHAOS::ROOT CHAOS::TREE-SPACING) ; ; 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). ; ==> ; (+ (+ CHAOS::ROOT CHAOS::TREE-SPACING) CHAOS::RIGHT) ; ; 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). ; (+ CHAOS::ROOT 1) ; ; 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 ; associate +/- of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (- CHAOS::WIDTH (+ CHAOS::ROOT 1)) ; ; 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). ; (+ CHAOS::RIGHT CHAOS::RPAD) ; ; 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). ; (+ CHAOS::LPAD CHAOS::ROOT1) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (SIGNED-BYTE 32). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32) ; &REST T). ; etc. ; (+ CHAOS::ROOT CHAOS::TREE-SPACING CHAOS::RIGHT) ; --> + ; ==> ; (+ CHAOS::ROOT CHAOS::TREE-SPACING) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; ==> ; (+ (+ CHAOS::ROOT CHAOS::TREE-SPACING) CHAOS::RIGHT) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; (+ CHAOS::ROOT 1) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; (- CHAOS::WIDTH (+ CHAOS::ROOT 1)) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline (signed-byte 32) arithmetic (cost 5) because: ; The second argument is a NUMBER, not a (SIGNED-BYTE 32). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 32) ; &REST T). ; etc. ; (+ CHAOS::RIGHT CHAOS::RPAD) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES DOUBLE-FLOAT ; &REST T). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &REST T). ; etc. ; (CHAOS::PRINT-LOOP3 (CDR CHAOS::CHILDREN) ; (CONS CHAOS::CHILD1 (CHAOS::PAD CHAOS::LPAD 'NIL)) ; (- CHAOS::WIDTH1 (+ CHAOS::ROOT1 1))) ; ; note: doing signed word to integer coercion (cost 20) to RIGHT ; compiling (DEFUN PRINT-TREES ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/comlib/tree-display-TMP.fasl written ; compilation finished in 0:00:00.062 ; compiling file "/<>/comlib/lex.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DEFVAR *BUILTIN-CATS* ...) ; compiling (DEFMACRO DEFINE-BUILTIN-TOKEN ...) ; compiling (DEFMACRO DECLARE-BI-TOKEN ...) ; compiling (DEFPARAMETER *LISP-ESCAPE-CHAR* ...) ; compiling (DEFPARAMETER .LISP-SIMPLE-SEXPR. ...) ; compiling (DEFPARAMETER .LISP-GENERAL-SEXPR. ...) ; compiling (DEFPARAMETER *CHAOS-ESCAPE-CHAR* ...) ; compiling (DEFPARAMETER .CHAOS-VALUE-SEXPR. ...) ; compiling (DEFPARAMETER .STRING-TOKEN. ...) ; compiling (DECLARE-BI-TOKEN (QUOTE %SLISP)) ; compiling (DECLARE-BI-TOKEN (QUOTE %GLISP)) ; compiling (DECLARE-BI-TOKEN (QUOTE |String|)) ; compiling (DECLARE-BI-TOKEN (QUOTE |%Chaos|)) ; compiling (DECLARE-BI-TOKEN (QUOTE |#\||)) ; compiling (DECLARE-BI-TOKEN (QUOTE |\|#|)) ; compiling (DECLAIM (TYPE # ...)) ; compiling (DEFPARAMETER .READER-CHAR-CODE-LIMIT. ...) ; compiling (DECLAIM (TYPE SIMPLE-VECTOR ...)) ; compiling (DEFVAR *READER-READ-TABLE*) ; compiling (SETF *READER-READ-TABLE* ...) ; compiling (DEFMACRO !SET-SYNTAX ...) ; compiling (DEFUN LEX-SHOW-DELIMITERS ...) ; file: /<>/comlib/lex.lisp ; in: DEFUN LEX-SHOW-DELIMITERS ; (FORMAT STREAM "~%~S : ~S" (CODE-CHAR CHAOS::X) CHAOS::SYNTAX) ; ==> ; (FORMAT SB-C::DEST ; (SB-INT:NAMED-LAMBDA "~%~S : ~S" ; (STREAM SB-FORMAT::FORMAT-ARG1 SB-FORMAT::FORMAT-ARG2 &REST ; SB-FORMAT::ARGS) ; (DECLARE (IGNORABLE STREAM SB-FORMAT::ARGS)) ; (BLOCK NIL ; (TERPRI STREAM) ; (PRIN1 SB-FORMAT::FORMAT-ARG1 STREAM) ; (WRITE-STRING " : " STREAM) ; (PRIN1 SB-FORMAT::FORMAT-ARG2 STREAM)) ; NIL) ; #:G5 #:G6) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a NULL. ; compiling (DEFUN !INIT-READ-TABLE ...) ; compiling (DEFMACRO READER-GET-SYNTAX ...) ; compiling (DEFMACRO READER-VALID-CHAR-CODE ...) ; compiling (DEFUN !SET-SINGLE-READER ...) ; file: /<>/comlib/lex.lisp ; in: DEFUN !SET-SINGLE-READER ; (STRING CHAOS::X) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; CHARACTER), not a STRING. ; compiling (DEFUN !SET-READER ...) ; compiling (DEFVAR *READER-INPUT* ...) ; compiling (DEFPARAMETER *READER-VOID* ...) ; compiling (DEFVAR *TOKEN-BUF* ...) ; compiling (DEFVAR *LAST-TOKEN* ...) ; compiling (DEFPARAMETER *LEX-EOF* ...) ; compiling (DEFMACRO !READ-IN ...) ; compiling (DEFMACRO !READ-DISCARD ...) ; compiling (DEFUN !READ-SYM ...) ; compiling (DEFUN TEST-LEX ...) ; compiling (DEFPARAMETER NEWLINE-STRING ...) ; compiling (DEFPARAMETER LINE-CONTINUE-CHAR ...) ; compiling (DEFPARAMETER .READ-LINE-EOF. ...) ; compiling (DECLAIM (SPECIAL *LIVE-NEWLINE*)) ; compiling (DEFVAR *LIVE-NEWLINE* ...) ; compiling (DEFMACRO ADD-NEW-LINE ...) ; compiling (DEFUN READ-LINES ...) ; compiling (DEFVAR .READER-CH. ...) ; compiling (DECLAIM (SPECIAL .ESCAPE-CHAR.)) ; compiling (DEFVAR .DEFAULT-ESCAPE-CHAR. ...) ; compiling (DEFPARAMETER CONTROL-D ...) ; compiling (DEFPARAMETER CONTROL-D-STRING ...) ; compiling (DEFPARAMETER INPUT-ESCAPE ...) ; compiling (DEFPARAMETER INPUT-ESCAPE-STRING ...) ; compiling (DEFMACRO SEE-CTRL-D ...) ; compiling (DEFMACRO READER-IS-AT-EOF ...) ; compiling (DEFMACRO AT-EOF ...) ; compiling (DEFMACRO AT-EOF-OR-CONTROL-D ...) ; compiling (DEFMACRO SEE-INPUT-ESCAPE ...) ; compiling (DEFUN STR-MATCH? ...) ; file: /<>/comlib/lex.lisp ; in: DEFUN STR-MATCH? ; (STRING= (THE SIMPLE-STRING CHAOS::X) ; (IF (STRINGP CHAOS::Y) ; (THE SIMPLE-STRING CHAOS::Y) ; (STRING-DOWNCASE (STRING (THE SYMBOL CHAOS::Y))))) ; ==> ; (SB-KERNEL:STRING=* SB-C::STRING1 SB-C::STRING2 SB-C::START1 SB-C::END1 ; SB-C::START2 SB-C::END2) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SIMPLE-STRING, not a SIMPLE-BASE-STRING. ; The second argument is a SIMPLE-STRING, not a SIMPLE-BASE-STRING. ; compiling (DEFUN LEX-STRING-MATCH ...) ; compiling (DECLAIM (SPECIAL .READER-ESCAPE.)) ; compiling (DEFVAR .READER-ESCAPE. ...) ; compiling (DEFVAR .NEWLINE-COUNT. ...) ; compiling (DEFVAR *LAST-NEWLINE* ...) ; compiling (DEFPARAMETER EOF-CHAR ...) ; compiling (DEFUN READER-GET-CHAR ...) ; file: /<>/comlib/lex.lisp ; in: DEFUN READER-GET-CHAR ; (INCF CHAOS::.NEWLINE-COUNT.) ; --> SETQ THE ; ==> ; (+ 1 CHAOS::.NEWLINE-COUNT.) ; ; 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 ; associate +/- of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (> CHAOS::.NEWLINE-COUNT. 2) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (INCF CHAOS::.NEWLINE-COUNT.) ; --> SETQ THE ; ==> ; (+ 1 CHAOS::.NEWLINE-COUNT.) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; (> CHAOS::.NEWLINE-COUNT. 2) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; compiling (DECLAIM (TYPE SIMPLE-STRING ...)) ; compiling (DEFVAR .READER-BUF. ...) ; compiling (DEFPARAMETER .CHAOS-SIMPLE-LISP-KEYWORD. ...) ; compiling (DEFPARAMETER .CHAOS-GENERAL-LISP-KEYWORD. ...) ; compiling (DEFPARAMETER .CHAOS-VALUE-KEYWORD. ...) ; compiling (DEFPARAMETER .ML-BEGIN-CHAR. ...) ; compiling (DEFPARAMETER .ML-END-CHAR. ...) ; compiling (DEFVAR .LEX-INNER-MULTI-COMMENT. ...) ; compiling (DEFUN READ-LEXICON ...) ; file: /<>/comlib/lex.lisp ; in: DEFUN READ-LEXICON ; (STRING CHAOS::.READER-CH.) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a STRING. ; compiling (DEFUN LEX-CONSIDER-TOKEN ...) ; compiling (DEFUN READER-SUPPRESS-CH ...) ; file: /<>/comlib/lex.lisp ; in: DEFUN READER-SUPPRESS-CH ; (STRING CHAOS::.READER-CH.) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a STRING. ; compiling (DEFUN READER-UNREAD ...) ; compiling (DEFUN SKIP-MULTI-COMMENT ...) ; compiling (DEFUN UNREAD-TOKEN ...) ; compiling (DEFUN READ-SYM ...) ; file: /<>/comlib/lex.lisp ; in: DEFUN READ-SYM ; (STRING CHAOS::.READER-CH.) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a STRING. ; compiling (DEFUN LEX-READ-STRING ...) ; compiling (DEFUN LEX-READ-LISP-ESCAPE ...) ; compiling (DEFUN LEX-READ-CHAOS-VALUE ...) ; compiling (DEFUN LEX-READ-LIST ...) ; compiling (DEFUN LEX-READ-REST-OF-LIST ...) ; compiling (DEFUN BI-TOKEN? ...) ; compiling (DEFUN LEX-READ ...) ; compiling (DEFMACRO ALL-DIGIT? ...) ; compiling (DEFPARAMETER .DEFAULT-SPACE-CHARS. ...) ; compiling (DEFPARAMETER .DEFAULT-RETURN-CHARS. ...) ; compiling (DEFPARAMETER .DEFAULT-SINGLE-CHARS. ...) ; compiling (DEFUN !FORCE-SINGLE-READER ...) ; file: /<>/comlib/lex.lisp ; in: DEFUN !FORCE-SINGLE-READER ; (CHAR (THE STRING CHAOS::X) 0) ; --> AREF ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; 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. ; (STRING CHAOS::X) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a STRING. ; compiling (DEFUN !UNSET-SINGLE-READER ...) ; file: /<>/comlib/lex.lisp ; in: DEFUN !UNSET-SINGLE-READER ; (CHAR (THE STRING CHAOS::X) 0) ; --> AREF ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; 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. ; (ASSOC CHAOS::CHR CHAOS::.DEFAULT-SINGLE-CHARS.) ; ==> ; (SB-KERNEL:%ASSOC SB-C::ITEM LIST) ; ; note: unable to ; optimize ; due to type uncertainty: ; can't tell whether the first argument is a (OR FIXNUM (NOT NUMBER)) ; compiling (DEFUN !LEX-READ-INIT ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/comlib/lex-TMP.fasl written ; compilation finished in 0:00:00.133 ; compiling file "/<>/comlib/reader.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DEFVAR *READER-SPECIAL-SCHEMA-PATTERNS* ...) ; compiling (DEFUN READER ...) ; compiling (DEFUN ABORT-GENERAL-READER ...) ; compiling (DEFUN GENERAL-READ-EOF-ERROR ...) ; compiling (DEFUN GENERAL-READ-ABORT ...) ; compiling (DEFUN STRING-MATCH ...) ; file: /<>/comlib/reader.lisp ; in: DEFUN STRING-MATCH ; (STRING CHAOS::Y) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a STRING. ; (STRING= (THE SIMPLE-STRING CHAOS::X) ; (IF (STRINGP CHAOS::Y) ; (THE SIMPLE-STRING CHAOS::Y) ; (THE SIMPLE-STRING (STRING-DOWNCASE (STRING CHAOS::Y))))) ; ==> ; (SB-KERNEL:STRING=* SB-C::STRING1 SB-C::STRING2 SB-C::START1 SB-C::END1 ; SB-C::START2 SB-C::END2) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SIMPLE-STRING, not a SIMPLE-BASE-STRING. ; The second argument is a SIMPLE-STRING, not a SIMPLE-BASE-STRING. ; compiling (DEFUN GENERAL-READ-STRING-MATCHES ...) ; file: /<>/comlib/reader.lisp ; in: DEFUN GENERAL-READ-STRING-MATCHES ; (FUNCALL (CADR CHAOS::Y) CHAOS::X) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN (CADR CHAOS::Y)) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; compiling (DEFUN GENERAL-READ-NUMBERP ...) ; compiling (DEFUN GENERAL-READ ...) ; compiling (DEFUN READ-NAMED ...) ; compiling (DEFUN READ-OPTIONAL ...) ; compiling (DEFUN READ-IF-PRESENT ...) ; compiling (DEFUN READ-ONE-OF ...) ; compiling (DEFUN READ-ONE-OF-DEFAULT ...) ; compiling (DEFUN READ-MANY-OF ...) ; compiling (DEFUN READ-SEQ-OF ...) ; compiling (DEFUN READ-ANY-ONE ...) ; compiling (DEFUN READ-CONTINUE ...) ; compiling (DEFUN READ-CONTINUE-APPEND ...) ; compiling (DEFUN GENERAL-READ-SHOW-CONTEXT ...) ; compiling (DEFUN GENERAL-READ-IS-SIMPLE-SCHEMA ...) ; compiling (DEFUN GENERAL-READ-DISPLAY-SCHEMA ...) ; compiling (DEFUN GENERAL-READ-PRINT-SCHEMA-1 ...) ; compiling (DEFUN GENERAL-READ-PRINT-SCHEMA ...) ; file: /<>/comlib/reader.lisp ; in: DEFUN GENERAL-READ-PRINT-SCHEMA ; (< CHAOS::*PRINT-LINE-LIMIT* (CHAOS::FILECOL *STANDARD-OUTPUT*)) ; ; 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. ; (EQL CHAOS::CONTROL-D CHAOS::I) ; ; 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. ; (< CHAOS::*PRINT-LINE-LIMIT* (CHAOS::FILECOL *STANDARD-OUTPUT*)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; etc. ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; etc. ; (EQL CHAOS::CONTROL-D CHAOS::I) ; ; note: forced to do GENERIC-EQL (cost 10) ; 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. ; compiling (DEFUN READ-COMMENT-LINE ...) ; compiling (DEFUN GENERAL-READ-COMMENTLONG ...) ; compiling (DECLAIM (INLINE READ-TERM-FROM-STRING)) ; compiling (DEFPARAMETER .TERM-DELIMITING-CHARS. ...) ; compiling (DEFUN !SET-TERM-DELIM-CHARS ...) ; compiling (DEFUN READ-TERM-FROM-STRING ...) ; compiling (DEFUN READ-SEQ-OF-TERM-FROM-STRING ...) ; compiling (DEFUN READ-TERM-AT-TOP ...) ; compiling (DEFUN READ-SEQ-OF-TERM-AT-TOP ...) ; compiling (DEFUN READ-TERM ...) ; compiling (DEFUN READ-SEQ-OF-TERM ...) ; compiling (DEFUN READ-ARGS ...) ; compiling (DEFPARAMETER .OP-NAME-DELIMITING-CHARS. ...) ; compiling (DEFUN READ-SEQ-OF-OPNAME ...) ; compiling (DEFUN READ-OPNAME ...) ; compiling (DEFUN READ-OPNAME-AT-TOP ...) ; compiling (DEFUN READ-SEQ-OF-OPNAME-AT-TOP ...) ; compiling (DEFUN READ-OPNAME-FROM-STRING ...) ; compiling (DEFUN READ-SEQ-OF-OPNAME-FROM-STRING ...) ; compiling (DEFUN READ-SORT ...) ; compiling (DEFUN READ-SORTS ...) ; compiling (DEFUN READ-CHARS ...) ; compiling (DEFUN READ-OPATTR ...) ; compiling (DEFUN READ-SUPER-EXP ...) ; compiling (DEFUN READ-SUPEREXP ...) ; compiling (DEFUN READ-SUPEREXPR-DELIMITED ...) ; compiling (DEFVAR *MODEXP-PARSE-INPUT* ...) ; compiling (DEFMACRO MODEXP-SKIP ...) ; compiling (DEFUN SCAN-PARENTHESIZED-UNIT ...) ; compiling (DEFUN GROUP-PAREN-UNITS ...) ; compiling (DEFUN CHECK-ENCLOSING-PARENS ...) ; compiling (DEFUN READ-MODULE-EXP ...) ; compiling (DEFUN READ-MODEXP ...) ; compiling (DEFUN READ-MODEXP-DELIMITED ...) ; compiling (DEFUN READ-MODEXP-FROM-STRING ...) ; compiling (DEFVAR *INTERACTIVE-SESSION* ...) ; compiling (DEFUN SET-INTERACTIVE ...) ; compiling (DEFUN OFF-INTERACTIVE ...) ; compiling (DEFUN WAIT-UNTIL-NON-WHITE ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/comlib/reader-TMP.fasl written ; compilation finished in 0:00:00.087 ; compiling file "/<>/comlib/let-over-lambda.lisp" (written 09 SEP 2015 05:53:34 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (IF (STRING-LESSP # ...) ...) ; compiling (DEFUN GROUP ...) ; compiling (DEFUN MKSTR ...) ; compiling (DEFUN SYMB ...) ; compiling (DEFUN FLATTEN ...) ; compiling (DEFUN G!-SYMBOL-P ...) ; compiling (DEFUN O!-SYMBOL-P ...) ; compiling (DEFUN O!-SYMBOL-TO-G!-SYMBOL ...) ; compiling (DEFMACRO DEFMACRO/G! ...) ; compiling (DEFMACRO DEFMACRO! ...) ; compiling (DEFUN |#"-reader| ...) ; compiling (SET-DISPATCH-MACRO-CHARACTER #\# ...) ; compiling (DEFUN |#>-reader| ...) ; compiling (SET-DISPATCH-MACRO-CHARACTER #\# ...) ; compiling (DEFUN SEGMENT-READER ...) ; compiling (DEFMACRO! MATCH-MODE-PPCRE-LAMBDA-FORM ...) ; compiling (DEFMACRO! SUBST-MODE-PPCRE-LAMBDA-FORM ...) ; compiling (DEFUN |#~-reader| ...) ; compiling (SET-DISPATCH-MACRO-CHARACTER #\# ...) ; compiling (DEFMACRO! DLAMBDA ...) ; compiling (DEFMACRO ALAMBDA ...) ; compiling (DEFMACRO AIF ...) ; compiling (DEFUN |#`-reader| ...) ; compiling (SET-DISPATCH-MACRO-CHARACTER #\# ...) ; compiling (DEFMACRO ALET% ...) ; compiling (DEFMACRO ALET ...) ; compiling (DEFUN LET-BINDING-TRANSFORM ...) ; compiling (DEFMACRO PANDORICLET ...) ; compiling (DEFUN PANDORICLET-GET ...) ; compiling (DEFUN PANDORICLET-SET ...) ; compiling (DECLAIM (INLINE GET-PANDORIC)) ; compiling (DEFUN GET-PANDORIC ...) ; compiling (DEFSETF GET-PANDORIC ...) ; compiling (DEFMACRO WITH-PANDORIC ...) ; compiling (DEFUN PANDORIC-HOTPATCH ...) ; compiling (DEFMACRO PANDORIC-RECODE ...) ; compiling (DEFMACRO PLAMBDA ...) ; compiling (DEFVAR PANDORIC-EVAL-TUNNEL) ; compiling (DEFMACRO PANDORIC-EVAL ...) ; compiling (SET-DISPATCH-MACRO-CHARACTER #\# ...) ; compiling (DEFMACRO FAST-PROGN ...) ; compiling (DEFMACRO SAFE-PROGN ...) ; compiling (DEFUN FFORMAT ...) ; compiling (DEFINE-COMPILER-MACRO FFORMAT ...) ; compiling (DECLAIM (INLINE MAKE-TLIST ...)) ; compiling (DEFUN MAKE-TLIST ...) ; compiling (DEFUN TLIST-LEFT ...) ; compiling (DEFUN TLIST-RIGHT ...) ; compiling (DEFUN TLIST-EMPTY-P ...) ; compiling (DECLAIM (INLINE TLIST-ADD-LEFT ...)) ; compiling (DEFUN TLIST-ADD-LEFT ...) ; compiling (DEFUN TLIST-ADD-RIGHT ...) ; compiling (DECLAIM (INLINE TLIST-REM-LEFT)) ; compiling (DEFUN TLIST-REM-LEFT ...) ; compiling (DECLAIM (INLINE TLIST-UPDATE)) ; compiling (DEFUN TLIST-UPDATE ...) ; compiling (DEFUN BUILD-BATCHER-SN ...) ; compiling (DEFMACRO! SORTF ...) ; compiling (DEFUN DOLLAR-SYMBOL-P ...) ; compiling (DEFUN PRUNE-IF-MATCH-BODIES-FROM-SUB-LEXICAL-SCOPE ...) ; compiling (DEFMACRO! IF-MATCH ...) ; compiling (DEFMACRO WHEN-MATCH ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/comlib/let-over-lambda-TMP.fasl written ; compilation finished in 0:00:00.148 ; compiling file "/<>/chaos/primitives/term2.lisp" (written 28 DEC 2015 06:25:53 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DEFTYPE TERM ...) ; compiling (DEFTYPE TERM-BODY ...) ; compiling (DEFMACRO TERMP ...) ; compiling (DEFUN IS-TERM? ...) ; compiling (DEFMACRO TERM-BODY ...) ; compiling (DEFMACRO CREATE-TERM ...) ; compiling (DEFMACRO NEW-TERM ...) ; compiling (DEFMACRO TERM-EQ ...) ; compiling (DEFMACRO TERM-EQUAL ...) ; compiling (DEFUN !TERM-EQ ...) ; compiling (DEFMACRO TERM-REPLACE ...) ; compiling (DEFCONSTANT VARIABLE-TYPE ...) ; compiling (DEFCONSTANT APPLICATION-FORM-TYPE ...) ; compiling (DEFCONSTANT SIMPLE-LISP-CODE-TYPE ...) ; compiling (DEFCONSTANT GENERAL-LISP-CODE-TYPE ...) ; compiling (DEFCONSTANT LISP-CODE-TYPE ...) ; compiling (DEFCONSTANT PSUEDO-CONSTANT-TYPE ...) ; compiling (DEFCONSTANT PURE-BUILTIN-CONSTANT-TYPE ...) ; compiling (DEFCONSTANT SYSTEM-OBJECT-TYPE ...) ; compiling (DEFCONSTANT BUILTIN-CONSTANT-TYPE ...) ; compiling (DEFCONSTANT PRE-ENCODE-BIT ...) ; compiling (DEFCONSTANT PRE-VARIABLE-TYPE ...) ; compiling (DEFCONSTANT PRE-APPLICATION-FORM-TYPE ...) ; compiling (DEFCONSTANT PRE-SIMPLE-LISP-CODE-TYPE ...) ; compiling (DEFCONSTANT PRE-GENERAL-LISP-CODE-TYPE ...) ; compiling (DEFCONSTANT PRE-LISP-CODE-TYPE ...) ; compiling (DEFCONSTANT PRE-PSUEDO-CONSTANT-TYPE ...) ; compiling (DEFCONSTANT PRE-BUILTIN-CONSTANT-TYPE ...) ; compiling (DEFCONSTANT PRE-PURE-BUILTIN-CONSTANT-TYPE ...) ; compiling (DEFCONSTANT PRE-SYSTEM-OBJECT-TYPE ...) ; compiling (DEFCONSTANT REDUCED-FLAG ...) ; compiling (DEFCONSTANT LOWEST-PARSED-FLAG ...) ; compiling (DEFCONSTANT ON-DEMAND-FLAG ...) ; compiling (DEFCONSTANT RED-FLAG ...) ; compiling (DEFMACRO BODY-1ST ...) ; compiling (DEFMACRO BODY-2ND ...) ; compiling (DEFMACRO BODY-3RD ...) ; compiling (DEFMACRO BODY-4TH ...) ; compiling (DEFMACRO TERM-1ST ...) ; compiling (DEFMACRO TERM-2ND ...) ; compiling (DEFMACRO TERM-3RD ...) ; compiling (DEFMACRO TERM-4TH ...) ; compiling (DEFMACRO TERM$CODE ...) ; compiling (DEFMACRO TERM-CODE ...) ; compiling (DEFCONSTANT TERM-TYPE-MASK ...) ; compiling (DEFMACRO TERM-TYPE-EQ ...) ; compiling (DEFUN TERM-TYPE ...) ; compiling (DEFMACRO TERM$SORT ...) ; compiling (DEFMACRO TERM$SORT-CODE ...) ; compiling (DEFMACRO TERM-SORT ...) ; compiling (DEFMACRO TERM-SORT-CODE ...) ; compiling (DEFMACRO VARIABLE$SORT ...) ; compiling (DEFMACRO VARIABLE-SORT ...) ; compiling (DEFMACRO TERM$OP-CODE ...) ; compiling (DEFMACRO TERM$METHOD ...) ; compiling (DEFMACRO TERM$HEAD ...) ; compiling (DEFMACRO TERM-OP-CODE ...) ; compiling (DEFMACRO TERM-METHOD ...) ; compiling (DEFMACRO TERM-HEAD ...) ; compiling (DEFMACRO CHANGE$HEAD-OPERATOR ...) ; compiling (DEFMACRO CHANGE-HEAD-OPERATOR ...) ; compiling (DEFMACRO TERM$VARIABLE-CODE ...) ; compiling (DEFMACRO VARIABLE$NAME ...) ; compiling (DEFMACRO VARIABLE$PRINT-NAME ...) ; compiling (DEFMACRO TERM-VARIABLE-CODE ...) ; compiling (DEFMACRO VARIABLE-NAME ...) ; compiling (DEFMACRO VARIABLE-PRINT-NAME ...) ; compiling (DEFMACRO TERM$BUILTIN-VALUE ...) ; compiling (DEFMACRO TERM-BUILTIN-VALUE ...) ; compiling (DEFMACRO CHAOS-FORM-EXPR ...) ; compiling (DEFMACRO CHAOS-ORIGINAL-EXPR ...) ; compiling (DEFMACRO TERM$PSUEDO-CONSTANT-CODE ...) ; compiling (DEFMACRO TERM$PSUEDO-CONSTANT-NAME ...) ; compiling (DEFMACRO PSUEDO-CONSTANT-CODE ...) ; compiling (DEFMACRO PSUEDO-CONSTANT-NAME ...) ; compiling (DEFMACRO TERM$LISP-FUNCTION ...) ; compiling (DEFMACRO TERM-LISP-FUNCTION ...) ; compiling (DEFMACRO LISP-FORM-FUNCTION ...) ; compiling (DEFMACRO TERM$SYSTEM-OBJECT ...) ; compiling (DEFMACRO TERM-SYSTEM-OBJECT ...) ; compiling (DEFMACRO TERM$LISP-CODE-ORIGINAL-FORM ...) ; compiling (DEFMACRO TERM$LISP-FORM-ORIGINAL-FORM ...) ; compiling (DEFMACRO LISP-CODE-ORIGINAL-FORM ...) ; compiling (DEFMACRO LISP-FORM-ORIGINAL-FORM ...) ; compiling (DEFMACRO TERM$SUBTERMS ...) ; compiling (DEFMACRO TERM-SUBTERMS ...) ; compiling (DEFMACRO TERM$ARG-1 ...) ; compiling (DEFMACRO TERM$ARG-2 ...) ; compiling (DEFMACRO TERM$ARG-3 ...) ; compiling (DEFMACRO TERM$ARG-4 ...) ; compiling (DEFMACRO TERM$ARG-N ...) ; compiling (DEFMACRO TERM-ARG-1 ...) ; compiling (DEFMACRO TERM-ARG-2 ...) ; compiling (DEFMACRO TERM-ARG-3 ...) ; compiling (DEFMACRO TERM-ARG-4 ...) ; compiling (DEFMACRO TERM-ARG-N ...) ; compiling (DEFMACRO TERM-CODE$IS-DECODED? ...) ; compiling (DEFMACRO TERM-CODE$IS-VARIABLE? ...) ; compiling (DEFMACRO TERM-CODE$IS-APPLICATION-FORM? ...) ; compiling (DEFMACRO TERM-CODE$IS-LISP-CODE? ...) ; compiling (DEFMACRO TERM-CODE$IS-SIMPLE-LISP-CODE? ...) ; compiling (DEFMACRO TERM-CODE$IS-GENERAL-LISP-CODE? ...) ; compiling (DEFMACRO TERM-CODE$IS-BUILTIN-CONSTANT? ...) ; compiling (DEFMACRO TERM-CODE$IS-PURE-BUILTIN-CONSTANT? ...) ; compiling (DEFMACRO TERM-CODE$IS-PSUEDO-CONSTANT? ...) ; compiling (DEFMACRO TERM-CODE$IS-SYSTEM-OBJECT? ...) ; compiling (DEFMACRO TERM$IS-VARIABLE? ...) ; compiling (DEFMACRO TERM$IS-APPLICATION-FORM? ...) ; compiling (DEFMACRO TERM$IS-APPLFORM? ...) ; compiling (DEFMACRO TERM$IS-LISP-CODE? ...) ; compiling (DEFMACRO TERM$IS-LISP-FORM? ...) ; compiling (DEFMACRO TERM$IS-SIMPLE-LISP-CODE? ...) ; compiling (DEFMACRO TERM$IS-SIMPLE-LISP-FORM? ...) ; compiling (DEFMACRO TERM$IS-GENERAL-LISP-CODE? ...) ; compiling (DEFMACRO TERM$IS-GENERAL-LISP-FORM? ...) ; compiling (DEFMACRO TERM$IS-PURE-BUILTIN-CONSTANT? ...) ; compiling (DEFMACRO TERM$IS-BUILTIN-CONSTANT? ...) ; compiling (DEFMACRO TERM$IS-PSUEDO-CONSTANT? ...) ; compiling (DEFMACRO TERM$IS-SYSTEM-OBJECT? ...) ; compiling (DEFMACRO TERM-IS-VARIABLE? ...) ; compiling (DEFMACRO TERM-IS-APPLICATION-FORM? ...) ; compiling (DEFMACRO TERM-IS-APPLFORM? ...) ; compiling (DEFMACRO TERM-IS-LISP-FORM? ...) ; compiling (DEFMACRO TERM-IS-SIMPLE-LISP-FORM? ...) ; compiling (DEFMACRO TERM-IS-GENERAL-LISP-FORM? ...) ; compiling (DEFMACRO TERM-IS-PURE-BUILTIN-CONSTANT? ...) ; compiling (DEFMACRO TERM-IS-BUILTIN-CONSTANT? ...) ; compiling (DEFMACRO TERM-IS-PSUEDO-CONSTANT? ...) ; compiling (DEFMACRO TERM-IS-SYSTEM-OBJECT? ...) ; compiling (DEFMACRO TERM-IS-CHAOS-EXPR? ...) ; compiling (DEFMACRO TERM$STATE-FLAG ...) ; compiling (DEFMACRO TERM-STATE-FLAG ...) ; compiling (DEFMACRO TERM$TEST-REDUCED-FLAG ...) ; compiling (DEFMACRO TERM-TEST-REDUCED-FLAG ...) ; compiling (DEFMACRO TERM-IS-REDUCED? ...) ; compiling (DEFMACRO TERM$TEST-RED-FLAG ...) ; compiling (DEFMACRO TERM-TEST-RED-FLAG ...) ; compiling (DEFMACRO TERM-IS-RED ...) ; compiling (DEFMACRO TERM$TEST-LOWEST-PARSED-FLAG ...) ; compiling (DEFMACRO TERM-TEST-LOWEST-PARSED-FLAG ...) ; compiling (DEFMACRO TERM-IS-LOWEST-PARSED? ...) ; compiling (DEFMACRO TERM$TEST-ON-DEMAND-FLAG ...) ; compiling (DEFMACRO TERM-TEST-ON-DEMAND-FLAG ...) ; compiling (DEFMACRO TERM-IS-ON-DEMAND? ...) ; compiling (DEFMACRO TERM$SET-REDUCED-FLAG ...) ; compiling (DEFMACRO TERM-SET-REDUCED-FLAG ...) ; compiling (DEFMACRO MARK-TERM-AS-REDUCED ...) ; compiling (DEFCONSTANT .NOT-REDUCED-BIT. ...) ; compiling (DEFMACRO TERM$UNSET-REDUCED-FLAG ...) ; compiling (DEFMACRO TERM-UNSET-REDUCED-FLAG ...) ; compiling (DEFMACRO MARK-TERM-AS-NOT-REDUCED ...) ; compiling (DEFMACRO TERM$SET-RED-FLAG ...) ; compiling (DEFMACRO TERM-SET-RED ...) ; compiling (DEFCONSTANT .GREEN-BIT. ...) ; compiling (DEFMACRO TERM$SET-GREEN ...) ; compiling (DEFMACRO TERM-SET-GREEN ...) ; compiling (DEFMACRO TERM$SET-LOWEST-PARSED-FLAG ...) ; compiling (DEFMACRO TERM-SET-LOWEST-PARSED-FLAG ...) ; compiling (DEFMACRO MARK-TERM-AS-LOWEST-PARSED ...) ; compiling (DEFCONSTANT .NOT-LOWEST-PARSED-BIT. ...) ; compiling (DEFMACRO TERM$UNSET-LOWEST-PARSED-FLAG ...) ; compiling (DEFMACRO TERM-UNSET-LOWEST-PARSED-FLAG ...) ; compiling (DEFMACRO MARK-TERM-AS-NOT-LOWEST-PARSED ...) ; compiling (DEFMACRO TERM$SET-ON-DEMAND-FLAG ...) ; compiling (DEFMACRO TERM-SET-ON-DEMAND-FLAG ...) ; compiling (DEFMACRO MARK-TERM-AS-ON-DEMAND ...) ; compiling (DEFCONSTANT .NOT-ON-DEMAND-BIT. ...) ; compiling (DEFMACRO TERM$UNSET-ON-DEMAND-FLAG ...) ; compiling (DEFMACRO TERM-UNSET-ON-DEMAND-FLAG ...) ; compiling (DEFMACRO MARK-TERM-AS-NOT-ON-DEMAND ...) ; compiling (DEFCONSTANT VAR-CONST-CODE ...) ; compiling (DEFCONSTANT PRE-VAR-CONST-CODE ...) ; compiling (DEFMACRO @CREATE-VARIABLE-TERM ...) ; compiling (DEFMACRO MAKE-VARIABLE-TERM ...) ; compiling (DEFMACRO VARIABLE-COPY ...) ; compiling (DEFMACRO VARIABLE-COPY-X ...) ; compiling (DEFMACRO CREATE-APPLICATION-FORM-TERM ...) ; compiling (DEFMACRO @CREATE-APPLICATION-FORM-TERM ...) ; compiling (DEFCONSTANT SIMPLE-LISP-CONST-CODE ...) ; compiling (DEFCONSTANT PRE-SIMPLE-LISP-CONST-CODE ...) ; compiling (DEFMACRO CREATE-SIMPLE-LISP-CODE-TERM ...) ; compiling (DEFMACRO MAKE-SIMPLE-LISP-FORM-TERM ...) ; compiling (DEFCONSTANT GENERAL-LISP-CONST-CODE ...) ; compiling (DEFCONSTANT PRE-GENERAL-LISP-CONST-CODE ...) ; compiling (DEFMACRO CREATE-GENERAL-LISP-CODE-TERM ...) ; compiling (DEFMACRO @CREATE-GENERAL-LISP-CODE-TERM ...) ; compiling (DEFMACRO MAKE-GENERAL-LISP-FORM-TERM ...) ; compiling (DEFCONSTANT BUILTIN-CONSTR-CODE ...) ; compiling (DEFCONSTANT PRE-BUILTIN-CONSTR-CODE ...) ; compiling (DEFMACRO MAKE-BCONST-TERM ...) ; compiling (DEFCONSTANT PSUEDO-CONSTANT-CONST-CODE ...) ; compiling (DEFCONSTANT PRE-PSUEDO-CONSTANT-CONST-CODE ...) ; compiling (DEFMACRO MAKE-PSUEDO-CONSTANT-TERM ...) ; compiling (DEFMACRO MAKE-PVARIABLE-TERM ...) ; compiling (DEFMACRO PVARIABLE-COPY ...) ; compiling (DEFCONSTANT SYSTEM-OBJECT-CONST-CODE ...) ; compiling (DEFCONSTANT PRE-SYSTEM-OBJECT-CONST-CODE ...) ; compiling (DEFMACRO MAKE-SYSTEM-OBJECT-TERM ...) ; compiling (DEFCONSTANT ALL-TERM-CODE ...) ; compiling (DEFMACRO TERM? ...) ; compiling (DEFMACRO TERM$BUILTIN-EQUAL ...) ; compiling (DEFMACRO TERM-BUILTIN-EQUAL ...) ; compiling (DEFCONSTANT PRIORI-CONSTANT-TYPE ...) ; compiling (DEFMACRO TERM$IS-CONSTANT? ...) ; compiling (DEFMACRO TERM-IS-CONSTANT? ...) ; compiling (DEFUN TERM-VARIABLES ...) ; compiling (DEFUN TERM-PVARIABLES ...) ; compiling (DECLAIM (INLINE VARIABLES-OCCUR-AT-TOP?)) ; compiling (DEFUN VARIABLES-OCCUR-AT-TOP? ...) ; compiling (DEFCONSTANT APRIORI-GROUND-TYPE ...) ; compiling (DEFMACRO TERM$IS-GROUND? ...) ; compiling (DEFUN TERM-IS-GROUND? ...) ; compiling (DECLAIM (INLINE SIMPLE-COPY-TERM)) ; compiling (DEFUN SIMPLE-COPY-TERM ...) ; compiling (DEFMACRO !TERM-VARIABLE-MATCH ...) ; compiling (DEFMACRO TERM-VARIABLE-MATCH ...) ; compiling (DEFMACRO !TERM-OPERATOR-EQ ...) ; compiling (DEFMACRO TERM-OPERATOR-EQ ...) ; compiling (DEFMACRO !TERM-OPERATOR-EQUAL ...) ; compiling (DEFMACRO TERM-OPERATOR-EQUAL ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/chaos/primitives/term2-TMP.fasl written ; compilation finished in 0:00:00.329 ; compiling file "/<>/chaos/primitives/defterm.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DEFSTRUCT (%CHAOS-OBJECT #) ...) ; compiling (DEFUN CHAOS-PR-OBJECT ...) ; file: /<>/chaos/primitives/defterm.lisp ; in: DEFUN CHAOS-PR-OBJECT ; (FORMAT STREAM "#<~a : ~x>" (CHAOS::%CHAOS-OBJECT--TYPE CHAOS::OBJ) ; (CHAOS::ADDR-OF CHAOS::OBJ)) ; ==> ; (FORMAT SB-C::DEST ; (SB-INT:NAMED-LAMBDA "#<~a : ~x>" ; (STREAM SB-FORMAT::FORMAT-ARG1 SB-FORMAT::FORMAT-ARG2 &REST ; SB-FORMAT::ARGS) ; (DECLARE (IGNORABLE STREAM SB-FORMAT::ARGS)) ; (BLOCK NIL ; (WRITE-STRING "#<" STREAM) ; (PRINC SB-FORMAT::FORMAT-ARG1 STREAM) ; (WRITE-STRING " : " STREAM) ; (LET (# #) ; (PRINC SB-FORMAT::FORMAT-ARG2 STREAM)) ; (WRITE-CHAR #\> STREAM)) ; NIL) ; #:G7 #:G8) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a NULL. ; (CHAOS::ADDR-OF CHAOS::OBJ) ; --> BLOCK LOGAND ; ==> ; (LOGAND 'SB-C::DUMMY 4294967295) ; ; note: forced to do LOGAND-WORD-MASK (cost 10) ; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 32). ; etc. ; (FORMAT STREAM "#<~a : ~x>" (CHAOS::%CHAOS-OBJECT--TYPE CHAOS::OBJ) ; (CHAOS::ADDR-OF CHAOS::OBJ)) ; ==> ; (FORMAT SB-C::DEST ; (SB-INT:NAMED-LAMBDA "#<~a : ~x>" ; (STREAM SB-FORMAT::FORMAT-ARG1 SB-FORMAT::FORMAT-ARG2 &REST ; SB-FORMAT::ARGS) ; (DECLARE (IGNORABLE STREAM SB-FORMAT::ARGS)) ; (BLOCK NIL ; (WRITE-STRING "#<" STREAM) ; (PRINC SB-FORMAT::FORMAT-ARG1 STREAM) ; (WRITE-STRING " : " STREAM) ; (LET (# #) ; (PRINC SB-FORMAT::FORMAT-ARG2 STREAM)) ; (WRITE-CHAR #\> STREAM)) ; NIL) ; #:G7 #:G8) ; ; note: doing unsigned word to integer coercion (cost 20) ; compiling (DEFSTRUCT (%CHAOS-STATIC-OBJECT) ...) ; compiling (DEFMACRO OBJECT-TYPE ...) ; compiling (DEFMACRO CHAOS-OBJECT? ...) ; compiling (DEFMACRO TYPE-P-CHAOS ...) ; compiling (DEFMACRO OBJECT-CATEGORY ...) ; compiling (DEFMACRO OBJECT-EVALUATOR ...) ; compiling (DEFMACRO OBJECT-PRINTER ...) ; compiling (DEFMACRO OBJECT-VISIBLE-SLOTS ...) ; compiling (DEFMACRO OBJECT-CONSTRUCTOR ...) ; compiling (DEFSTRUCT (%CHAOS-AST #) ...) ; compiling (DEFMACRO CHAOS-AST? ...) ; compiling (DEFMACRO AST-TYPE ...) ; compiling (DEFMACRO AST-CATEGORY ...) ; compiling (DEFMACRO AST-PRINTER ...) ; compiling (DEFMACRO AST-EVALUATOR ...) ; compiling (DEFUN %MAKE-KEYWORD ...) ; file: /<>/chaos/primitives/defterm.lisp ; in: DEFUN %MAKE-KEYWORD ; (STRING CHAOS::SYMBOL-OR-STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a STRING. ; compiling (DEFMACRO DEFTERM ...) ; file: /<>/chaos/primitives/defterm.lisp ; in: DEFMACRO DEFTERM ; (STRING CHAOS::CONC-NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a STRING. ; (STRING CHAOS::NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a STRING. ; (STRING CHAOS::CONC-NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a STRING. ; (STRING CHAOS::NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a STRING. ; (STRING CHAOS::CONC-NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a STRING. ; (STRING CHAOS::NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a STRING. ; (STRING CHAOS::CONC-NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a STRING. ; (STRING CHAOS::NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a STRING. ; compiling (DEFMACRO DEFKEY ...) ; compiling (DEFUN %IS-CHAOS-TERM? ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/chaos/primitives/defterm-TMP.fasl written ; compilation finished in 0:00:00.327 ; compiling file "/<>/chaos/primitives/bobject2.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DEFSTRUCT (OBJECT # ...) ...) ; compiling (DEFMACRO OBJECT-INFO ...) ; compiling (DEFUN SET-OBJECT-CONTEXT-MODULE ...) ; compiling (DEFSTRUCT (EX-INTERFACE #) ...) ; compiling (DEFSTRUCT (SYMBOL-TABLE) ...) ; compiling (DEFSTRUCT (STABLE) ...) ; compiling (DEFUN CANONICALIZE-OBJECT-NAME ...) ; compiling (DEFUN SYMBOL-TABLE-ADD ...) ; file: /<>/chaos/primitives/bobject2.lisp ; in: DEFUN SYMBOL-TABLE-ADD ; (PUSHNEW CHAOS::OBJ (CHAOS::STABLE-SORTS CHAOS::TBL)) ; --> LET* ADJOIN ; ==> ; (SB-KERNEL:%ADJOIN SB-C::ITEM LIST) ; ; note: unable to ; optimize ; due to type uncertainty: ; can't tell whether the first argument is a (OR FIXNUM (NOT NUMBER)) ; (PUSHNEW CHAOS::OBJ (CHAOS::STABLE-OPERATORS CHAOS::TBL)) ; --> LET* ADJOIN ; ==> ; (SB-KERNEL:%ADJOIN SB-C::ITEM LIST) ; ; note: unable to ; optimize ; due to type uncertainty: ; can't tell whether the first argument is a (OR FIXNUM (NOT NUMBER)) ; (PUSHNEW CHAOS::OBJ (CHAOS::STABLE-PARAMETERS CHAOS::TBL)) ; --> LET* ADJOIN ; ==> ; (SB-KERNEL:%ADJOIN SB-C::ITEM LIST) ; ; note: unable to ; optimize ; due to type uncertainty: ; can't tell whether the first argument is a (OR FIXNUM (NOT NUMBER)) ; (PUSHNEW CHAOS::OBJ (CHAOS::STABLE-SUBMODULES CHAOS::TBL)) ; --> LET* ADJOIN ; ==> ; (SB-KERNEL:%ADJOIN SB-C::ITEM LIST) ; ; note: unable to ; optimize ; due to type uncertainty: ; can't tell whether the first argument is a (OR FIXNUM (NOT NUMBER)) ; (PUSHNEW CHAOS::OBJ (CHAOS::STABLE-AXIOMS CHAOS::TBL)) ; --> LET* ADJOIN ; ==> ; (SB-KERNEL:%ADJOIN SB-C::ITEM LIST) ; ; note: unable to ; optimize ; due to type uncertainty: ; can't tell whether the first argument is a (OR FIXNUM (NOT NUMBER)) ; (PUSHNEW CHAOS::OBJ (CHAOS::STABLE-UNKNOWNS CHAOS::TBL)) ; --> LET* ADJOIN ; ==> ; (SB-KERNEL:%ADJOIN SB-C::ITEM LIST) ; ; note: unable to ; optimize ; due to type uncertainty: ; can't tell whether the first argument is a (OR FIXNUM (NOT NUMBER)) ; compiling (DEFUN SYMBOL-TABLE-GET ...) ; compiling (DEFSTRUCT (TOP-OBJECT # ...) ...) ; compiling (DEFMACRO OBJECT-DEPEND-DAG ...) ; compiling (DEFUN OBJECT-PARAMETERS ...) ; compiling (DEFSETF OBJECT-PARAMETERS ...) ; compiling (DEFUN OBJECT-EXPORTING-OBJECTS ...) ; compiling (DEFSETF OBJECT-EXPORTING-OBJECTS ...) ; compiling (DEFUN OBJECT-DIRECT-SUB-OBJECTS ...) ; compiling (DEFUN OBJECT-ALL-SUB-OBJECTS ...) ; compiling (DEFUN GATHER-SUB-OBJECTS ...) ; compiling (DEFUN OBJECT-ALL-EXPORTING-OBJECTS ...) ; compiling (DEFUN GATHER-EXPORTING-OBJECTS ...) ; compiling (DEFUN INITIALIZE-DEPEND-DAG ...) ; compiling (DEFUN INITIALIZE-OBJECT-INTERFACE ...) ; compiling (DEFUN CLEAN-UP-EX-INTERFACE ...) ; compiling (DEFUN ADD-DEPEND-RELATION ...) ; compiling (DEFMACRO OBJECT-STATUS ...) ; compiling (DEFMACRO OBJECT-IS-INCONSISTENT ...) ; compiling (DEFMACRO MARK-OBJECT-AS-INCONSISTENT ...) ; compiling (DEFUN PROPAGATE-OBJECT-CHANGE ...) ; compiling (DEFMACRO OBJECT-DECL-FORM ...) ; compiling (DEFTERM SCRIPT ...) ; compiling (DEFUN SCRIPT? ...) ; compiling (DEFTERM AST ...) ; compiling (DEFUN AST? ...) ; compiling (DEFSTRUCT (PARSE-DICTIONARY #) ...) ; compiling (DEFSTRUCT (SIGNATURE-STRUCT # ...) ...) ; compiling (DEFUN PRINT-SIGNATURE ...) ; file: /<>/chaos/primitives/bobject2.lisp ; in: DEFUN PRINT-SIGNATURE ; (FORMAT STREAM "'[:signature \"~a\"]" (CHAOS::MAKE-MODULE-PRINT-NAME2 MOD)) ; ==> ; (FORMAT SB-C::DEST ; (SB-INT:NAMED-LAMBDA "'[:signature \"~a\"]" ; (STREAM SB-FORMAT::FORMAT-ARG1 &REST SB-FORMAT::ARGS) ; (DECLARE (IGNORABLE STREAM SB-FORMAT::ARGS)) ; (BLOCK NIL ; (WRITE-STRING "'[:signature \"" STREAM) ; (PRINC SB-FORMAT::FORMAT-ARG1 STREAM) ; (WRITE-STRING "\"]" STREAM)) ; NIL) ; #:G7) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a NULL. ; compiling (DEFSTRUCT (AXIOM-SET # ...) ...) ; compiling (DEFUN PRINT-AXIOM-SET ...) ; file: /<>/chaos/primitives/bobject2.lisp ; in: DEFUN PRINT-AXIOM-SET ; (FORMAT STREAM "':axset[\"~a\"]" (CHAOS::MODULE-PRINT-NAME MOD)) ; ==> ; (FORMAT SB-C::DEST ; (SB-INT:NAMED-LAMBDA "':axset[\"~a\"]" ; (STREAM SB-FORMAT::FORMAT-ARG1 &REST SB-FORMAT::ARGS) ; (DECLARE (IGNORABLE STREAM SB-FORMAT::ARGS)) ; (BLOCK NIL ; (WRITE-STRING "':axset[\"" STREAM) ; (PRINC SB-FORMAT::FORMAT-ARG1 STREAM) ; (WRITE-STRING "\"]" STREAM)) ; NIL) ; #:G7) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a NULL. ; compiling (LET (#) ...) ; compiling (DEFSTRUCT (TRS # ...) ...) ; compiling (DEFUN PRINT-TRS ...) ; file: /<>/chaos/primitives/bobject2.lisp ; in: DEFUN PRINT-TRS ; (FORMAT STREAM "'[:trs \"~a\"]" (CHAOS::MAKE-MODULE-PRINT-NAME2 MOD)) ; ==> ; (FORMAT SB-C::DEST ; (SB-INT:NAMED-LAMBDA "'[:trs \"~a\"]" ; (STREAM SB-FORMAT::FORMAT-ARG1 &REST SB-FORMAT::ARGS) ; (DECLARE (IGNORABLE STREAM SB-FORMAT::ARGS)) ; (BLOCK NIL ; (WRITE-STRING "'[:trs \"" STREAM) ; (PRINC SB-FORMAT::FORMAT-ARG1 STREAM) ; (WRITE-STRING "\"]" STREAM)) ; NIL) ; #:G7) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a NULL. ; compiling (DEFSTRUCT (MODULE-DYN-CONTEXT #) ...) ; compiling (DEFSTRUCT (MODULE # ...) ...) ; file: /<>/chaos/primitives/bobject2.lisp ; in: DEFSTRUCT MODULE ; (DEFSTRUCT ; (CHAOS::MODULE (:INCLUDE CHAOS::TOP-OBJECT (CHAOS::-TYPE 'CHAOS::MODULE)) ; (:CONC-NAME "MODULE-") (:CONSTRUCTOR CHAOS::MAKE-MODULE) ; (:CONSTRUCTOR CHAOS::MODULE* (CHAOS::NAME)) ; (:PRINT-FUNCTION CHAOS::PRINT-MODULE-OBJECT)) ; (CHAOS::PRINT-NAME "" :TYPE STRING) ; (CHAOS::SIGNATURE NIL :TYPE (OR NULL CHAOS::SIGNATURE-STRUCT)) ; (CHAOS::AXIOM-SET NIL :TYPE (OR NULL CHAOS::AXIOM-SET)) ; (CHAOS::THEOREMS NIL :TYPE LIST) ; (CHAOS::PARSE-DICTIONARY NIL :TYPE (OR NULL CHAOS::PARSE-DICTIONARY)) ; (CHAOS::TRS NIL :TYPE (OR NULL CHAOS::TRS)) ; (CHAOS::CONTEXT NIL :TYPE (OR NULL CHAOS::MODULE-DYN-CONTEXT)) ; (CHAOS::ALIAS NIL :TYPE LIST)) ; --> PROGN EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '# ; '#(# ; # ; # ; # ; #)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CHAOS::MODULE-P, CHAOS::MODULE-NAME, ; CHAOS::MODULE-SYMBOL-TABLE and CHAOS::MODULE-PRINT-NAME could not be inlined ; because the structure definition for CHAOS::MODULE 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. ; compiling (DEFMACRO MODULE-KIND ...) ; compiling (DEFMACRO MODULE-IS-THEORY ...) ; compiling (DEFMACRO MODULE-IS-OBJECT ...) ; compiling (DEFMACRO MODULE-IS-FINAL ...) ; compiling (DEFMACRO MODULE-IS-LOOSE ...) ; compiling (DEFMACRO MODULE-IS-INITIAL ...) ; compiling (DEFUN PRINT-MODULE-OBJECT ...) ; compiling (DEFSTRUCT (VIEW-STRUCT # ...) ...) ; compiling (SETF (SYMBOL-FUNCTION #) ...) ; compiling (SETF (GET # ...) ...) ; compiling (SETF (GET # ...) ...) ; compiling (DEFUN PRINT-VIEW-STRUCT-OBJECT ...) ; file: /<>/chaos/primitives/bobject2.lisp ; in: DEFUN PRINT-VIEW-STRUCT-OBJECT ; (FORMAT STREAM ":view[~a: ~s => ~s | ~s]" ; (CHAOS::VIEW-STRUCT-NAME CHAOS::OBJ) ; (CHAOS::VIEW-STRUCT-SRC CHAOS::OBJ) ; (CHAOS::VIEW-STRUCT-TARGET CHAOS::OBJ) (CHAOS::ADDR-OF CHAOS::OBJ)) ; ==> ; (FORMAT SB-C::DEST ; (SB-INT:NAMED-LAMBDA ":view[~a: ~s => ~s | ~s]" ; (STREAM SB-FORMAT::FORMAT-ARG1 SB-FORMAT::FORMAT-ARG2 ; SB-FORMAT::FORMAT-ARG3 SB-FORMAT::FORMAT-ARG4 &REST ; SB-FORMAT::ARGS) ; (DECLARE (IGNORABLE STREAM SB-FORMAT::ARGS)) ; (BLOCK NIL ; (WRITE-STRING ":view[" STREAM) ; (PRINC SB-FORMAT::FORMAT-ARG1 STREAM) ; (WRITE-STRING ": " STREAM) ; (PRIN1 SB-FORMAT::FORMAT-ARG2 STREAM) ; (WRITE-STRING " => " STREAM) ; (PRIN1 SB-FORMAT::FORMAT-ARG3 STREAM) ; (WRITE-STRING " | " STREAM) ; (PRIN1 SB-FORMAT::FORMAT-ARG4 STREAM) ; (WRITE-CHAR #\] STREAM)) ; NIL) ; #:G7 #:G8 #:G9 #:G10) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a NULL. ; (CHAOS::ADDR-OF CHAOS::OBJ) ; --> BLOCK LOGAND ; ==> ; (LOGAND 'SB-C::DUMMY 4294967295) ; ; note: forced to do LOGAND-WORD-MASK (cost 10) ; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 32). ; etc. ; (FORMAT STREAM ":view[~a: ~s => ~s | ~s]" ; (CHAOS::VIEW-STRUCT-NAME CHAOS::OBJ) ; (CHAOS::VIEW-STRUCT-SRC CHAOS::OBJ) ; (CHAOS::VIEW-STRUCT-TARGET CHAOS::OBJ) (CHAOS::ADDR-OF CHAOS::OBJ)) ; ==> ; (FORMAT SB-C::DEST ; (SB-INT:NAMED-LAMBDA ":view[~a: ~s => ~s | ~s]" ; (STREAM SB-FORMAT::FORMAT-ARG1 SB-FORMAT::FORMAT-ARG2 ; SB-FORMAT::FORMAT-ARG3 SB-FORMAT::FORMAT-ARG4 &REST ; SB-FORMAT::ARGS) ; (DECLARE (IGNORABLE STREAM SB-FORMAT::ARGS)) ; (BLOCK NIL ; (WRITE-STRING ":view[" STREAM) ; (PRINC SB-FORMAT::FORMAT-ARG1 STREAM) ; (WRITE-STRING ": " STREAM) ; (PRIN1 SB-FORMAT::FORMAT-ARG2 STREAM) ; (WRITE-STRING " => " STREAM) ; (PRIN1 SB-FORMAT::FORMAT-ARG3 STREAM) ; (WRITE-STRING " | " STREAM) ; (PRIN1 SB-FORMAT::FORMAT-ARG4 STREAM) ; (WRITE-CHAR #\] STREAM)) ; NIL) ; #:G7 #:G8 #:G9 #:G10) ; ; note: doing unsigned word to integer coercion (cost 20) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/chaos/primitives/bobject2-TMP.fasl written ; compilation finished in 0:00:00.211 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/<>/chaos/primitives/absntax.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DEFTERM SEQ ...) ; compiling (DEFTERM QUOTE ...) ; compiling (DEFTERM SORT-REF ...) ; compiling (DEFUN MAY-BE-ERROR-SORT-REF? ...) ; compiling (DEFTERM SORT-DECL ...) ; compiling (DEFTERM BSORT-DECL ...) ; compiling (DEFTERM SUBSORT-DECL ...) ; compiling (DEFTERM PSORT-DECL ...) ; compiling (DEFTERM ATTR-RENAME ...) ; compiling (DEFTERM SLOT ...) ; compiling (DEFTERM SUPER ...) ; compiling (DEFTERM RECORD-DECL ...) ; compiling (DEFTERM CLASS-DECL ...) ; compiling (DEFTERM OPREF ...) ; compiling (DEFTERM OPATTRS ...) ; compiling (DEFTERM OP-DECL ...) ; compiling (DEFTERM METH-REF ...) ; compiling (DEFTERM VAR-DECL ...) ; compiling (DEFTERM PVAR-DECL ...) ; compiling (DEFTERM LET ...) ; compiling (DEFTERM MACRO ...) ; compiling (DEFTERM AXIOM-DECL ...) ; compiling (DEFTERM AX-REF ...) ; compiling (DEFTERM EQ-REF ...) ; compiling (DEFTERM RL-REF ...) ; compiling (DEFTERM RRULE-REF ...) ; compiling (DEFTERM IMPORT ...) ; compiling (DEFTERM SIGNATURE ...) ; compiling (DEFTERM AXIOMS ...) ; compiling (DEFTERM MODULE-DECL ...) ; compiling (DEFTERM VIEW-DECL ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/chaos/primitives/absntax-TMP.fasl written ; compilation finished in 0:00:00.442 ; compiling file "/<>/chaos/primitives/script.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DEFTERM EVAL ...) ; compiling (DEFTERM ERROR ...) ; compiling (DEFTERM LISP-EVAL ...) ; compiling (DEFTERM DYNA-COMMENT ...) ; compiling (DEFTERM REDUCE ...) ; compiling (DEFTERM TEST-REDUCE ...) ; compiling (DEFTERM PARSE ...) ; compiling (DEFTERM INPUT ...) ; compiling (DEFTERM TRACE ...) ; compiling (DEFTERM TRACE-WHOLE ...) ; compiling (DEFTERM STEP ...) ; compiling (DEFTERM DESCRIBE-MODULE ...) ; compiling (DEFTERM OPEN-MODULE ...) ; compiling (DEFTERM CLOSE-MODULE ...) ; compiling (DEFTERM SAVE ...) ; compiling (DEFTERM RESTORE ...) ; compiling (DEFTERM RESET ...) ; compiling (DEFTERM FULL-RESET ...) ; compiling (DEFTERM LOAD-PRELUDE ...) ; compiling (DEFTERM PROVIDE ...) ; compiling (DEFTERM REQUIRE ...) ; compiling (DEFTERM REWRITE-COUNT ...) ; compiling (DEFTERM STOP-AT ...) ; compiling (DEFTERM PROTECT ...) ; compiling (DEFTERM DRIBBLE ...) ; compiling (DEFTERM SAVE-CHAOS ...) ; compiling (DEFTERM LS ...) ; compiling (DEFTERM PWD ...) ; compiling (DEFTERM SHELL ...) ; compiling (DEFTERM CD ...) ; compiling (DEFTERM PUSHD ...) ; compiling (DEFTERM POPD ...) ; compiling (DEFTERM DIRS ...) ; compiling (DEFTERM SHOW ...) ; compiling (DEFTERM DESCRIBE ...) ; compiling (DEFTERM SELECT ...) ; compiling (DEFTERM SET ...) ; compiling (DEFTERM REGULARIZE ...) ; compiling (DEFTERM CHECK ...) ; compiling (DEFTERM TRAM ...) ; compiling (DEFTERM AUTOLOAD ...) ; compiling (DEFTERM NO-AUTOLOAD ...) ; compiling (DEFTERM CBRED ...) ; compiling (DEFTERM CHAOS ...) ; compiling (DEFTERM CONTINUE ...) ; compiling (DEFTERM WHAT-IS ...) ; compiling (DEFTERM INSPECT ...) ; compiling (DEFTERM LOOK-UP ...) ; compiling (DEFTERM DELIMITER ...) ; compiling (DEFTERM SCASE ...) ; compiling (DEFTERM GENDOC ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/chaos/primitives/script-TMP.fasl written ; compilation finished in 0:00:00.695 ; compiling file "/<>/chaos/primitives/op-theory.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DEFTYPE OP-THEORY ...) ; compiling (DEFUN THEORY-MAKE ...) ; compiling (DEFMACRO THEORY-INFO ...) ; compiling (DEFMACRO THEORY-ZERO ...) ; compiling (DEFUN ZERO-RULE-ONLY ...) ; compiling (DEFTYPE THEORY-INFO ...) ; compiling (DEFMACRO THEORY-INFO-NAME ...) ; compiling (DEFMACRO THEORY-INFO-CODE ...) ; compiling (DEFMACRO THEORY-INFO-EMPTY-FOR-UNIFY ...) ; compiling (DEFMACRO THEORY-INFO-EMPTY-FOR-MATCHING ...) ; compiling (DEFMACRO THEORY-INFO-MATCH-EQUAL-FUN ...) ; compiling (DEFMACRO THEORY-INFO-MATCH-INIT-FUN ...) ; compiling (DEFMACRO THEORY-INFO-MATCH-NEXT-FUN ...) ; compiling (DEFMACRO THEORY-INFO-UNIFY-EQUAL-FUN ...) ; compiling (DEFMACRO THEORY-INFO-UNIFY-INIT-FUN ...) ; compiling (DEFMACRO THEORY-INFO-UNIFY-NEXT-FUN ...) ; compiling (DEFUN NEW-THEORY-INFO ...) ; compiling (DEFUN PR-THEORY-INFO ...) ; compiling (DEFUN PR-OPTHEORY-INTERNAL ...) ; file: /<>/chaos/primitives/op-theory.lisp ; in: DEFUN PR-OPTHEORY-INTERNAL ; (FORMAT STREAM "#" ; (CHAOS::THEORY-INFO-NAME (CHAOS::THEORY-INFO CHAOS::OPTH)) ; (CHAOS::THEORY-ZERO CHAOS::OPTH)) ; ==> ; (FORMAT SB-C::DEST ; (SB-INT:NAMED-LAMBDA "#" ; (STREAM SB-FORMAT::FORMAT-ARG1 SB-FORMAT::FORMAT-ARG2 &REST ; SB-FORMAT::ARGS) ; (DECLARE (IGNORABLE STREAM SB-FORMAT::ARGS)) ; (BLOCK NIL ; (WRITE-STRING "#>/chaos/primitives/bmodexp.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DEFTYPE MODEXP ...) ; compiling (DEFPARAMETER .MODEXP-KEYWORDS. ...) ; compiling (DEFUN IS-MODEXP? ...) ; compiling (DEFTERM MODEXP ...) ; compiling (DEFTERM RMAP ...) ; compiling (DEFTERM REN-SORT ...) ; compiling (DEFTERM REN-HSORT ...) ; compiling (DEFTERM REN-OP ...) ; compiling (DEFTERM REN-BOP ...) ; compiling (DEFTERM VARS ...) ; compiling (DEFTERM REN-PARAM ...) ; compiling (DEFTERM + ...) ; compiling (DEFTERM * ...) ; compiling (DEFTERM ! ...) ; compiling (DEFTERM !ARG ...) ; compiling (DEFMACRO MAKE-?-NAME ...) ; compiling (DEFUN MODEXP-IS-?NAME? ...) ; compiling (DEFUN ?NAME-NAME ...) ; compiling (DEFUN MODEXP-IS-PARAMETER-THEORY ...) ; compiling (DEFTERM VIEW ...) ; compiling (DEFUN MODEXP-IS-ERROR ...) ; compiling (DEFUN MODEXP-IS-SIMPLE-NAME ...) ; compiling (DECLAIM (TYPE LIST ...)) ; compiling (DEFVAR *MODEXP-VIEW-TABLE* ...) ; compiling (DEFUN FIND-VIEW-IN-ENV ...) ; compiling (DEFUN ADD-VIEW-DEFN ...) ; compiling (DEFSTRUCT (MODMORPH #) ...) ; compiling (DEFUN MODMORPH-IS-RENAME ...) ; compiling (DEFMACRO MODMORPH-ASSOC-IMAGE ...) ; compiling (DEFMACRO MODMORPH-ASSOC-IMAGES ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/chaos/primitives/bmodexp-TMP.fasl written ; compilation finished in 0:00:00.163 ; compiling file "/<>/chaos/primitives/bmodule2.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DEFUN MODULE-IS-PARAMETER-THEORY ...) ; compiling (DEFMACRO MODULE-DAG ...) ; compiling (DEFMACRO MODULE-PARAMETERS ...) ; compiling (DEFMACRO MODULE-EXPORTING-MODULES ...) ; compiling (DEFMACRO MODULE-DAG-SUBMODULES ...) ; compiling (DEFUN MODULE-DIRECT-SUBMODULES ...) ; compiling (DEFUN MODULE-SUBMODULES ...) ; compiling (DEFUN INITIALIZE-MODULE-DAG ...) ; compiling (DEFUN MODULE-ALL-SUBMODULES ...) ; compiling (DEFUN GATHER-SUBMODULES ...) ; compiling (DEFUN GET-MODULE-DEPENDENCY ...) ; compiling (DEFUN GATHER-MODULE-DEPENDENCY ...) ; compiling (DEFUN GET-IMPORTING-PATH ...) ; compiling (DEFUN GET-REAL-IMPORTING-MODE ...) ; compiling (DEFMACRO MODULE-EXTENDS ...) ; compiling (DEFMACRO MODULE-PROTECTS ...) ; compiling (DEFMACRO MODULE-USING ...) ; compiling (DEFMACRO MODULE-INCLUDING ...) ; compiling (DEFMACRO IMPORTED-MODULES ...) ; compiling (DEFMACRO PARAMETER-ARG-NAME ...) ; compiling (DEFMACRO PARAMETER-THEORY-MODULE ...) ; compiling (DEFMACRO PARAMETER-IMPORTED-MODE ...) ; compiling (DEFMACRO PARAMETER-CONTEXT ...) ; compiling (DEFUN PARAMETER-THEORY-ARG-NAME ...) ; compiling (DEFUN PARAMETER-MODULE-THEORY ...) ; compiling (DEFUN PARAMETER-MODULE-CONTEXT ...) ; compiling (DEFUN MODULE-DIRECT-EXPORTING-MODULES ...) ; compiling (DEFUN MODULE-ALL-EXPORTING-MODULES ...) ; compiling (DEFUN GATHER-EXPORTING-MODULES ...) ; compiling (DEFUN INITIALIZE-MODULE-INTERFACE ...) ; compiling (DEFMACRO MODULE-SORTS ...) ; compiling (DEFMACRO MODULE-OWN-SORTS ...) ; compiling (DEFMACRO MODULE-SORT-RELATIONS ...) ; compiling (DEFMACRO MODULE-OPERATORS ...) ; compiling (DEFMACRO MODULE-OPATTRS ...) ; compiling (DEFMACRO MODULE-PRINCIPAL-SORT ...) ; compiling (DEFUN INITIALIZE-SIGNATURE ...) ; compiling (DEFUN CLEAN-UP-SIGNATURE ...) ; compiling (DEFMACRO MODULE-VARIABLES ...) ; compiling (DEFMACRO MODULE-EQUATIONS ...) ; compiling (DEFMACRO MODULE-RULES ...) ; compiling (DEFUN INITIALIZE-AXIOM-SET ...) ; compiling (DEFUN CLEAN-UP-AXIOM-SET ...) ; compiling (DEFMACRO MODULE-DICTIONARY-TABLE ...) ; compiling (DEFMACRO MODULE-DICTIONARY-BUILTINS ...) ; compiling (DEFMACRO MODULE-JUXTAPOSITION ...) ; compiling (DEFUN CLEAR-PARSE-DICT ...) ; compiling (DEFUN INITIALIZE-PARSE-DICTIONARY ...) ; compiling (DEFUN CLEAN-UP-PARSE-DICTIONARY ...) ; compiling (DEFMACRO MODULE-REWRITE-RULES ...) ; compiling (DEFMACRO MODULE-ALL-RULES ...) ; compiling (DEFMACRO MODULE-ALL-SORTS ...) ; compiling (DEFMACRO MODULE-ALL-OPERATORS ...) ; compiling (DEFMACRO MODULE-SORT-ORDER ...) ; compiling (DEFMACRO MODULE-OPINFO-TABLE ...) ; compiling (DEFMACRO MODULE-EXT-RULE-TABLE ...) ; compiling (DEFMACRO MODULE-TRS-SORT-NAME-MAP ...) ; compiling (DEFMACRO MODULE-TRS-OP-INFO-MAP ...) ; compiling (DEFMACRO MODULE-TRS-OP-REV-TABLE ...) ; compiling (DEFMACRO MODULE-TRS-SORT-GRAPH ...) ; compiling (DEFMACRO MODULE-TRS-ERR-SORTS ...) ; compiling (DEFMACRO MODULE-TRS-DUMMY-METHODS ...) ; compiling (DEFMACRO MODULE-TRS-SEM-RELATIONS ...) ; compiling (DEFMACRO MODULE-TRS-SEM-AXIOMS ...) ; compiling (DEFMACRO MODULE-TRS-TRAM ...) ; compiling (DEFUN INITIALIZE-TRS-EXT-INTERFACE ...) ; compiling (DEFUN INITIALIZE-TRS ...) ; compiling (DEFUN CLEAN-UP-TRS ...) ; compiling (DEFMACRO MODULE-BINDINGS ...) ; compiling (DEFMACRO MODULE-SPECIAL-BINDINGS ...) ; compiling (DEFMACRO MODULE-$$TERM ...) ; compiling (DEFMACRO MODULE-$$SUBTERM ...) ; compiling (DEFMACRO MODULE-$$ACTION-STACK ...) ; compiling (DEFMACRO MODULE-$$SELECTION-STACK ...) ; compiling (DEFUN INITIALIZE-MODULE-CONTEXT ...) ; compiling (DEFUN CLEAN-UP-CONTEXT ...) ; compiling (DEFUN MODULE-INFOS ...) ; compiling (DEFSETF MODULE-INFOS ...) ; compiling (DEFMACRO MODULE-PROTECTED-MODULES ...) ; compiling (DEFMACRO MODULE-TYPE ...) ; compiling (DEFMACRO MODULE-IS-HARD-WIRED ...) ; compiling (DEFMACRO MODULE-IS-SYSTEM-MODULE ...) ; compiling (DEFMACRO MODULE-IS-USER-MODULE ...) ; compiling (DEFMACRO MODULE-HIDDEN ...) ; compiling (DEFMACRO MODULE-IS-REGULAR ...) ; compiling (DEFUN ADD-MODULE-ALIAS ...) ; compiling (DEFUN ADD-IMPORTED-MODULE ...) ; compiling (DEFUN MODULE-INCLUDES-RWL ...) ; compiling (DEFMACRO MODULE-VOID-SORTS ...) ; compiling (DEFMACRO MODULE-VOID-METHODS ...) ; compiling (DEFMACRO MODULE-SORTS-FOR-REGULARITY ...) ; compiling (DEFMACRO MODULE-METHODS-FOR-REGULARITY ...) ; compiling (DEFMACRO MODULE-HAS-BEHAVIOURAL-AXIOMS ...) ; compiling (DEFMACRO MODULE-MACROS ...) ; compiling (DEFMACRO MODULE-SKOLEM-FUNCTIONS ...) ; compiling (DEFMACRO MODULE-INSTANCE-DB ...) ; compiling (DEFUN INITIALIZE-MODULE-INSTANCE-DB ...) ; compiling (DEFUN CLEAR-MODULE-INSTANCE-DB ...) ; compiling (DEFMACRO MODULE-PROTECTED-MODE ...) ; compiling (DEFMACRO MODULE-IS-WRITE-PROTECTED ...) ; compiling (DEFMACRO MODULE-CREATION-DATE ...) ; compiling (DEFMACRO MODULE-AXIOMS-TO-BE-FIXED ...) ; compiling (DEFMACRO MODULE-TERMS-TO-BE-FIXED ...) ; compiling (DEFMACRO MODULE-METHODS-WITH-RWL-AXIOM ...) ; compiling (DEFMACRO MODULE-RULES-WITH-RWL-AXIOM ...) ; compiling (DEFMACRO MODULE-BEH-STUFF ...) ; compiling (DEFMACRO MODULE-BEH-ATTRIBUTES ...) ; compiling (DEFMACRO MODULE-BEH-METHODS ...) ; compiling (DEFMACRO MODULE-NON-BEH-METHODS ...) ; compiling (DEFMACRO MODULE-NON-BEH-ATTRIBUTES ...) ; compiling (DEFMACRO MODULE-COBASIS ...) ; compiling (DEFMACRO MODULE-METHODS-WITH-BEH-AXIOM ...) ; compiling (DEFMACRO SORT-IS-FOR-REGULARITY? ...) ; compiling (DEFMACRO METHOD-IS-FOR-REGULARITY? ...) ; compiling (DEFMACRO MODULE-PSORT-DECLARATION ...) ; compiling (DEFMACRO MODULE-ERROR-OP-DECL ...) ; compiling (DEFMACRO MODULE-ERROR-SORTS ...) ; compiling (DEFMACRO MODULE-ERROR-METHODS ...) ; compiling (DEFMACRO MODULE-ERROR-VAR-DECL ...) ; compiling (DEFUN NEEDS-UPDATE-SORT-ORDER ...) ; compiling (DEFUN SET-NEEDS-UPDATE-SORT-ORDER ...) ; compiling (DEFUN UNSET-NEEDS-UPDATE-SORT-ORDER ...) ; compiling (DEFMACRO MODULE-AMBIG-SORTS ...) ; compiling (DEFMACRO MODULE-AMBIG-OPS ...) ; compiling (DEFPARAMETER MODULE-INITIAL ...) ; compiling (DEFPARAMETER MODULE-INCONSISTENT ...) ; compiling (DEFPARAMETER MODULE-REGULARIZED ...) ; compiling (DEFPARAMETER MODULE-READY-PARSING ...) ; compiling (DEFPARAMETER MODULE-READY-REWRITING ...) ; compiling (DEFUN MODULE-IS-INCONSISTENT ...) ; compiling (DEFUN MARK-MODULE-AS-INCONSISTENT ...) ; compiling (DEFMACRO NEED-PARSING-PREPARATION ...) ; compiling (DEFMACRO MODULE-IS-READY-FOR-PARSING ...) ; compiling (DEFMACRO MARK-MODULE-READY-FOR-PARSING ...) ; compiling (DEFMACRO MARK-NEED-PARSING-PREPARATION ...) ; compiling (DEFMACRO NEED-REWRITING-PREPARATION ...) ; compiling (DEFMACRO MODULE-IS-READY-FOR-REWRITING ...) ; compiling (DEFMACRO MARK-MODULE-AS-CONSISTENT ...) ; compiling (DEFMACRO MARK-MODULE-READY-FOR-REWRITING ...) ; compiling (DEFMACRO MARK-MODULE-NEED-REWRITING-PREPARATION ...) ; compiling (DEFMACRO SET-NEEDS-PARSE ...) ; compiling (DEFMACRO NEEDS-PARSE ...) ; compiling (DEFMACRO SET-NEEDS-RULE ...) ; compiling (DEFMACRO NEEDS-RULE ...) ; compiling (DEFMACRO WITH-IN-MODULE ...) ; compiling (DEFUN CHANGE-CURRENT-MODULE ...) ; compiling (DECLAIM (TYPE LIST ...)) ; compiling (DEFVAR *MODULES-SO-FAR-TABLE* ...) ; compiling (DEFUN ADD-MODEXP-DEFN ...) ; compiling (DEFUN FIND-GLOBAL-MODULE ...) ; compiling (DEFUN EQUAL-TOP-LEVEL ...) ; file: /<>/chaos/primitives/bmodule2.lisp ; in: DEFUN EQUAL-TOP-LEVEL ; (EQL CHAOS::X CHAOS::Y) ; ; 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 GENERIC-EQL (cost 10) ; 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. ; compiling (DEFUN FIND-EQUIVALENT-MODULE-IN-ENV ...) ; compiling (DEFUN MODEXP-UPDATE-NAME ...) ; file: /<>/chaos/primitives/bmodule2.lisp ; in: DEFUN MODEXP-UPDATE-NAME ; (RASSOC CHAOS::MODVAL CHAOS::*MODULES-SO-FAR-TABLE*) ; ==> ; (SB-KERNEL:%RASSOC SB-C::ITEM LIST) ; ; note: unable to ; optimize ; due to type uncertainty: ; can't tell whether the first argument is a (OR FIXNUM (NOT NUMBER)) ; compiling (DECLAIM (TYPE LIST ...)) ; compiling (DEFVAR *MODEXP-LOCAL-TABLE* ...) ; compiling (DEFUN ADD-MODEXP-LOCAL-DEFN ...) ; compiling (DEFUN GET-MODEXP-LOCAL ...) ; compiling (DECLAIM (TYPE LIST ...)) ; compiling (DEFVAR *MODEXP-EVAL-TABLE* ...) ; compiling (DEFUN FIND-MODEXP-EVAL ...) ; compiling (DEFUN ADD-MODEXP-EVAL ...) ; compiling (DEFUN CLEAR-MODEXP-EVAL ...) ; compiling (DEFUN FIND-MODULE-IN-ENV ...) ; compiling (DEFUN FIND-MODULE-IN-ENV-EXT ...) ; compiling (DEFUN FIND-MODULE-IN-SUBLIST ...) ; compiling (DEFVAR .METHOD1. ...) ; compiling (DEFVAR .METHOD-TAB1. ...) ; compiling (DEFVAR .METHOD-VAL1. ...) ; compiling (DEFVAR .METHOD2. ...) ; compiling (DEFVAR .METHOD-TAB2. ...) ; compiling (DEFVAR .METHOD-VAL2. ...) ; compiling (DEFUN CLEAR-METHOD-INFO-HASH ...) ; compiling (DEFUN INITIALIZE-MODULE ...) ; compiling (DEFUN CLEAN-UP-MODULE ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/chaos/primitives/bmodule2-TMP.fasl written ; compilation finished in 0:00:00.231 ; compiling file "/<>/chaos/primitives/bview2.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DEFMACRO VIEW-NAME ...) ; compiling (DEFMACRO VIEW-SRC ...) ; compiling (DEFMACRO VIEW-SOURCE ...) ; compiling (DEFMACRO VIEW-TARGET ...) ; compiling (DEFMACRO VIEW-SORT-MAPS ...) ; compiling (DEFMACRO VIEW-OP-MAPS ...) ; compiling (DEFMACRO VIEW-DECL-FORM ...) ; compiling (DEFMACRO VIEW-INTERFACE ...) ; compiling (DEFMACRO VIEW-EXPORTING-OBJECTS ...) ; compiling (DEFMACRO VIEW-STATUS ...) ; compiling (DEFUN VIEW-P ...) ; compiling (DEFUN MODEXP-IS-VIEW ...) ; compiling (DEFUN VIEW-IS-INCONSISTENT ...) ; compiling (DEFUN MARK-VIEW-AS-CONSISTENT ...) ; compiling (DEFUN COPY-VIEW ...) ; compiling (DEFUN INITIALIZE-VIEW ...) ; compiling (DEFUN CLEAN-UP-VIEW ...) ; compiling (DEFSTRUCT INT-INSTANTIATION ...) ; file: /<>/chaos/primitives/bview2.lisp ; in: DEFSTRUCT INT-INSTANTIATION ; (DEFSTRUCT CHAOS::INT-INSTANTIATION ; (CHAOS::MODULE NIL :TYPE T) ; (CHAOS::ARGS NIL :TYPE LIST)) ; --> PROGN EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '# ; '#(# ; #)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CHAOS::INT-INSTANTIATION-P and ; CHAOS::INT-INSTANTIATION-MODULE could not be inlined because the structure ; definition for CHAOS::INT-INSTANTIATION 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. ; compiling (DEFSTRUCT INT-PLUS ...) ; compiling (DEFSTRUCT INT-RENAME ...) ; file: /<>/chaos/primitives/bview2.lisp ; in: DEFSTRUCT INT-RENAME ; (DEFSTRUCT CHAOS::INT-RENAME ; (CHAOS::MODULE NIL :TYPE T) ; (CHAOS::SORT-MAPS NIL :TYPE LIST) ; (CHAOS::OP-MAPS NIL :TYPE LIST)) ; --> PROGN EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '# ; '#(# ; #)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CHAOS::INT-RENAME-P and CHAOS::INT-RENAME-MODULE ; could not be inlined because the structure definition for CHAOS::INT-RENAME 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. ; compiling (DEFUN MODULE-EQ ...) ; compiling (DEFMACRO SAME-RENAMED-MODULE ...) ; compiling (DEFMACRO SAME-VIEW-MAPPING ...) ; compiling (DEFUN OUTER-EQUAL ...) ; compiling (DEFUN SAME-TOP-LEVEL ...) ; file: /<>/chaos/primitives/bview2.lisp ; in: DEFUN SAME-TOP-LEVEL ; (EVERY #'EQL CHAOS::ME1 CHAOS::ME2) ; --> BLOCK SB-INT:DX-FLET FLET BLOCK LET FUNCALL SB-C::%FUNCALL EQL IF ; ==> ; (EQL #:G7 #:G8) ; ; 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 GENERIC-EQL (cost 10) ; 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. ; compiling (DEFMACRO GET-RENAME-INFO ...) ; compiling (DEFUN CREATE-DUMMY-MODULE ...) ; compiling (DEFUN CREATE-DUMMY-MODULE-THEN-MAP ...) ; compiling (DEFUN MODULE-IS-RENAME-DUMMY-FOR ...) ; compiling (DEFUN IS-DUMMY-MODULE ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/chaos/primitives/bview2-TMP.fasl written ; compilation finished in 0:00:00.048 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/<>/chaos/primitives/parse-modexp.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DEFUN PARSE-MODEXP ...) ; compiling (DEFUN DO-PARSE-MODEXP ...) ; compiling (DEFUN PARSE-RENAME-OR-INST ...) ; compiling (DEFUN PARSE-MAP-BODY ...) ; compiling (DEFUN PARSE-MAP-ELT ...) ; compiling (DEFUN PARSE-INSTANTIATION ...) ; compiling (DECLAIM (SPECIAL *POSITIONAL-ARG-POS* ...)) ; compiling (DECLAIM (TYPE FIXNUM ...)) ; compiling (DEFVAR *POSITIONAL-ARG-POS* ...) ; compiling (DEFVAR *ARG-TYPE* ...) ; compiling (DEFUN MODEXP-PARSE-ARGS ...) ; compiling (DEFUN PARSE-INSTANTIATE-ARG-NAME ...) ; compiling (DEFUN MODEXP-PARSE-ARG ...) ; compiling (DEFUN PARSE-VIEW ...) ; compiling (DEFUN DO-PARSE-VIEW ...) ; compiling (DEFUN PARSE-VIEW-BODY ...) ; compiling (DEFUN PARSE-VIEW-ELT ...) ; compiling (DEFUN PARSE-SORT-REFERENCE ...) ; compiling (DEFUN DO-PARSE-SORT-REF ...) ; compiling (DEFUN PARSE-OPERATOR-REFERENCE ...) ; file: /<>/chaos/primitives/parse-modexp.lisp ; in: DEFUN PARSE-OPERATOR-REFERENCE ; (LENGTH (CAR CHAOS::*MODEXP-PARSE-INPUT*)) ; ; 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 VECTOR. ; (POSITION #\. CHAOS::MOD-REF) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; (LENGTH CHAOS::MOD-REF) ; ; 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 VECTOR. ; (SUBSEQ CHAOS::MOD-REF (1+ CHAOS::POS)) ; ; 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. ; compiling (DEFUN PARSE-OP-SIMPLE-NAME ...) ; compiling (DEFUN MODEXP-PARSE-PARAM-SPECN ...) ; compiling (DEFUN PARSE-BALANCED-CONTEXT ...) ; compiling (DEFUN PARSE-BALANCED-CONTEXT-ONE ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/chaos/primitives/parse-modexp-TMP.fasl written ; compilation finished in 0:00:00.087 ; compiling file "/<>/chaos/primitives/normodexp.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DECLAIM (TYPE LIST ...)) ; compiling (DEFVAR *MODEXP-NORMALIZED-TABLE* ...) ; compiling (DEFUN FIND-NORMALIZED-MODEXP ...) ; compiling (DEFUN ADD-MODEXP-NORMALIZED ...) ; compiling (DEFUN NORMALIZE-MODEXP ...) ; compiling (DEFUN CANONICALIZE-SIMPLE-MODULE-NAME ...) ; compiling (DEFUN DO-NORMALIZE-MODEXP ...) ; compiling (DEFUN NORMALIZE-RENAME ...) ; compiling (DEFUN NORMALIZE-PLUS ...) ; compiling (DEFUN NORMALIZE-INSTANTIATION ...) ; compiling (DEFUN NORMALIZE-INSTANTIATION-ARGS ...) ; compiling (DEFUN REORDER-MAPS ...) ; compiling (DEFUN NORMALIZE-RENAME-MAP ...) ; compiling (DEFUN NORMALIZE-VIEW ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/chaos/primitives/normodexp-TMP.fasl written ; compilation finished in 0:00:00.018 ; compiling file "/<>/chaos/primitives/bsort.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DEFSTRUCT (SORT-STRUCT # ...) ...) ; compiling (DEFMACRO SORT-MODULE ...) ; compiling (SETF (SYMBOL-FUNCTION #) ...) ; compiling (SETF (GET # ...) ...) ; compiling (SETF (GET # ...) ...) ; compiling (DEFSTRUCT (SORT* # ...)) ; file: /<>/chaos/primitives/bsort.lisp ; in: DEFSTRUCT SORT* ; (DEFSTRUCT ; (CHAOS::SORT* (:INCLUDE CHAOS::SORT-STRUCT (CHAOS::-TYPE 'SORT)) ; (:CONC-NAME "SORT-") (:COPIER NIL) (:CONSTRUCTOR CHAOS::MAKE-SORT) ; (:CONSTRUCTOR CHAOS::SORT* (CHAOS::ID &OPTIONAL CHAOS::HIDDEN)) ; (:PREDICATE CHAOS::SORT-P) (:PRINT-FUNCTION CHAOS::PRINT-SORT-OBJECT))) ; --> PROGN EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '# ; '#(# ; # ; # ; # ; #)) ; ; caught STYLE-WARNING: ; Previously compiled call to CHAOS::SORT-P could not be inlined because the ; structure definition for CHAOS::SORT* 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. ; compiling (SETF (SYMBOL-FUNCTION #) ...) ; compiling (SETF (GET # ...) ...) ; compiling (SETF (GET # ...) ...) ; compiling (SETF (GET # ...) ...) ; compiling (DEFMACRO SORT-TYPE ...) ; compiling (DEFMACRO SORT-NAME ...) ; compiling (DEFMACRO SORT-IS-INHABITED ...) ; compiling (DEFMACRO SORT-IS-HIDDEN ...) ; compiling (DEFMACRO SORT-IS-VISIBLE ...) ; compiling (DEFMACRO SORT-VISIBLE-TYPE ...) ; compiling (DEFMACRO SORT-CONSTRUCTORS ...) ; compiling (DEFUN SORT-IS-DERIVED-FROM ...) ; compiling (DEFUN GET-ORIGINAL-SORT ...) ; compiling (DEFMACRO SORT-IS-USER-DEFINED? ...) ; compiling (DEFUN SORT-VISIBLE-TYPE-PRINT ...) ; compiling (DEFUN PRINT-SORT-OBJECT ...) ; file: /<>/chaos/primitives/bsort.lisp ; in: DEFUN PRINT-SORT-OBJECT ; (FORMAT STREAM ":hsort[~s]" CHAOS::NAME) ; ==> ; (FORMAT SB-C::DEST ; (SB-INT:NAMED-LAMBDA ":hsort[~s]" ; (STREAM SB-FORMAT::FORMAT-ARG1 &REST SB-FORMAT::ARGS) ; (DECLARE (IGNORABLE STREAM SB-FORMAT::ARGS)) ; (BLOCK NIL ; (WRITE-STRING ":hsort[" STREAM) ; (PRIN1 SB-FORMAT::FORMAT-ARG1 STREAM) ; (WRITE-CHAR #\] STREAM)) ; NIL) ; #:G120) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a NULL. ; (FORMAT STREAM ":sort[~s]" CHAOS::NAME) ; ==> ; (FORMAT SB-C::DEST ; (SB-INT:NAMED-LAMBDA ":sort[~s]" ; (STREAM SB-FORMAT::FORMAT-ARG1 &REST SB-FORMAT::ARGS) ; (DECLARE (IGNORABLE STREAM SB-FORMAT::ARGS)) ; (BLOCK NIL ; (WRITE-STRING ":sort[" STREAM) ; (PRIN1 SB-FORMAT::FORMAT-ARG1 STREAM) ; (WRITE-CHAR #\] STREAM)) ; NIL) ; #:G130) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a NULL. ; compiling (DEFUN NEW-GENERAL-SORT ...) ; compiling (DEFVAR *SORT-TABLE* ...) ; compiling (DEFUN GET-SORT-NAMED ...) ; compiling (DEFUN CLEAR-TMP-SORT-CACHE ...) ; compiling (DEFUN REGISTER-SORT-CACHE ...) ; compiling (DEFSTRUCT (CRSORT # ...) ...) ; compiling (SETF (GET # ...) ...) ; compiling (SETF (SYMBOL-FUNCTION #) ...) ; compiling (SETF (GET # ...) ...) ; compiling (DEFUN PRINT-CR-SORT-OBJECT ...) ; compiling (DEFSTRUCT (CLASS-SORT # ...)) ; compiling (SETF (GET # ...) ...) ; compiling (SETF (SYMBOL-FUNCTION #) ...) ; compiling (SETF (GET # ...) ...) ; compiling (DEFUN PRINT-CLASS-SORT-OBJECT ...) ; compiling (DEFSTRUCT (RECORD-SORT # ...)) ; compiling (SETF (GET # ...) ...) ; compiling (SETF (GET # ...) ...) ; compiling (SETF (SYMBOL-FUNCTION #) ...) ; compiling (DEFUN PRINT-RECORD-SORT-OBJECT ...) ; compiling (DEFMACRO CRSORT-CONSTR-METHOD ...) ; compiling (DEFMACRO CRSORT-ID-METHOD ...) ; compiling (DEFMACRO CRSORT-ID-VARIABLE ...) ; compiling (DEFMACRO CRSORT-MAKE-1 ...) ; compiling (DEFMACRO CRSORT-MAKE-2 ...) ; compiling (DEFMACRO CRSORT-IS-A-COPY ...) ; compiling (DEFMACRO CRSORT-MAKE-3 ...) ; compiling (DEFMACRO CRSORT-MAKE-4 ...) ; compiling (DEFUN CREATE-CR-SORT ...) ; compiling (DEFUN NEW-RECORD-SORT ...) ; compiling (DEFUN NEW-CLASS-SORT ...) ; compiling (DEFMACRO FIND-SLOT-INFO ...) ; compiling (DEFMACRO CR-SLOT-NAME ...) ; compiling (DEFMACRO CR-SLOT-SORT ...) ; compiling (DEFMACRO CR-SLOT-DEFAULT ...) ; compiling (DEFMACRO CR-SLOT-ATTRIBUTE-ID ...) ; compiling (DEFMACRO CR-SLOT-ATTRIBUTE-ID-METHOD ...) ; compiling (DEFMACRO CR-SLOT-ATTRIBUTE-ID-VARIABLE ...) ; compiling (DEFMACRO CR-SLOT-READER ...) ; compiling (DEFMACRO CR-SLOT-WRITER ...) ; compiling (DEFMACRO GET-SLOT-SORT ...) ; compiling (DEFMACRO GET-SLOT-DEFAULT ...) ; compiling (DEFMACRO GET-ATTRIBUTE-ID ...) ; compiling (DEFMACRO GET-ATTRIBUTE-ID-METHOD ...) ; compiling (DEFMACRO GET-ATTRIBUTE-ID-VARIABLE ...) ; compiling (DEFMACRO GET-SLOT-READER ...) ; compiling (DEFMACRO GET-SLOT-WRITER ...) ; compiling (DEFSTRUCT (BSORT # ...) ...) ; compiling (SETF (SYMBOL-FUNCTION #) ...) ; compiling (SETF (GET # ...) ...) ; compiling (SETF (GET # ...) ...) ; compiling (DEFUN PRINT-BSORT-OBJECT ...) ; compiling (DEFUN NEW-BI-SORT ...) ; compiling (DEFMACRO SORT-IS-BUILTIN ...) ; compiling (DEFMACRO BSORT-TOKEN-PREDICATE ...) ; compiling (DEFMACRO BSORT-TERM-CREATOR ...) ; compiling (DEFMACRO BSORT-TERM-PRINTER ...) ; compiling (DEFMACRO BSORT-TERM-PREDICATE ...) ; compiling (DEFVAR *BUILTIN-SORT-TABLE* ...) ; compiling (DEFUN GET-BUILTIN-SORT-NAMED ...) ; compiling (DEFUN REGISTER-BUILTIN-SORT ...) ; compiling (DEFUN CLEAR-BUILTIN-SORTS ...) ; compiling (DEFSTRUCT (AND-SORT # ...) ...) ; compiling (SETF (GET # ...) ...) ; compiling (SETF (SYMBOL-FUNCTION #) ...) ; compiling (SETF (GET # ...) ...) ; compiling (DEFUN PRINT-AND-SORT-OBJECT ...) ; compiling (DEFUN NEW-AND-SORT ...) ; compiling (DEFSTRUCT (OR-SORT # ...) ...) ; compiling (SETF (GET # ...) ...) ; compiling (SETF (GET # ...) ...) ; compiling (SETF (SYMBOL-FUNCTION #) ...) ; compiling (DEFUN PRINT-OR-SORT-OBJECT ...) ; compiling (DEFUN NEW-OR-SORT ...) ; compiling (DEFSTRUCT (ERR-SORT # ...) ...) ; compiling (SETF (GET # ...) ...) ; compiling (SETF (GET # ...) ...) ; compiling (SETF (SYMBOL-FUNCTION #) ...) ; compiling (DEFUN PRINT-ERR-SORT-OBJECT ...) ; compiling (DEFUN NEW-ERR-SORT ...) ; compiling (DEFMACRO SORT= ...) ; compiling (DEFUN SORT=* ...) ; compiling (DEFMACRO SORT-SET-EQUAL ...) ; compiling (DEFMACRO SORT-LIST= ...) ; compiling (DEFMACRO MAKE-SORT-RELATION ...) ; compiling (DEFMACRO COPY-SORT-RELATION ...) ; compiling (DEFMACRO SORT-RELATION-SORT ...) ; compiling (DEFMACRO _SUBSORTS ...) ; compiling (DEFMACRO _SUPERSORTS ...) ; compiling (DEFMACRO _ERR-SORT ...) ; compiling (DEFUN ELIM-SYS-SORTS-FROM-RELATION ...) ; compiling (DEFTYPE SORT-ORDER ...) ; compiling (DEFUN ALLOCATE-SORT-ORDER ...) ; compiling (DEFUN CLEAR-SORT-ORDER ...) ; compiling (DEFMACRO GET-SORT-RELATION ...) ; compiling (DEFUN COPY-SORT-ORDER ...) ; compiling (DEFUN GET-ALL-SORTS ...) ; compiling (DEFMACRO SUBSORTS ...) ; compiling (DEFMACRO SUB-OR-EQUAL-SORTS ...) ; compiling (DEFMACRO SUPERSORTS ...) ; compiling (DEFMACRO SUPERSORTS-NO-ERR ...) ; compiling (DEFMACRO SUPER-OR-EQUAL-SORTS ...) ; compiling (DEFUN THE-ERR-SORT ...) ; compiling (DEFSETF THE-ERR-SORT ...) ; compiling (DECLAIM (INLINE SORT<)) ; compiling (DEFUN SORT< ...) ; compiling (DEFUN SORT<* ...) ; compiling (DEFMACRO SORT<= ...) ; compiling (DEFUN SORT<=* ...) ; compiling (DEFMACRO SORT-IS-IN ...) ; compiling (DEFUN SORT-LIST<= ...) ; compiling (DEFUN SORT-LIST<=-ANY ...) ; compiling (DEFUN SORT-LIST< ...) ; compiling (DEFUN ADD-SORT-TO-ORDER ...) ; compiling (DEFUN GATHER-CONNECTED-RELATIONS-FROM-ORDER ...) ; compiling (DEFUN ADD-RELATION-TO-ORDER ...) ; compiling (DEFUN MAX-MINORANTS ...) ; compiling (DEFUN MAXIMAL-SORTS ...) ; compiling (DEFUN MAXIMAL-SORTS-NO-ERROR ...) ; compiling (DEFUN MINIMAL-SORTS ...) ; compiling (DEFUN MEET-OF-SORTS ...) ; compiling (DEFUN MERGE-SORT-RELATIONS ...) ; compiling (DEFUN MERGE-SORT-ORDER ...) ; compiling (DEFUN MERGE-SORT-ORDER-NO-EXTRA ...) ; compiling (DEFUN IS-IN-SAME-CONNECTED-COMPONENT ...) ; compiling (DEFUN COMPONENT-TOP ...) ; compiling (DEFUN IS-IN-SAME-CONNECTED-COMPONENT* ...) ; file: /<>/chaos/primitives/bsort.lisp ; in: DEFUN IS-IN-SAME-CONNECTED-COMPONENT* ; (CHAOS::SUB-OR-EQUAL-SORTS CHAOS::S1 CHAOS::SO) ; --> LET IF CONS CHAOS::ERR-SORT-LOWERS TRULY-THE SB-KERNEL:%INSTANCE-REF THE ; ==> ; CHAOS::S1 ; ; note: deleting unreachable code ; (CHAOS::SUB-OR-EQUAL-SORTS CHAOS::S2 CHAOS::SO) ; --> LET IF CONS CHAOS::ERR-SORT-LOWERS TRULY-THE SB-KERNEL:%INSTANCE-REF THE ; ==> ; CHAOS::S2 ; ; note: deleting unreachable code ; compiling (DEFUN HAVE-COMMON-SUBSORT ...) ; compiling (DEFUN ALL-SORTS-IN-ORDER ...) ; compiling (DEFUN TOP-COMPONENTS ...) ; compiling (DEFUN BOTTOM-COMPONENTS ...) ; compiling (DEFUN DIRECT-SUBSORTS ...) ; compiling (DEFUN DIRECT-SUPERSORTS ...) ; compiling (DEFUN DIRECT-SUPERSORTS-NO-ERR ...) ; compiling (DEFUN SORT-RELATIONS-TRANSITIVE-CLOSURE ...) ; compiling (DEFUN SORT-RELATIONS-TRANSITIVE-CLOSURE1 ...) ; compiling (DEFUN CHECK-CYCLIC-SORT-ORDER ...) ; compiling (DEFUN CLEAR-ERR-SORTS ...) ; compiling (DEFUN GET-KINDS ...) ; compiling (DEFUN GET-ERR-SORTS ...) ; compiling (DEFUN GET-FAMILY ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/chaos/primitives/bsort-TMP.fasl written ; compilation finished in 0:00:00.381 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/<>/chaos/primitives/boperator.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DEFSTRUCT OPSYNTAX ...) ; compiling (DEFSTRUCT (OPERATOR # ...) ...) ; file: /<>/chaos/primitives/boperator.lisp ; in: DEFSTRUCT OPERATOR ; (DEFSTRUCT ; (CHAOS::OPERATOR (:INCLUDE CHAOS::OBJECT (CHAOS::-TYPE 'CHAOS::OPERATOR)) ; (:CONSTRUCTOR CHAOS::MAKE-OPERATOR) ; (:CONSTRUCTOR CHAOS::OPERATOR* (CHAOS::NAME)) (:COPIER NIL) ; (:PRINT-FUNCTION CHAOS::PRINT-OPERATOR-OBJECT)) ; (CHAOS::NAME NIL :TYPE LIST) ; (CHAOS::STRATEGY NIL :TYPE LIST) ; (CHAOS::THEORY NIL :TYPE (OR NULL CHAOS::OP-THEORY)) ; (CHAOS::SYNTAX NIL :TYPE (OR NULL CHAOS::OPSYNTAX)) ; (CHAOS::PRINT-NAME NIL :TYPE T) ; (CHAOS::HIDDEN NIL :TYPE (OR NULL T))) ; --> PROGN EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '# ; '#(# ; # ; # ; #)) ; ; caught STYLE-WARNING: ; Previously compiled call to CHAOS::OPERATOR-P could not be inlined because the ; structure definition for CHAOS::OPERATOR 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. ; compiling (SETF (SYMBOL-FUNCTION #) ...) ; compiling (SETF (GET # ...) ...) ; compiling (SETF (GET # ...) ...) ; compiling (DEFUN PRINT-OPERATOR-OBJECT ...) ; file: /<>/chaos/primitives/boperator.lisp ; in: DEFUN PRINT-OPERATOR-OBJECT ; (FORMAT STREAM ":op[~s : ~x]" (CHAOS::OPERATOR-NAME CHAOS::OBJ) ; (CHAOS::ADDR-OF CHAOS::OBJ)) ; ==> ; (FORMAT SB-C::DEST ; (SB-INT:NAMED-LAMBDA ":op[~s : ~x]" ; (STREAM SB-FORMAT::FORMAT-ARG1 SB-FORMAT::FORMAT-ARG2 &REST ; SB-FORMAT::ARGS) ; (DECLARE (IGNORABLE STREAM SB-FORMAT::ARGS)) ; (BLOCK NIL ; (WRITE-STRING ":op[" STREAM) ; (PRIN1 SB-FORMAT::FORMAT-ARG1 STREAM) ; (WRITE-STRING " : " STREAM) ; (LET (# #) ; (PRINC SB-FORMAT::FORMAT-ARG2 STREAM)) ; (WRITE-CHAR #\] STREAM)) ; NIL) ; #:G7 #:G8) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a NULL. ; (CHAOS::ADDR-OF CHAOS::OBJ) ; --> BLOCK LOGAND ; ==> ; (LOGAND 'SB-C::DUMMY 4294967295) ; ; note: forced to do LOGAND-WORD-MASK (cost 10) ; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 32). ; etc. ; (FORMAT STREAM ":op[~s : ~x]" (CHAOS::OPERATOR-NAME CHAOS::OBJ) ; (CHAOS::ADDR-OF CHAOS::OBJ)) ; ==> ; (FORMAT SB-C::DEST ; (SB-INT:NAMED-LAMBDA ":op[~s : ~x]" ; (STREAM SB-FORMAT::FORMAT-ARG1 SB-FORMAT::FORMAT-ARG2 &REST ; SB-FORMAT::ARGS) ; (DECLARE (IGNORABLE STREAM SB-FORMAT::ARGS)) ; (BLOCK NIL ; (WRITE-STRING ":op[" STREAM) ; (PRIN1 SB-FORMAT::FORMAT-ARG1 STREAM) ; (WRITE-STRING " : " STREAM) ; (LET (# #) ; (PRINC SB-FORMAT::FORMAT-ARG2 STREAM)) ; (WRITE-CHAR #\] STREAM)) ; NIL) ; #:G7 #:G8) ; ; note: doing unsigned word to integer coercion (cost 20) ; compiling (DEFMACRO OPERATOR-MODULE ...) ; compiling (DEFMACRO OPERATOR-SYMBOL ...) ; compiling (DEFMACRO OPERATOR-NUM-ARGS ...) ; compiling (DEFMACRO OPERATOR-ID ...) ; compiling (DEFMACRO OPERATOR-MODULE-ID ...) ; compiling (DEFMACRO OPERATOR-REWRITE-STRATEGY ...) ; compiling (DEFUN EXPLODE-OPERATOR-NAME ...) ; compiling (DEFUN MAKE-OPERATOR-TOKEN-SEQ ...) ; compiling (DEFUN OPERATOR-SYNTACTIC-TYPE-FROM-NAME ...) ; compiling (DEFMACRO OPERATOR= ...) ; compiling (DEFMACRO OPERATOR-EQL ...) ; compiling (DEFMACRO OPERATOR-EQUAL ...) ; compiling (DEFMACRO OPERATOR-IS-BEHAVIOURAL ...) ; compiling (DEFVAR *OPNAME-TABLE* ...) ; compiling (DEFUN CANONICALIZE-OP-NAME ...) ; compiling (DEFUN ALLOCATE-OPERATOR ...) ; compiling (DEFUN NEW-OPERATOR ...) ; compiling (DEFMACRO OPERATOR-TOKEN-SEQUENCE ...) ; compiling (DEFMACRO OPERATOR-IS-MIXFIX ...) ; compiling (DEFMACRO OPERATOR-SYNTACTIC-TYPE ...) ; compiling (DEFMACRO OPERATOR-PRECEDENCE ...) ; compiling (DEFMACRO OPERATOR-COMPUTED-PRECEDENCE ...) ; compiling (DEFMACRO OPERATOR-ASSOCIATIVITY ...) ; compiling (DEFUN MAKE-PRINT-OPERATOR-ID ...) ; file: /<>/chaos/primitives/boperator.lisp ; in: DEFUN MAKE-PRINT-OPERATOR-ID ; (STRING CHAOS::A) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; SYMBOL), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; SYMBOL), not a STRING. ; (STRING CHAOS::B) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; SYMBOL), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (SIMPLE-ARRAY CHARACTER (*)) ; (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING ; SYMBOL), not a STRING. ; compiling (DEFUN CMAKE-OPERATOR-PRINT-NAME ...) ; compiling (DEFUN MAKE-OPINFO ...) ; compiling (DEFUN OPINFO-P ...) ; compiling (DEFMACRO OPINFO-OPERATOR ...) ; compiling (DEFMACRO OPINFO-METHODS ...) ; compiling (DEFMACRO OPINFO-METHOD-TABLE ...) ; compiling (DEFMACRO GET-OPERATOR-INFO ...) ; compiling (DEFMACRO OPERATOR-METHODS ...) ; compiling (DEFMACRO OPERATOR-METHOD-TABLE ...) ; compiling (DEFMACRO OPERATOR-THEORY-INFO ...) ; compiling (DEFMACRO OPERATOR-IS-ASSOCIATIVE ...) ; compiling (DEFMACRO OPERATOR-IS-IDENTITY ...) ; compiling (DEFMACRO OPERATOR-IS-COMMUTATIVE ...) ; compiling (DEFSTRUCT (METHOD # ...) ...) ; compiling (SETF (SYMBOL-FUNCTION #) ...) ; compiling (SETF (GET # ...) ...) ; compiling (SETF (GET # ...) ...) ; compiling (DEFUN PRINT-METHOD-OBJECT ...) ; file: /<>/chaos/primitives/boperator.lisp ; in: DEFUN PRINT-METHOD-OBJECT ; (FORMAT STREAM ":op[~a]" (CHAOS::METHOD-NAME CHAOS::OBJ)) ; ==> ; (FORMAT SB-C::DEST ; (SB-INT:NAMED-LAMBDA ":op[~a]" ; (STREAM SB-FORMAT::FORMAT-ARG1 &REST SB-FORMAT::ARGS) ; (DECLARE (IGNORABLE STREAM SB-FORMAT::ARGS)) ; (BLOCK NIL ; (WRITE-STRING ":op[" STREAM) ; (PRINC SB-FORMAT::FORMAT-ARG1 STREAM) ; (WRITE-CHAR #\] STREAM)) ; NIL) ; #:G7) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a NULL. ; compiling (DEFMACRO CREATE-OPERATOR-METHOD ...) ; compiling (DEFMACRO OPERATOR-METHOD-P ...) ; compiling (DEFMACRO METHOD-MODULE ...) ; compiling (DEFMACRO METHOD-SYMBOL ...) ; compiling (DEFMACRO METHOD-IS-BEHAVIOURAL ...) ; compiling (DEFMACRO METHOD-IS-USER-DEFINED-ERROR-METHOD ...) ; compiling (DEFMACRO METHOD-IS-FOR-CR ...) ; compiling (DEFUN METHOD-IS-DERIVED-FROM ...) ; compiling (DEFMACRO METHOD-IS-CONSTRUCTOR? ...) ; compiling (DEFMACRO METHOD-IS-META-DEMOD ...) ; compiling (DEFUN ALLOCATE-OPERATOR-METHOD ...) ; compiling (DEFUN MAKE-METHOD-ID-SYMBOL ...) ; file: /<>/chaos/primitives/boperator.lisp ; in: DEFUN MAKE-METHOD-ID-SYMBOL ; (STRING= CHAOS::X "_") ; ==> ; (SB-KERNEL:STRING=* SB-C::STRING1 SB-C::STRING2 SB-C::START1 SB-C::END1 ; SB-C::START2 SB-C::END2) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a STRING. ; (FIND-IF #'(LAMBDA (CHAOS::X) (STRING= CHAOS::X "_")) (CAR CHAOS::NAM)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR CONS NULL VECTOR). ; compiling (DEFUN MAKE-OPERATOR-METHOD ...) ; compiling (DEFMACRO METHOD-EQUAL ...) ; compiling (DEFMACRO METHOD= ...) ; compiling (DEFUN METHOD-W= ...) ; compiling (DEFMACRO METHOD-HAS-SAME-NAME ...) ; compiling (DEFUN METHOD-IS-OF-SAME-OPERATOR ...) ; compiling (DEFMACRO METHOD-IS-OF-SAME-OPERATOR+ ...) ; compiling (DEFUN METHOD-IS-PREDICATE ...) ; file: /<>/chaos/primitives/boperator.lisp ; in: DEFUN METHOD-IS-PREDICATE ; (MEMBER CHAOS::*BOOL-SORT* (CHAOS::METHOD-ARITY CHAOS::METHOD)) ; ==> ; (SB-KERNEL:%MEMBER SB-C::ITEM LIST) ; ; note: unable to ; optimize ; due to type uncertainty: ; can't tell whether the first argument is a (OR FIXNUM (NOT NUMBER)) ; compiling (DEFUN FIND-METHOD-IN-METHOD-LIST ...) ; compiling (DEFSTRUCT (!METHOD-INFO # ...) ...) ; compiling (SETF (SYMBOL-FUNCTION #) ...) ; compiling (SETF (GET # ...) ...) ; compiling (SETF (GET # ...) ...) ; compiling (DECLAIM (INLINE GET-METHOD-INFO)) ; compiling (DEFUN GET-METHOD-INFO ...) ; compiling (DEFSETF GET-METHOD-INFO ...) ; compiling (DEFMACRO METHOD-OPERATOR ...) ; compiling (DEFMACRO METHOD-THEORY ...) ; compiling (DEFMACRO METHOD-THEORY-INFO-FOR-MATCHING ...) ; compiling (DEFMACRO METHOD-LOWER-METHODS ...) ; compiling (DEFMACRO METHOD-OVERLOADED-METHODS ...) ; compiling (DEFMACRO METHOD-RULES-WITH-SAME-TOP ...) ; compiling (DEFMACRO METHOD-RULES-WITH-DIFFERENT-TOP ...) ; compiling (DEFMACRO METHOD-MACROS ...) ; compiling (DEFMACRO METHOD-RULES ...) ; compiling (DEFMACRO METHOD-STRICTLY-OVERLOADED ...) ; compiling (DEFMACRO METHOD-REW-STRATEGY ...) ; compiling (DEFMACRO METHOD-REWRITE-STRATEGY ...) ; compiling (DEFMACRO METHOD-HAS-TRANS-RULE ...) ; compiling (DEFMACRO METHOD-IS-COHERENT ...) ; compiling (DEFMACRO METHOD-COHERENT ...) ; compiling (DEFUN ALLOCATE-METHOD-INFO ...) ; compiling (DEFUN MAKE-METHOD-INFO ...) ; compiling (DEFUN COMPUTE-METHOD-THEORY-INFO-FOR-MATCHING ...) ; compiling (DEFUN GET-METHOD-PRECEDENCE ...) ; compiling (DEFPARAMETER .DEFAULT-PREC. ...) ; compiling (DEFPARAMETER .DEFAULT-UNARY-PREC. ...) ; compiling (DEFUN COMPUTE-OPERATOR-PRECEDENCE ...) ; compiling (DEFSTRUCT (RULE-RING #) ...) ; compiling (DEFUN CREATE-RULE-RING ...) ; compiling (DEFUN ADD-RULE-TO-RING ...) ; compiling (DECLAIM (INLINE INITIALIZE-RULE-RING)) ; compiling (DEFUN INITIALIZE-RULE-RING ...) ; compiling (DECLAIM (INLINE RULE-RING-SET-MARK)) ; compiling (DEFUN RULE-RING-SET-MARK ...) ; compiling (DECLAIM (INLINE RULE-RING-NEXT)) ; compiling (DEFUN RULE-RING-NEXT ...) ; compiling (DECLAIM (INLINE END-OF-RULE-RING)) ; compiling (DEFUN END-OF-RULE-RING ...) ; compiling (DECLAIM (INLINE RULE-RING-IS-EMPTY)) ; compiling (DEFUN RULE-RING-IS-EMPTY ...) ; compiling (DECLAIM (INLINE RULE-RING-TO-LIST)) ; compiling (DEFUN RULE-RING-TO-LIST ...) ; compiling (DEFUN COPY-RULE-RING ...) ; compiling (DEFUN METHOD-IS-ERROR-METHOD ...) ; compiling (DEFUN METHOD-IS-UNIVERSAL ...) ; compiling (DEFUN METHOD-IS-UNIVERSAL* ...) ; compiling (DEFUN METHOD-IS-ASSOCIATIVE ...) ; compiling (DEFUN METHOD-IS-IDENTITY ...) ; compiling (DEFUN METHOD-IS-COMMUTATIVE ...) ; compiling (DEFUN METHOD-IS-IDEMPOTENT ...) ; compiling (DEFUN METHOD-IS-OVERLOADED-WITH ...) ; compiling (DEFUN METHOD-IS-IN-SAME-COMPONENT ...) ; compiling (DEFUN METHOD-IS-INSTANCE-OF ...) ; compiling (DEFUN METHOD-IS-SAME-QUAL-METHOD ...) ; compiling (DEFUN METHOD<= ...) ; compiling (DEFUN METHOD-IS-RESTRICTION-OF ...) ; compiling (DECLAIM (INLINE METHOD-IS-ASSOCIATIVE-RESTRICTION-OF)) ; compiling (DEFUN METHOD-IS-ASSOCIATIVE-RESTRICTION-OF ...) ; compiling (DECLAIM (INLINE METHOD-IS-AC-RESTRICTION-OF)) ; compiling (DEFUN METHOD-IS-AC-RESTRICTION-OF ...) ; compiling (DECLAIM (INLINE METHOD-IS-COMMUTATIVE-RESTRICTION-OF)) ; compiling (DEFUN METHOD-IS-COMMUTATIVE-RESTRICTION-OF ...) ; compiling (DEFUN METHOD-IS-OVERLOADED-WITH-AC-ATTRIBUTE ...) ; compiling (DEFUN GREATEST-AC-METHOD-LESS-THAN ...) ; compiling (DEFUN LIST-ASSOCIATIVE-METHOD-ABOVE ...) ; compiling (DEFUN HIGHEST-METHODS-BELOW ...) ; compiling (DEFUN GET-DEFAULT-METHODS ...) ; compiling (DEFUN LOWEST-METHOD-DIRECT ...) ; compiling (DEFUN HIGHEST-METHOD-DIRECT ...) ; compiling (DEFUN STRICT-LOWER-COARITIES-DIRECT ...) ; compiling (DEFUN CHOOSE-MOST-GENERAL-OP ...) ; compiling (DEFUN CHOOSE-LOWEST-OP ...) ; compiling (DEFUN LOWEST-METHOD ...) ; compiling (DEFUN LOWEST-METHOD! ...) ; compiling (DEFUN LOWEST-METHOD* ...) ; compiling (DEFUN HIGHEST-METHOD ...) ; compiling (DEFUN GET-STRICT-LOWER-COARITIES ...) ; compiling (DEFUN METHOD-ALL-RULES ...) ; compiling (DEFUN MAKE-OPERATOR-INTERNAL ...) ; file: /<>/chaos/primitives/boperator.lisp ; in: DEFUN MAKE-OPERATOR-INTERNAL ; (> CHAOS::T-CNT 0) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (INCF CHAOS::T-CNT) ; --> SETQ THE ; ==> ; (+ 1 CHAOS::T-CNT) ; ; 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 ; associate +/- of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &REST T). ; etc. ; (> CHAOS::T-CNT 0) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/chaos/primitives/boperator-TMP.fasl written ; compilation finished in 0:00:00.332 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/<>/chaos/primitives/baxioms.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DEFSTRUCT (REWRITE-RULE # ...) ...) ; compiling (SETF (GET # ...) ...) ; compiling (SETF (SYMBOL-FUNCTION #) ...) ; compiling (SETF (GET # ...) ...) ; compiling (DEFUN PRINT-RULE-OBJECT ...) ; file: /<>/chaos/primitives/baxioms.lisp ; in: DEFUN PRINT-RULE-OBJECT ; (FORMAT STREAM ":rule[~S: " (CHAOS::ADDR-OF CHAOS::OBJ)) ; ==> ; (FORMAT SB-C::DEST ; (SB-INT:NAMED-LAMBDA ":rule[~S: " ; (STREAM SB-FORMAT::FORMAT-ARG1 &REST SB-FORMAT::ARGS) ; (DECLARE (IGNORABLE STREAM SB-FORMAT::ARGS)) ; (BLOCK NIL ; (WRITE-STRING ":rule[" STREAM) ; (PRIN1 SB-FORMAT::FORMAT-ARG1 STREAM) ; (WRITE-STRING ": " STREAM)) ; NIL) ; #:G7) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a NULL. ; (FORMAT STREAM "]") ; ==> ; (FORMAT SB-C::DEST ; (SB-INT:NAMED-LAMBDA "]" ; (STREAM &REST SB-FORMAT::ARGS) ; (DECLARE (IGNORABLE STREAM SB-FORMAT::ARGS)) ; (BLOCK NIL (WRITE-CHAR #\] STREAM)) ; NIL)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a NULL. ; (FORMAT STREAM ":rule[~a]" (CHAOS::REWRITE-RULE-TYPE CHAOS::OBJ)) ; ==> ; (FORMAT SB-C::DEST ; (SB-INT:NAMED-LAMBDA ":rule[~a]" ; (STREAM SB-FORMAT::FORMAT-ARG1 &REST SB-FORMAT::ARGS) ; (DECLARE (IGNORABLE STREAM SB-FORMAT::ARGS)) ; (BLOCK NIL ; (WRITE-STRING ":rule[" STREAM) ; (PRINC SB-FORMAT::FORMAT-ARG1 STREAM) ; (WRITE-CHAR #\] STREAM)) ; NIL) ; #:G25) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a NULL. ; (CHAOS::ADDR-OF CHAOS::OBJ) ; --> BLOCK LOGAND ; ==> ; (LOGAND 'SB-C::DUMMY 4294967295) ; ; note: forced to do LOGAND-WORD-MASK (cost 10) ; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 32). ; etc. ; (FORMAT STREAM ":rule[~S: " (CHAOS::ADDR-OF CHAOS::OBJ)) ; ==> ; (FORMAT SB-C::DEST ; (SB-INT:NAMED-LAMBDA ":rule[~S: " ; (STREAM SB-FORMAT::FORMAT-ARG1 &REST SB-FORMAT::ARGS) ; (DECLARE (IGNORABLE STREAM SB-FORMAT::ARGS)) ; (BLOCK NIL ; (WRITE-STRING ":rule[" STREAM) ; (PRIN1 SB-FORMAT::FORMAT-ARG1 STREAM) ; (WRITE-STRING ": " STREAM)) ; NIL) ; #:G7) ; ; note: doing unsigned word to integer coercion (cost 20) ; compiling (DEFMACRO RULE-TYPE ...) ; compiling (DEFMACRO RULE-IS-RULE ...) ; compiling (DEFMACRO RULE-IS-EQUATION ...) ; compiling (DEFMACRO RULE-LHS ...) ; compiling (DEFMACRO RULE-RHS ...) ; compiling (DEFMACRO RULE-CONDITION ...) ; compiling (DEFMACRO RULE-ID-CONDITION ...) ; compiling (DEFMACRO RULE-FIRST-MATCH-METHOD ...) ; compiling (DEFMACRO RULE-NEXT-MATCH-METHOD ...) ; compiling (DEFMACRO RULE-LABELS ...) ; compiling (DEFMACRO RULE-IS-BEHAVIOURAL ...) ; compiling (DEFMACRO RULE-TRACE-FLAG ...) ; compiling (DEFMACRO RULE-NEED-COPY ...) ; compiling (DEFMACRO RULE-NON-EXEC ...) ; compiling (DEFMACRO RULE-META-AND-OR ...) ; compiling (DEFSTRUCT (EX-REWRITE-RULE # ...) ...) ; compiling (SETF (GET # ...) ...) ; compiling (SETF (SYMBOL-FUNCTION #) ...) ; compiling (SETF (GET # ...) ...) ; compiling (DEFMACRO RULE-EXTENSIONS ...) ; compiling (DEFMACRO REWIRTE-RULE-P ...) ; compiling (DEFMACRO IS-REWRITE-RULE? ...) ; compiling (DEFMACRO CREATE-REWRITE-RULE ...) ; compiling (DEFSTRUCT (AXIOM # ...) ...) ; file: /<>/chaos/primitives/baxioms.lisp ; in: DEFSTRUCT AXIOM ; (DEFSTRUCT ; (CHAOS::AXIOM (:INCLUDE CHAOS::REWRITE-RULE (CHAOS::-TYPE 'CHAOS::AXIOM)) ; (:COPIER NIL) (:CONSTRUCTOR CHAOS::MAKE-AXIOM) ; (:CONSTRUCTOR CHAOS::AXIOM* ; (TYPE CHAOS::LHS CHAOS::RHS CONDITION CHAOS::BEHAVIOURAL)) ; (:PRINT-FUNCTION CHAOS::PRINT-AXIOM-OBJECT)) ; (CHAOS::KIND NIL :TYPE SYMBOL)) ; --> PROGN EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '# ; '#(# ; # ; # ; # ; #)) ; ; caught STYLE-WARNING: ; Previously compiled call to CHAOS::AXIOM-P could not be inlined because the ; structure definition for CHAOS::AXIOM 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. ; compiling (SETF (GET # ...) ...) ; compiling (SETF (GET # ...) ...) ; compiling (SETF (SYMBOL-FUNCTION #) ...) ; compiling (DEFUN PRINT-AXIOM-OBJECT ...) ; file: /<>/chaos/primitives/baxioms.lisp ; in: DEFUN PRINT-AXIOM-OBJECT ; (FORMAT STREAM ":axiom[~S]" (CHAOS::ADDR-OF CHAOS::OBJ)) ; ==> ; (FORMAT SB-C::DEST ; (SB-INT:NAMED-LAMBDA ":axiom[~S]" ; (STREAM SB-FORMAT::FORMAT-ARG1 &REST SB-FORMAT::ARGS) ; (DECLARE (IGNORABLE STREAM SB-FORMAT::ARGS)) ; (BLOCK NIL ; (WRITE-STRING ":axiom[" STREAM) ; (PRIN1 SB-FORMAT::FORMAT-ARG1 STREAM) ; (WRITE-CHAR #\] STREAM)) ; NIL) ; #:G7) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR BOOLEAN STREAM (VECTOR CHARACTER) (VECTOR NIL) ; BASE-STRING), not a NULL. ; (CHAOS::ADDR-OF CHAOS::OBJ) ; --> BLOCK LOGAND ; ==> ; (LOGAND 'SB-C::DUMMY 4294967295) ; ; note: forced to do LOGAND-WORD-MASK (cost 10) ; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 32). ; etc. ; (FORMAT STREAM ":axiom[~S]" (CHAOS::ADDR-OF CHAOS::OBJ)) ; ==> ; (FORMAT SB-C::DEST ; (SB-INT:NAMED-LAMBDA ":axiom[~S]" ; (STREAM SB-FORMAT::FORMAT-ARG1 &REST SB-FORMAT::ARGS) ; (DECLARE (IGNORABLE STREAM SB-FORMAT::ARGS)) ; (BLOCK NIL ; (WRITE-STRING ":axiom[" STREAM) ; (PRIN1 SB-FORMAT::FORMAT-ARG1 STREAM) ; (WRITE-CHAR #\] STREAM)) ; NIL) ; #:G7) ; ; note: doing unsigned word to integer coercion (cost 20) ; compiling (DEFMACRO IS-AXIOM? ...) ; compiling (DEFMACRO AXIOM-IS-BEHAVIOURAL ...) ; compiling (DEFMACRO AXIOM-IS-FOR-CR ...) ; compiling (DEFMACRO AXIOM-CONTAINS-MATCH-OP ...) ; compiling (DEFUN AXIOM-EXTENSIONS ...) ; compiling (DEFSETF AXIOM-EXTENSIONS ...) ; compiling (DEFMACRO AXIOM-AC-EXTENSION ...) ; compiling (DEFMACRO AXIOM-A-EXTENSIONS ...) ; compiling (DEFMACRO !AXIOM-AC-EXTENSION ...) ; compiling (DEFMACRO !AXIOM-A-EXTENSIONS ...) ; compiling (DEFUN CREATE-AXIOM ...) ; compiling (DEFMACRO RULE-IS-BUILTIN ...) ; compiling (DEFUN AXIOM-CONTAINS-ERROR-METHOD? ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/chaos/primitives/baxioms-TMP.fasl written ; compilation finished in 0:00:00.115 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/<>/chaos/primitives/bmacro.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DEFSTRUCT (MACRO #) ...) ; compiling (DEFUN PRINT-MACRO ...) ; file: /<>/chaos/primitives/bmacro.lisp ; in: DEFUN PRINT-MACRO ; (CHAOS::ADDR-OF CHAOS::MACRO) ; --> BLOCK LOGAND ; ==> ; (LOGAND 'SB-C::DUMMY 4294967295) ; ; note: forced to do LOGAND-WORD-MASK (cost 10) ; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 32). ; etc. ; (FORMAT T "#" (CHAOS::ADDR-OF CHAOS::MACRO)) ; --> FORMAT SB-INT:NAMED-LAMBDA FUNCTION BLOCK LET ; ==> ; (PRINC SB-FORMAT::FORMAT-ARG1 STREAM) ; ; note: doing unsigned word to integer coercion (cost 20) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/chaos/primitives/bmacro-TMP.fasl written ; compilation finished in 0:00:00.010 ; compiling file "/<>/chaos/primitives/gen-eval.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DECLAIM (SPECIAL *DRIBBLE-AST* ...)) ; compiling (DEFVAR *DRIBBLE-AST* ...) ; compiling (DEFVAR *DRIBBLE-STREAM* ...) ; compiling (DEFVAR *AST-LOG* ...) ; compiling (DEFVAR *NO-LOG-PARAMETER* ...) ; compiling (DECLAIM (SPECIAL *EVAL-AST*)) ; compiling (DEFVAR *EVAL-AST* ...) ; compiling (DEFUN AST-TO-BE-DRIBBLED? ...) ; compiling (DEFUN EVAL-AST ...) ; file: /<>/chaos/primitives/gen-eval.lisp ; in: DEFUN EVAL-AST ; (STRING CHAOS::MODULE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a STRING. ; (FUNCALL CHAOS::EVALUATOR CHAOS::AST) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CHAOS::EVALUATOR) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; EVALUATOR is not known to be a function ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; EVALUATOR is not known to be a function ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; EVALUATOR is not known to be a function ; compiling (DEFUN EVAL-SEQ ...) ; compiling (DEFUN EVAL-AST2 ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/chaos/primitives/gen-eval-TMP.fasl written ; compilation finished in 0:00:00.012 ; compiling file "/<>/chaos/primitives/gen-print.lisp" (written 08 OCT 2015 01:43:01 AM): ; compiling (IN-PACKAGE :CHAOS) ; compiling (DECLAIM (OPTIMIZE # ...)) ; compiling (DECLAIM (SPECIAL *CURRENT-TERM-DEPTH*) ...) ; compiling (DEFVAR *CURRENT-TERM-DEPTH* ...) ; compiling (DECLAIM (SPECIAL .PRINTED-VARS-SO-FAR.)) ; compiling (DEFVAR .PRINTED-VARS-SO-FAR. ...) ; compiling (DECLAIM (SPECIAL **PRINT-VAR-SORT**)) ; compiling (DEFVAR **PRINT-VAR-SORT** ...) ; compiling (DEFUN PRINT-VARIABLE ...) ; file: /<>/chaos/primitives/gen-print.lisp ; in: DEFUN PRINT-VARIABLE ; (STRING (CHAOS::VARIABLE$PRINT-NAME CHAOS::BODY)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a STRING. ; compiling (DEFUN PRINT-AST-VD ...) ; compiling (DEFUN IS-AST ...) ; compiling (DEFVAR *PRINT-TERM-COLOR* ...) ; compiling (DEFUN VARIABLE-PRINT-STRING ...) ; file: /<>/chaos/primitives/gen-print.lisp ; in: DEFUN VARIABLE-PRINT-STRING ; (STRING (CHAOS::VARIABLE-PRINT-NAME CHAOS::TERM)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a STRING. ; compiling (DEFUN BCONST-PRINT-STRING ...) ; file: /<>/chaos/primitives/gen-print.lisp ; in: DEFUN BCONST-PRINT-STRING ; (FUNCALL (CHAOS::BSORT-TERM-PRINTER (CHAOS::TERM-SORT CHAOS::TERM)) ; CHAOS::VAL) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN ; (CHAOS::BSORT-TERM-PRINTER (CHAOS::TERM-SORT CHAOS::TERM))) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; compiling (DEFUN TERM-TO-SEXPR ...) ; compiling (DEFUN IS-SELF-TERMINATING ...) ; file: /<>/chaos/primitives/gen-print.lisp ; in: DEFUN IS-SELF-TERMINATING ; (CHAR CHAOS::TOK 0) ; --> AREF ; ==> ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX) ; ; 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. ; compiling (DEFUN TERM-PRINT1 ...) ; file: /<>/chaos/primitives/gen-print.lisp ; in: DEFUN TERM-PRINT1 ; (STRING CHAOS::I) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a STRING. ; compiling (DEFUN TERM-PRINT2 ...) ; file: /<>/chaos/primitives/gen-print.lisp ; in: DEFUN TERM-PRINT2 ; (LENGTH CHAOS::SUBS) ; ; 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 VECTOR. ; (* CHAOS::X 15) ; ; note: unable to ; recode as leas, shifts and adds ; due to type uncertainty: ; The first argument is a (INTEGER * 536870908), not a (UNSIGNED-BYTE 32). ; The result is a (VALUES (INTEGER * 8053063620) &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE ; 32) ; &REST T). ; ; note: unable to ; recode as leas, shifts and adds ; due to type uncertainty: ; The first argument is a (INTEGER * 536870908), not a FIXNUM. ; The result is a (VALUES (INTEGER * 8053063620) &OPTIONAL), not a (VALUES ; FIXNUM ; &REST T). ; (STRING CHAOS::I) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a STRING. ; (<= CHAOS::PREC (CHAOS::GET-METHOD-PRECEDENCE CHAOS::HD)) ; --> OR LET IF = IF ; ==> ; (= SB-C::X SB-C::Y) ; ; note: unable to open code because: The operands might not be the same type. ; --> OR LET < IF ; ==> ; (< SB-C::X SB-C::Y) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; (* CHAOS::X 15) ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 3) because: ; The first argument is a (INTEGER * 536870908), not a FIXNUM. ; The result is a (VALUES (INTEGER * 8053063620) &OPTIONAL), not a (VALUES ; FIXNUM ; &REST T). ; unable to do inline fixnum arithmetic (cost 4) because: ; The first argument is a (INTEGER * 536870908), not a FIXNUM. ; The result is a (VALUES (INTEGER * 8053063620) &OPTIONAL), not a (VALUES ; FIXNUM ; &REST T). ; etc. ; (1- CHAOS::X) ; ==> ; (- CHAOS::X 1) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a (INTEGER * 536870908), not a FIXNUM. ; The result is a (VALUES (INTEGER * 536870907) &OPTIONAL), not a (VALUES ; FIXNUM ; &REST T). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER * 536870908), not a FIXNUM. ; The result is a (VALUES (INTEGER * 536870907) &OPTIONAL), not a (VALUES ; FIXNUM ; &REST T). ; etc. ; compiling (DEFUN TERM-PRINT ...) ; compiling (DEFUN TERM-PRINT-WITH-SORT ...) ; compiling (DEFUN TERM-PRINT-WITH-SORT-STRING ...) ; file: /<>/chaos/primitives/gen-print.lisp ; in: DEFUN TERM-PRINT-WITH-SORT-STRING ; (CHAOS::TERM-PRINT-WITH-SORT CHAOS::TERM CHAOS::STR) ; ; note: deleting unreachable code ; (LET ((CHAOS::STR ; (MAKE-ARRAY '(0) :ELEMENT-TYPE 'BASE-CHAR :FILL-POINTER 0 :ADJUSTABLE ; T))) ; (WITH-OUTPUT-TO-STRING (CHAOS::S CHAOS::STR) ; (CHAOS::TERM-PRINT-WITH-SORT CHAOS::TERM CHAOS::STR)) ; CHAOS::STR) ; ==> ; CHAOS::STR ; ; note: deleting unreachable code ; (CHAOS::TERM-PRINT-WITH-SORT CHAOS::TERM CHAOS::STR) ; ; caught WARNING: ; Derived type of STR is ; (VALUES (AND BASE-STRING (NOT SIMPLE-ARRAY)) &OPTIONAL), ; conflicting with its asserted type ; STREAM. ; See also: ; The SBCL Manual, Node "Handling of Types" ; compiling (DEFUN PRINT-TERM-SEQ ...) ; compiling (DEFVAR *SHOW-SORT* ...) ; compiling (DEFUN PRINT-TERM-TREE ...) ; compiling (DEFUN PRINT-TERM-GRAPH ...) ; compiling (DEFUN !PRINT-TERM-TREE ...) ; file: /<>/chaos/primitives/gen-print.lisp ; in: DEFUN !PRINT-TERM-TREE ; (IF SORT ; (CHAOS::SORT-ID SORT) ; "unknown") ; ==> ; "unknown" ; ; note: deleting unreachable code ; (STRING (CHAOS::VARIABLE-PRINT-NAME CHAOS::TERM)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING ; SYMBOL CHARACTER), not a STRING. ; (FUNCALL CHAOS::LEAF-NAME CHAOS::TREE) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CHAOS::LEAF-NAME) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; compiling (DEFUN PRINT-AST ...) ; compiling (DEFUN PRINT-CHAOS-OBJECT ...) ; file: /<>/chaos/primitives/gen-print.lisp ; in: DEFUN PRINT-CHAOS-OBJECT ; (FUNCALL CHAOS::PRINTER CHAOS::OBJECT STREAM) ; --> SB-C::%FUNCALL THE ; ==> ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN CHAOS::PRINTER) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; PRINTER is not known to be a function ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; PRINTER is not known to be a function ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; PRINTER is not known to be a function ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; PRINTER is not known to be a function ; (FORMAT STREAM "~%-- delcrations -------------------") ; ==> ; (FORMAT SB-C::DEST ; (SB-INT:NAMED-LAMBDA "~%-- delcrations -------------------" ; (STREAM &REST SB-FORMAT::ARGS) ; (DECLARE (IGNORABLE STREAM SB-FORMAT::ARGS)) ; (BLOCK NIL ; (WRITE-STRING " ; -- delcrations -------------------" ; STREAM)) ; NIL)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STREAM BOOLEAN), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STREAM BOOLEAN), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STREAM BOOLEAN), not a NULL. ; compiling (DEFUN PRINT-OBJ-LIST ...) ; compiling (DEFUN PRINT-THEORY-BRIEF ...) ; compiling (DEFUN PRINT-THEORY ...) ; compiling (DEFUN PRINT-THEORY-INFO ...) ; compiling (DEFUN PRINT-SIMPLE-PRINC-FLAT ...) ; compiling (DEFUN DUMP-CHAOS-HASH ...) ; compiling (DEFUN DUMP-CHAOS-ASSOC-TABLE ...) ; compiling (DEFUN DUMP-MODEXP-LOCAL ...) ; compiling (DEFUN DUMP-MODULES-SO-FAR ...) ; compiling (DEFUN DUMP-MODEXP-EVAL ...) ; compiling (DEFUN DUMP-MODEXP-VIEW ...) ; /<>/tmpcache/common-lisp/sbcl-1.4.1.debian-linux-x86/<>/chaos/primitives/gen-print-TMP.fasl written ; compilation finished in 0:00:00.106 debugger invoked on a UIOP/LISP-BUILD:COMPILE-FILE-ERROR in thread #: COMPILE-FILE-ERROR while compiling # Type HELP for debugger help, or (SB-EXT:EXIT) to exit from SBCL. restarts (invokable by number or by possibly-abbreviated name): 0: [RETRY ] Retry compiling #. 1: [ACCEPT ] Continue, treating compiling # as having been successful. 2: Retry ASDF operation. 3: [CLEAR-CONFIGURATION-AND-RETRY] Retry ASDF operation after resetting the configuration. 4: [ABORT ] Exit debugger, returning to top level. (UIOP/LISP-BUILD:CHECK-LISP-COMPILE-RESULTS NIL T T "~/asdf-action::format-action/" ((# . #))) error finding frame source: Bogus form-number: the source file has probably changed too much to cope with. source: NIL 0] ; ; compilation unit aborted ; caught 2 fatal ERROR conditions ; caught 1 WARNING condition ; caught 8 STYLE-WARNING conditions ; printed 443 notes * chmod +x dumps/sbcl/cafeobj.sbcl chmod: cannot access 'dumps/sbcl/cafeobj.sbcl': No such file or directory Makefile:258: recipe for target 'dumps/sbcl/cafeobj.sbcl' failed make[1]: *** [dumps/sbcl/cafeobj.sbcl] Error 1 make[1]: Leaving directory '/<>' debian/rules:23: recipe for target 'build-arch-stamp' failed make: *** [build-arch-stamp] Error 2 dpkg-buildpackage: error: debian/rules build-arch subprocess returned exit status 2 -------------------------------------------------------------------------------- Build finished at 20171223-2125 Finished -------- E: Build failure (dpkg-buildpackage died) +------------------------------------------------------------------------------+ | Cleanup | +------------------------------------------------------------------------------+ Purging /<> Not removing build depends: as requested +------------------------------------------------------------------------------+ | Summary | +------------------------------------------------------------------------------+ Build Architecture: i386 Build-Space: 20804 Build-Time: 9 Distribution: bionic Fail-Stage: build Host Architecture: i386 Install-Time: 67 Job: cafeobj_1.5.5-1.dsc Machine Architecture: amd64 Package: cafeobj Package-Time: 76 Source-Version: 1.5.5-1 Space: 20804 Status: attempted Version: 1.5.5-1 -------------------------------------------------------------------------------- Finished at 20171223-2125 Build needed 00:01:16, 20804k disc space RUN: /usr/share/launchpad-buildd/slavebin/in-target scan-for-processes --backend=chroot --series=bionic --arch=i386 PACKAGEBUILD-13891773 Scanning for processes to kill in build PACKAGEBUILD-13891773 RUN: /usr/share/launchpad-buildd/slavebin/in-target umount-chroot --backend=chroot --series=bionic --arch=i386 PACKAGEBUILD-13891773 Stopping target for build PACKAGEBUILD-13891773 RUN: /usr/share/launchpad-buildd/slavebin/in-target remove-build --backend=chroot --series=bionic --arch=i386 PACKAGEBUILD-13891773 Removing build PACKAGEBUILD-13891773